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PREFACE 



This publication describes the BTAM 
facilities and macro instructions needed to 
write an application program that defines, 
activates, and controls a System/370-based 
teleprocessing system or local 3270 display 
system or both. Effective use of this 
publication does not presuppose a knowledge 
of teleprocessing techniques, but it does 
require a knowledge of the System/370 
assembler language and of data management 
techniques. The publication does not 
contain detailed information on the 
terminal equipment and computers that may 
be used as remote or local stations in a 
BTAM- control led system. For this 
information, see the lists of publications 
below. 

This publication is organized as 
follows : 

• "Teleprocessing and BTAM Concepts" 
explains concepts of teleprocessing in 
general and of BTAM in particular for 
the reader who is not already familiar 
with these concepts. This chapter also 
defines many terms used throughout the 
publication. 

• "Defining the Teleprocessing System" 
tells how to define to OS/VS the 
characteristics of the communications 
lines and equipment making up the 
teleprocessing system. It includes 
information on the system generation 
procedure. The DCB macro instruction, 
among others, is described here. 

• "Buffer Management" tells how to 
construct buffer pools and how to 
obtain and release buffers as needed to 
accommodate message data. 

• "Code Translation" describes the 
facilities BTAM provides for 
accomplishing the necessary translation 
between the transmission code used on 
communications lines and EBCDIC, the 
internal code of System/370. The 
ASMTRTAB and TRN SLATE macro 
instructions are explained here. 

• "Activating and Deactivating the 
Teleprocessing System" tells what 
procedures to follow in initializing 
the user program prior to message 
transmission and in deactivating the 
system upon conclusion of message 
transmission. The OPEN, LOPEN, and 
CLOSE macro instructions appear here. 

• "Line Control and Message Transmission" 
briefly explains the techniques for 



controlling communications lines of 
various kinds (switched, nonswitched, 
contention, polling) and presents the 
READ and WRITE macro instructions used 
in message transmission operation. 
Also given are the WAIT, TWAIT, and 
RESETPL macro instructions. 

• "Start-Stop Read and Write Operations" 
lists the types of Read and Write 
operations applicable to each type of 
remote terminal and gives the channel 
program for each. 

• "BSC Read and Write Operations" lists 
the types of Read and Write operations 
applicable to each kind of line 

conf iguation, gives the channel program 
for each, and indicates the types of 
remote stations for which each type can 
be used. 

• "Local Read and Write Operations" lists 
the types of Read and Write operations 
applicable to the local 3270 display 
system and gives the channel program 
for each type. 

Twelve chapters of programming 
considerations contain device-dependent 
information about remote computers, the 
2780 data transmission terminal, the 
2790 data communication system, the 
2770 data communication system, the 
2972 general banking terminal system, 
the 3270 information display system, 3650 
retail store system, 3660 supermarket 
system, 3735 programmable buffered ter- 
minal, the 37 41 model 2 data station, the 
3750 switching system, the 3780 data com- 
munication terminal, and the 5275 direct 
numerical control station. 

• "Error Recovery Procedures and Error 
Recording" explains the BTAM-provided 
facilities for diagnosing and 
attempting to recover from a variety of 
error conditions and for indicating and 
recording the occurrence of the errors. 

• "Online Testing" describes the 
facilities available for diagnosing 
line and equipment troubles. 

• Eighteen appendixes show control block, 
information table, macro instruction, 
and error message formats and contain 
code charts, sample programs, and 
storage estimates for VS2. 

Before using this manual, the reader 
should be familiar with the following 
publications : 

IBM Data Processing Glossary , GC20-1699 



in 



IBM System/370 Principles of Operation , 
GA22-7000 

OS/VS - DOS/VS-VM/370 Assembler 
Language , GC33-4010 

OS/VS Supervisor Services and Macro 
Instructions , GC27-6979 

OS/VS Data Management Services Guide , 
GC26-3783 

OS/VS Data Management Macro 
Instructions , GC26-3793 

For the transmission control units and 
terminals in his configuration, the BTAM 
user also needs to know the information in 
the following publications: 

• Transmission Control Units: 

IBM 2701 Data Adapter Unit, Component 
Description , GA22-6864 

IBM System/360 Component Description: 
IBM 2702 Transmission Control , 
GA22-6846 

IBM System/360 Component Description: 
IBM 2703 Transmission Control , 
GA27-2703 

• Start-Stop Terminals : 

IBM 1030 Data Collection System , 
GA24-3018 

IBM 1050 Reference Digest , GA24-3020 

IBM 1050 System Summary , GA24-3471 

IBM 1050 Data Communications System, 
Principles of Operation , GA24-3474 

IBM 1050 Operator's Guide , GA24-3125 

IBM 1060 Data Communications System , 
GA24-3034 

IBM System/360 Component Description: 
IBM 2260 Display Station; IBM 2848 
Display Control , GA27-2700 

IBM System/360 Component Description: 
IBM 2265 Display Station; IBM 2846 
Display Control , GA27-2731 

IBM 2740 Communications Terminal , 
GA24-3403 

IBM 2740/2741 Communications Terminal 
Operator's Guide , GA27-30 01 

IBM 2760 Optical Image Unit, Component 
Description , GA27-3011 



IBM SRL General Information — Binary 
Synchronous Communications , 
GA27-3004 

IBM System/3 RPG-II Telecommunications 
Programming Reference Manual , 
SC21-7507 

IBM 1130 Functional Characteristics , 
GA26-5881 

IBM 1130 Synchronous Communications 
Adapter Subroutines , GC26-3706 

IBM 2770 System Components , GA27-3013 

IBM 2780 Data Transmission Terminal, 
Component Description , GA27-3005 

IBM 2790 Data Communication System, 
Component Description , GA27-3015 

IBM 2972 Models 8 and 11 General 

Banking Terminal System, Component 
Description , GL27-3020 

IBM 50 Magnetic Data Inscriber, 

Component Description , GA27-2725 

IBM 3270 Information Display System , 
Library Users Guide , GA23-0058 for the 
manuals applicable to the configuration. 

Introduction to Programming the IBM 
3270 , GC27-6999 

IBM 3735 Programmable Buffered 

Terminal, Concept and Application , 
GA27-3043 

IBM 3735 Programmer's Guide , GC30-3001 

IBM 3740 BTAM/TCAM Programmer's Guide , 
GC21-5071 

Component Information for the IBM 3780 
Da ta Communication Terminal" ^ 
GA27-3063 

• Local 3270 Display System: 

IBM 3270 Information Display System , 
Library Users Guide , GA23-0058 for the 
manuals applicable to the configuration, 

To assemble, link-edit and execute a 
BTAM program requires knowledge of the 
information in: 

OS/VS System Generation Introduction , 

GC26-3790 
OS/VS1 System Generation Reference , 

GC26-3791 
OS/VS2 System Generation Reference , 

GC26-3792 
OS/VS Linkage Editor and Loader , 

GC26-3813 
OS/VS JCL Reference, GC28-0618 



• BSC Stations: 
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SUMMARY OF AMENDMENTS (April 1975) 

This Newsletter contains a discussion of an application program's response 
to a Request- for-Te st message. It also includes a number of minor technical 
and editorial changes and corrections. If you are adding Release 4 of VS1 or 
Release 3 of VS2, you should, as with the addition of any new release, recompile 
your application programs. 

Summary of Amendments Oct 1975 

This Newsletter adds storage estimates for VS2, makes corrections 
to Autopoll information, and includes a number of technical 
corrections. 

Summary of Amendments Sept 1976 

This newsletter contains minor technical and editorial changes and corrections, updated information for 
READYQ and return codes for RESETPL and CHGNTRY macros, a new parameter HIO2740 for the 
RESETPL macro. Appendix B the DECB has been corrected and updated. 

Summary of Changes Aug 1 978 

New Program Function Support of New 3270 Devices: The following summarizes the new 

devices that BTAM supports: 

NEW ATTACHMENT COMPATABLE WITH 

3274 IB Local 3272 

3274 1C BSC 3271 

3276 1,2,3,4 BSC 3271 

BTAM provides additional capabilities for applications to use the 
large (alternate) display or printer size of the devices attached to 
the 3274 1 B and 1 C and the 3276 1 , 2, 3, 4 Control Units. For 
further description of these capabilities see the following two 
sections under "IBM 3270 Information Display System, 
Programming Considerations": 

* Nonswitched Remote 3270 Display System, Line Control and 
Message Transmission. 

* Local 3270 Display System, Read and Write Operations. 

Summary of Changes Jan 1980 

This newsletter contains minor technical and editorial changes; Prepare to Read support for a local 
3274 Model ID Control Unit; Write Structured Field support for a local 3274 Model ID Control Unit 
and a remote 3274 Model 1C Control Unit. 

BTAM provides Prepare to Read support and Write Structured Field support on OS/VS1 and OS/VS2 
MVS. 

Fpr more information on these capabilities see the following sections under "IBM 3270 Information 
Display System, Programming Considerations:" 

* Nonswitched Remote 3270 Display System, 
Line Control and Message Transmission 

* Local 3270 Display System, 
Read and Write Operations 

* Local 3270 Display System, 
Prepare to Read Operations 

xiv 



TELEPROCESSING AND BTAM CONCEPTS 



This chapter explains some fundamental 
aspects of computer-based data communica- 
tions systems (often called teleprocessing 
systems) of the kind accommodated by the 
OS/VS Basic Telecommunications Access 
Method (BTAM) . It also explains some basic 
terminology used throughout the publica- 
tion. Since this discussion is intended to 
explain teleprocessing CTP) systems for the 
BTAM user, it does not attempt to encompass 
all kinds of teleprocessing systems. 
Although some of the terms defined apply to 
all or most communications systems, other 
terms are limited to communications pro- 
gramming usage or specifically to BTAM. 
Moreover, concepts and terminology are pre- 
sented from the programmer's viewpoint, 
rather than from the engineer's. 

Viewed in its most elementary aspect, a 
teleprocessing system consists or (1) a 
central computer and associated transmis- 
sion control equipment, (2) remote sta- 
tions, and (3) the electrical circuits 
(called communication lines or data links) 
that connect the remote stations to the 
central computer (See Figure 1). For the 
purpose of this discussion, the central 
computer equipment comprises the central 
processing unit (CPU) and the equipment by 
which the CPU is connected to the communi- 
cations lines. The generic name of this 
equipment is transmission control unit 
(TCU). 

The equipment constituting a remote sta- 
tion can be either a terminal or another 
computer. A terminal consists of a control 
unit and one or more input and output 
devices, each of which is called a com- 
ponent of that terminal. Each input device 
and each output device is considered a 
separate component. 

Remote stations in a BTAM-controlled 
teleprocessing system are usually separated 
from the central computer by a distance 
sufficient to require common carrier facil- 
ities and transmission techniques to accom- 
plish communication between central comput- 
er and remote stations. (Communications 
common carriers are companies that furnish 
communications services to the public.) 
However, it is the method of connection to 
the central computer, rather than the dis- 
tance from the computer, that determines 
whether a stcition is classed as remote. A 
station is considered remote if it is con- 
nected to th€i central computer through a 
transmission control unit (TCU) . (A sta- 
tion connect€»d directly to a computer data 
channel is termed a local station.) Except 



for the local 3270 display system, OS/VS 
BTAM supports only remote stations, which 
must be connected to the central computer 
by means of an IBM 2701 Data Adapter Unit 
or an IBM 2702 or 2703 Transmission Con- 
trol. Local 3270 display systems are con- 
nected directly to a selector, multiplexer, 
or block multiplexer channel of the central 
computer. 

An operator's console is an input/output 
device whose function is to control the 
operations of the computer. The console 
and its terminal control unit make up a 
terminal that can communicate with the 
operating system and with problem programs 
but cannot communicate with other ter- 
minals. If the operating system includes 
the Multiple Console Support (MCS) option, 
BTAM can communicate with those operator's 
consoles that are connected to the central 
computer through a 2701, 2702, or 2703 
transmission control unit. 

Note: Appendix J describes the terminals 
and configurations supported by BTAM. 

CATEGORIES OF COMMUNICATIONS LINES 

Communications lines can be categorized by 
several sets of attributes, some of which 
are discussed below. Some attributes have 
significance for the user's BTAM program, 
others need only be specified during system 
generation, the way the attributes of local 
I/O devices are specified. 



IINE AND STATION CONFIGURATIONS 

A communications line can be classified 
according to whether it connects two or 
more than two stations and whether or not 
the electrical connection between the cen- 
tral computer and the station is con- 
tinuously established. Figure 2 illus- 
trates a teleprocessing system comprising 
several types of line and station configu- 
rations, the elements of which are 
explained below. 

A non switched line is one that con- 
tinuously links the stations associated 
with it, regardless of the amount of time 
it is in use for message traffic. This 
kind of line is usually furnished by a com- 
mon carrier on a contractual basis, between 
specified locations for a continuous 
period, or regularly recurring periods, for 
the exclusive use of one customer. 
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Figure 1. Basic Elements of a Teleprocessing System 



A nonswitched line is called point-to- 
point if it connects the computer to a 
single remote station; it is called multi- 
point if several remote stations are con- 
nected to the line. 

A switched line is one in which an 
electrical connection between the central 
computer and a remote station is estab- 
lished by dialing, the way ordinary tele- 
phone calls are made. As in the public 
telephone network, the actual communication 
path for a given transmission is not fixed 
but is automatically selected from a vari- 
ety of possible paths by common carrier 
switching equipment. 

Each remote station on a switched line 
is continuously connected to the common 
carrier switching center (exchange) by an 
access line , the way a telephone is. A 
telephone number is associated with the 
access line. Similarly, each TCU at the 
central computer is connected to the 
exchange by access lines. Usually, a TCU 
has several access lines, each with its own 
telephone number; multiple access lines 
permit simultaneous communication with sev- 
eral remote stations. Each connection of 
an access line at the TCU is called a 
switched line termination or line 
appearance. 

Common carriers usually charge for 
switched lines on a time-used rather than a 
contractual basis. 



with only one remote station on a line dur- 
ing any call. Switched line connections 
are established by manual dialing or oy 
automatic dialing under program control. 
The dialing operation may be performed at 
the central computer or at the remote sta- 
tion, and the called station answers manu- 
ally or automatically. Not all of these 
options are available for all types of line 
configurations and remote stations. Within 
the limitations imposed by equipment or 
programming, the user chooses among them on 
the basis of the requirements of his appli- 
cation. For example, if the application 
involves collection of batched data from a 
number of remote stations after normal 
working hours, it would be appropriate to 
have each station equipped with an automat- 
ic answering facility and the central com- 
puter equipped with the calling facility. 
This would allow the program automatically 
to call the unattended stations and receive 
the batched data. 



DUPLEX AND HALF- DUPLEX TRANSMISSION 

The term duplex applies to a communications 
line that can accommodate data transmission 
in both directions at once. Half-duplex 
lines permit transmission in only one 
direction at a time. In a BTAM- con trolled 
teleprocessing system, data transmission is 
always in half-duplex mode; messages are 
never transmitted in both directions at 
once. 



A switched line is always considered 
point-to-point, as communication occurs 
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TRANSMISSION TECHNIQUES 

Transmission technique is the way in which 
data characters are represented on the com- 
munications line. The two techniques used 
by computers and terminals supported by 
BTAM are start-stop and binary synchronous . 

Detailed explanations of these tech- 
niques are not given here, since the pro- 
grammer need not concern himself with them 
except to specify to BTAM which technique 
is used. Binary synchronous communication 
(BSC) is used for high-speed data transmis- 
sion between the central computer and a 
remote computer or high-speed terminal. 
Start-stop transmission (also called asyn- 
chronous transmission) is used for data 
transmission at lower speeds between the 
central computer and remote terminals of 
various types. 



TRANSMISSION CODES 

Data can be represented on a communications 
line by any of several transmission codes. 
The code used on a given line is determined 
by the kind of station or the class of sta- 
tions connected to the line. Some stations 
allow a choice of transmission codes. The 
BTAM programmer must be aware of the code 
used on a line, since he must sometimes 
specify, in the form of bit patterns, cer- 
tain data characters to be transmitted by 
BTAM. At the back of this manual are 
charts giving the specific bit patterns of 
the characters contained in the character 
sets of the various transmission codes or 
station types. 



LINE CONTROL 

Just as a computing system, with its vari- 
ety of peripheral input/output equipment, 
requires some means to coordinate the func- 
tioning of the various parts, the variety 
of I/O equipment making up a teleprocessing 
system requires a discipline to effectively 
manage the flow of message traffic. A sig- 
nificant difference should be noted, howev- 
er. In a conventional computing system, 
the various I/O devices are at the service 
of the programmer; the requirements of his 
program and the characteristics of the data 
to be processed largely determine which 
input and output devices are to be acti- 
vated and when. Moreover, the I/O devices 
are within reach of the computer operator; 
he can intervene when a device malfunctions 
to correct the condition or assign a dif- 
ferent device. In a teleprocessing system, 
on the other hand, the central computer 
receives data at random from remote sta- 
tions, and the operator at the central com- 
puter cannot exercise any direct control 
over remote stations. He cannot, for 



example, correct a malfunctioning device at 
a remote station. 

A further distinction between a comput- 
ing system and a teleprocessing system lies 
in the handling of errors in data. With 
current techniques for transmitting data 
over long distances, errors are frequently 
introduced into message data by unavoidable 
transient line conditions such as crosstalk 
and lightning strikes. Transmission errors 
occur much less often in a computing sys- 
tem. A discipline for a teleprocessing 
system must accommodate the facility to 
detect transmission errors and, when poss- 
ible, to correct them (as by retransmitting 
the message containing the errors) . If the 
error is irrecoverable, its occurrence must 
be signaled to the user program, so that 
appropriate action can be taken. 

The scheme of operating procedures and 
signals by which a teleprocessing system is 
controlled is called line control (for BSC, 
the term data link control is often used). 
A line control scheme must consider the 
functional characteristics and capabilities 
of the equipment and communication lines 
composing the system, as well as the opera- 
tional requirements of the system. Some 
specific factors that line control must 
consider are: How is contact to be estab- 
lished between a sending and a receiving 
station? How is a message to be directed 
to a specific station on a multistation 
line? What happens if two stations try to 
send at the same time? What should be done 
if a station fails to respond to a message? 

Line control can be classified in two 
ways. The first way is by the transmission 
technique (start-stop or binary synchro- 
nous) that is used for the line under con- 
sideration. With each of these techniques 
is associated a set of control characters 
and rules for their use to effect the 
needed functions. Some of the control 
characters are used for both start- stop and 
BSC, while others are peculiar to one or 
the other of the transmission techniques. 
The specific line control characters are 
explained under the discussions of these 
techniques in the section "Line Control and 
Message Transmission". 

The second way in which line control can 
be classified is by the communication line 
configuration with which it is used. For 
example, line control for a switched line 
differs from that for a nonswitched line. 

While the general capabilities and func- 
tions of a given line control scheme are 
identified in terms of transmission tech- 
nique and line configuration, individual 
variations in capability and function arise 
from differences in the kind of stations to 
be controlled and from the presence or 
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absence in the stations of certain fea- 
tures. For example, a given line control 
scheme may include the control characters 
needed to indicate occurrence of a trans- 
mission error and to request automatic 
retransmission, but some types of station 
equipment that use that line control scheme 
may not be capable of error checking or 
automatic retransmission. Generally speak- 
ing, all stations connected to a given line 
roust be designed to use the same line con- 
trol scheme, and, if a certain capability 
is provided by some stations but not by 
others, the capability cannot be used. 

It is not necessary for the BTAM pro- 
grammer to specify the line control scheme 
to be used for a given line; this informa- 
tion is provided implicitly during system 
generation and during assembly in the DCB 
macro instruction for the line group of 
which the given line is a member. The pro- 
grammer must, however, have a general unde- 
rstanding of line control concepts in order 
to correctly structure that portion of his 
program that performs message transmission. 
Also, the programmer must know the meanings 
of each of the line control characters, 
since he must regularly insert certain of 
them into output areas and arrange his pro- 
gram to look for them in input areas. 

Line control functions can be considered 
in two categories: the functions needed to 
establish contact between central computer 
and remote stations and those needed to 
produce orderly flow of message traffic. 



ESTABLISHING CONTACT 

Contact may be established in several ways, 
depending in part upon the line configura- 
tion involved. 

In some line control schemes one of the 
stations on a point-to-point nonswitched 
line can "bid" for use of the line, so that 
it can send a message to the other station. 
Occasionally both stations may simul- 
taneously bid for use of the line. When 
this happens, the stations are said to con- 
tend with each other; a system in which 
this situation can occur is called a con- 
tention system . The line control scheme 
for a contention system must provide some 
means for resolving contention, that is, 
determining which of the contending sta- 
tions is to be given the opportunity to 
send its message. After one station has 
been given control, the other is blocked 
from sending. A contention system is more 
frequently used for a point-to-point line 
configuration (that is, one involving only 
two stations) than for a multipoint confi- 
guration. BTAM currently provides conten- 
tion line control only for point-to-point 
lines. 



The alternative to a contention system 
is a system in which a control station 
(that is, the central computer) periodical- 
ly contacts each of the remote stations in 
turn and allows it to send any input mes- 
sages it has ready. ("Ready" means that 
the terminal operator is prepared to enter 
data from a keyboard or that some medium 
such as cards or paper tape has been placed 
in an input device so that the data can be 
transmitted automatically when the control 
station activates that device. ) In this 
kind of system, each remote station has a 
unique identifier consisting typically of 
one or two characters, which, when sent 
over the line by the control station, 
causes that remote station and no other to 
respond. In a BTAM-controlled teleproces- 
sing system only the control station, that 
is, the central computer, activates sta- 
tions in this manner. The process of con- 
tacting in turn each of several stations on 
a line to determine whether any has input 
ready is called polling , and the station 
identifiers are called polling characters. 
Often, the first polling character identi- 
fies the station, and the second identifies 
a particular component from which data is 
solicited. A system in which stations are 
polled is called a polling system (in con- 
trast to a contention system) . 

Although the term polling taken in its 
conceptual sense implies a nonswitched line 
to which are attached several stations, 
each of which is solicited in turn, the 
actual function of polling (that is, send- 
ing a station identifier) sometimes applies 
as well to a point-to-point nonswitched 
line or to a switched line. In the case of 
a switched line, the central computer may 
dial the telephone number of the station 
(or the station may dial the computer) , and 
then the computer transmits the polling 
characters for that station. 

In this discussion of contention and 
polling systems, the distinction between 
the two was based on establishing contact 
for the purpose of receiving input data 
from a remote station. The distinction is 
less clear in the case of output data. In 
either a contention or a polling system, 
the central computer must send a station 
identifier to select the specific station 
that is to receive an outgoing message. 
The station identifier in this case is 
called addressing characters (or selection 
characters) , and the process is called ad- 
dressing (or selection) . As with polling 
characters, the first addressing character 
may identify the station, and the second, a 
particular component. 

Switched Lines 

It should be understood that, in the case 
of a switched line, the polling and ad- 
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dressing functions are independent of 
whether the central computer or a remote 
station initiated the telephone connection. 
Typically, the operator at a remote station 
dials the computer only when the remote 
station has data to send to the computer, 
and the computer therefore polls the sta- 
tion after the line connection is estab- 
lished. Similarly, the central computer 
may dial a remote station only when the 
computer has data to send and therefore 
addresses (or selects) the remote station. 
These conventions do not always prevail, 
however. For example, some applications 
require that certain stations be polled 
after working hours when the stations are 
unattended. With the proper common carrier 
equipment at the station, the computer can 
dial the station and then poll the input 
devices that the operator previously loaded 
with, for example, a deck of cards or a 
paper tape. 

In establishing contact over a switched 
line, two situations should be avoided. 
First, dialing a wrong number can result in 
establishing contact with a station other 
than the one intended. Second, an unau- 
thorized station, if provided with the 
telephone number of the central computer, 
could establish contact (assuming that the 
polling or addressing characters corres- 
ponded to the characters for authorized 
stations) . 

To prevent message transmission under 
either of these circumstances, identifica- 
tion verification may be used. (This is an 
optional facility available for certain 
kinds of stations.) In order to use this 
facility, each remote station that is per- 
mitted to call the computer over a specific 
switched line termination (that is, by cal- 
ling a specific telephone number), must 
have an identification sequence that it 
automatically sends after the line connec- 
tion has been established. The program 
compares the received sequence against a 
programmer-defined sequence. If they 
match, message transmission can proceed; if 
they differ, BTAM signals the fact by set- 
ting a flag bit and inhibits message trans- 
mission. The user's program must check the 
flag bit and take appropriate action, which 
ordinarily is to break the line connection. 

If the remote station is a computer, the 
identification sequence is provided by the 
programmer, and each computer, central and 
remote, can check the identity of the 
other. If the remote station is a termi- 
nal, the sequence is mechanically or 
electrically established when the terminal 
is installed, and only the central computer 
can perform the checking function. 

Because the central computer has no way 
of uniquely identifying a station that 



calls it, all polling and addressing char- 
acters and identification sequences must be 
the same for any station that is to be per- 
mitted to call in over a given switched 
line termination. 

The function of identification verifica- 
tion is not applicable to nonswitched 
lines, since the user determines, when the 
teleprocessing system is installed, which 
stations are to be connected to a specific 
nonswitched line. 

Terminal Lists 

When establishing contact with a remote 
station, the BTAM program gets the tele- 
phone numbers, polling or addressing char- 
acters, and identification sequences needed 
from a control table called a terminal 
list , which the programmer generates during 
assembly using a BTAM macro instruction 
provided for this purpose. The structure 
and contents of the terminal list vary 
according to the kind of line configuration 
and the remote station for which the list 
is being generated. (Terminal lists are 
not used for contention systems.) 

Positive and Negative Responses 

The discussion of how contact is estab- 
lished between stations has considered only 
the action taken by the originating station 
(that is, the station that initiates the 
contact) . Before message transmission can 
proceed, the responding station (the sta- 
tion being contacted) must indicate to the 
originating station whether or not it is 
ready to receive or send a message. This 
indication is generally called a response 
or answerback, and it is termed positive if 
the station is ready, negative if it is not 
ready. The specific characters used for 
positive and negative responses vary with 
the type of station and the kind of line 
control (start-stop or BSC) under 
consideration. 



BUFFERING 

Buffering is a data management technique 
often used in conventional (non teleproces- 
sing) application, because, by permitting 
greater utilization of input/output areas, 
it minimizes the amount of main storage 
needed for these areas. This advantage is 
even more evident in a teleprocessing sys- 
tem, especially one involving many communi- 
cation lines and varying message lengths. 

Each Read or Write operation that 
involves transfer of text data between a 
central computer and a communication line 
requires that an input or output area be 
assigned to that line. However, to per- 
manently assign main storage areas to each 
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communication line is wasteful, because 
these areas are idle except during the 
relative small proportion of time that text 
transfer to or from the communication line 
is in progress. 



Because delta transfer operations are 
virtually never in progress simultaneously 
on more than a small proportion of the 
lines in a system, only a relatively small 
number of main storage areas are needed to 
service many communication lines. Buffer- 
ing permits these areas to be shared among 
the lines. 



Buffering involves defining a group (or 
pool) of main storage areas called buffers, 
assigning buffers from this pool to Read 
and Write operations as needed, and then 
returning them to the pool when they are no 
longer needed, so they may be used for sub- 
sequent Read or Write operations. 



When the buffer pool is formed, all buf- 
fers are chained together by placing a link 
field containing the address of the next 
buffer in the chain in the first fullword 
of each buffer. The link field of the last 
buffer contains zeros. Adjacent buffers in 
a chain are not necessarily in contiguous 
storage locations. 



Buffers can be withdrawn from the pool 
singly or in chains. A buffer control 
block (BCB) associated with the pool always 
contains the address of the first available 
buffer of those remaining in the pool. 
When buffers are returned to the pool they 
are automatically inserted into the chain. 



A control block associated with each 
Read and Write operation contains the 
address of the first buffer in the buffer 
chain that is assigned to the operation, so 
the programmer can always determine the 
address where the received data begins or 
where the data to be sent must be placed. 

BTAM and OS/VS automatically perform the 
functions necessary to set up a buffer pool 
when the programmer provides certain infor- 
mation, such as the number of buffers he 
requires and the length of each. (All buf- 
fers in a pool have the same length) . In 
addition, BTAM can automatically obtain 
buffers from the pool and provide them to 
the Read or Write operation; this is called 
dynamic buffer allocation or dynamic buff- 
ering . If the programmer does not specify 
the use of dynamic buffering, the program 
must request the required number of buffers 
before initiating the Read operation. This 
is called programmer buffering . 



DYNAMIC BUFFERING 

As mentioned earlier, buffering in general 
provides a significant increase in main 
storage utilization; dynamic buffering 
further increases the utilization. With 
programmer buffering, the programmer must 
anticipate the length of the message to be 
received; if messages can be of different 
lengths, he must request enough buffers to 
accommodate the longest message that can be 
expected, even though messages of this 
length are infrequently received. Further- 
more, all buffers are provided in advance 
of the Read operation, even though they 
will not all be used at once. 

When dynamic buffering is used, however, 
buffers are obtained singly (by means of 
program controlled interrupts) as the Read 
operation progresses. Only as many buffers 
as needed are obtained; when BTAM detects 
an ending character in a buffer, it does 
not get any more buffers. Besides allowing 
delayed acquisition of huffers, dynamic 
buffering allows buffers that are no longer 
needed to be progressively released to the 
buffer pool, instead of remaining idle 
until the end of the Read or Write opera- 
tion and then being released as a group. 
This technique is possible, because, with 
dynamic buffering, BTAM sets a completion 
code in the high-order byte of each buffer 
when the Read or Write operation has 
finished filling or emptying the buffer. 
This is the same kind of completion code 
that is set in the event control block 
(ECB) at the end of the entire Read or 
Write operation. The program can check 
each buffer in turn for this completion 
code and release the buffer when the code 
is set. 

Whether or not dynamic buffering is em- 
ployed, BTAM does not release buffers that 
contain data. The programmer must do this 
himself, and failure to do so results in 
exhaustion of the buffer supply. Should 
this occur, no more Read or Write opera- 
tions can be performed. 

To summarize, dynamic buffering maxi- 
mizes buffer utilization by (1) obtaining 
only as many buffers as are needed for an 
operation, (2) obtaining them just before 
actual use, and (3) allowing the programmer 
to release them one at a time immediately 
after use. 

Further information on buffering will be 
found in the section "Buffer Management." 



CONVENTIONS USED IN THIS PUBLICATION 

To explain the use of BTAM, this publica- 
tion must frequently express functional 
relationships between different parts of a 
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teleprocessing system, at varying levels of 
detail. To express these relationships 
clearly and concisely requires that certain 
conventions be observed. 

Station, Computer, Terminal ; The term sta- 
tion, when not qualified, refers to any of 
the computers and terminals, whether cen- 
tral or remote, connected to a BTAM- 
controlled communications line. Central 
computer means the computer in which the 
user program under consideration is run- 
ning. Where the unqualified word computer 
appears, it means the central computer. 

The general term remote station denotes 
a computer or terminal being controlled by 
the central computer. Where the context is 
appropriate, the specific term remote com- 
puter or remote terminal is used. For 
example, in discussions limited to start- 
stop communication lines, the phrase remote 
terminal is generally used, since start- 
stop lines do not accommodate remote compu- 
ters. In discussions of binary synchronous 
lines, however, the more general phrase 
remote station is used, since BSC lines 
accommodate both computers and terminals. 

Direction of Transmission : The terms input 
and output are always used relative to the 
computer in which the BTAM program under 
consideration is being run. Thus, whether 
BTAM is running in the central computer or 
a remote computer, input denotes data 
transmission from the remote station, and 
output denotes data transmission from the 
central computer. 

In expressing a specific direction of 
transmission, the sending and receiving 
stations are always identified: as in 
"transmission from the central computer to 
a terminal." The phrase "transmission 
between the central computer and a termi- 
nal," on the other hand, implies transmis- 
sion in either direction. 

Data, Messages, Text, Control Characters : 
The term data is the most general of these 
terms; with respect to communication lines, 
it refers to any sequence of transmission 
code bit patterns, whether the patterns 
represent graphic characters, control char- 
acters, or binary information. Message 
means any sequence of data characters, con- 
sidered as a unit, and includes any control 
characters necessary for transmission on a 
communications line. Text refers to the 
data characters comprising the information 
to be conveyed, such as plain language or 
binary data. Control characters are char- 
acters needed either to control transmis- 
sion on the line (called line control or 
data link control characters) or to activ- 



ate mechanical or formatting functions at a 
station ( end-to- end control characters ) . 
Examples of line control characters are 
SOH, STX, and EOT (start of heading, start 
of text, end of transmission). Examples of 
end-to-end control characters are CR, LF, 
VT, and BEL (Carriage Return, Line Feed, 
Vertical Tab, Bell). 

Usually, the name of a character and the 
function it performs are the same, for 
example, an EOT character indicates the end 
of transmission. In some cases, however, a 
particular function is effected by a dif- 
ferent character or character sequence. 
For example, the EOA (end-of -address) 
character is sometimes used as a positive 
response signal, and for certain non-IBM 
terminals the characters FIGS H LTRS are 
employed as an end-of- transmission 
sequence. Where these disparities of func- 
tion and character name occur, the intended 
meaning is made clear. 

The text portion of an output message is 
given by the user to BTAM in a work area or 
buffer. The user also must provide certain 
line control characters in the buffer. 

Read and Write Operations : The sequence of 
events by which data characters are sent or 
received is called a Read operation for 
input messages and a Write operation for 
output messages. 

Each Read or Write operation is produced 
by a READ or WRITE macro instruction issued 
by the user's program (except for some 
operations performed automatically by error 
recovery procedures and online testing fa- 
cilities) . The term Read (or Write) opera- 
tion may be qualified at several levels. 
For example, the phrase "Read operation" 
refers to any of several types of Read 
operation; the phrase "Read Initial opera- 
tion" refers to any of several variations 
of Read Initial operations, and so on. 
Where a specific type is intended, the 
corresponding type code is usually given, 
as in "Read Initial Conversational (TIV) 
operation." 

A Read or Write operation is performed 
by a sequence of commands executed by the 
channel to which the TCU is connected. 
These channel commands cause the TCU to 
transmit data characters and control sig- 
nals on the line or, conversely, to respond 
to data characters and signals received 
from the line. 

In discussions of Read and Write opera- 
tions, the term command means a channel 

command, as represented in main storage by 
a channel command word (CCW) . 
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BTAM MACRO INSTRUCTION FORMATS 



BTAM macro instructions, like other operat- 
ing system macro instructions, are written 
in the assembler language and accordingly 
are subject to the rules given in OS/VS and 
DOS/VS Assembler Language . BTAM macro in- 
structions, like all assembler language 
macro instructions, are coded in this 
format: 



If a specific character sequence follows 
the equal sign, code the entire operand 
exactly as shown. 

Code commas and parentheses exactly as 
shown. Unlike positional operands, no 
comma need be coded in place of an omitted 
optional keyword operand. 



i t r 1 

| Name | Operation (Operands ( 

j. x x 1 

(Symbol or | Macro Name | One or more operands | 
| Blank J (separated by commas | 
l x x J 

The operands are used to specify the fa- 
cilities to be included, services to be 
performed, and various parameters needed by 
BTAM. Operands are coded according to the 
following rules. 



POSITIONAL OPERANDS 

Positional operands are shown as either 
small letters or capital letters. Small 
letters describe the kind of information to 
be coded; capital letters indicate the 
exact characters to be coded. 

If the operand is shown as small letters 
(for example, inarea), substitute for it 
one of the values shown in the macro 
instruction format chart, Appendix G. 

If the operand is shown as capital let- 
ters (for example, OPENLST), code it exact- 
ly as shown. 

Code commas and parentheses exactly as 
shown. If an optional operand is omitted, 
a comma must still appear, except following 
the last operand coded. 



KEYWORD OPERANDS 

Keyword operands are shown as a word in 
capital letters, followed by an equal sign, 
followed by (1) a descriptive word or 
phrase in small letters or (2) a specific 
character or sequence of characters in 
capital letters. 

If small letters follow the equal sign, 
code the keyword and equal sign exactly as 
shown, and substitute for the word or 
phrase in small letters one of the values 
shown in the macro instruction format 
chart. 



CONTINUATION LINES 

The operand field of a macro instruction 
can be continued on one or more additional 
lines as follows: 

1. Enter a continuation character (any 
nonblank character that is not part of 
the operand coding) in column 72 of 
the line. 

2. Continue the operand field on the next 
line, starting in column 16. All 
columns to the left of column 16 must 
be blank. 

The operand field being continued may be 
coded in one of two ways. You may code the 
operand field through column 71, with no 
blanks, and continue the coding in column 
16 of the next line, or you may truncate 
the operand field at the end of an operand 
(including the comma that follows the 
operand) , and start the next operand in 
column 16 of the next line. 

Examples : 

| Name ( Opera t ion j Ope ra nd (Col 

I I I _|72 

| NAME1 | 0P1 | OPERANDI , 0PERAND2 , OPE | X 
j j |RAND3,OPERAND4,OPERAN|X 

|D5,OPERAND6 THIS IS j 
| ONE WAY j 

| OPERANDI, OPERAND2, |X 
|0PERAND3, THIS IS JX 
| OPERANDI ANOTHER j 
| WAY | 
J -X-, 



I I 

I* I 

L X 

|NAME2|OP2 

I i 

I I 

I* I 

L X 



.J 



CODING AIDS 

The symbols ( 3 (brackets), { > (braces), 
and . . . (ellipsis) are used to aid in 
defining macro instruction formats; they 
are never coded. Their meanings are as 
follows . 
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[ ] 

indicates that the enclosed operand is 
optional, or is coded under certain 
conditions. If more than one operand 
is stacked within brackets, one of the 
items, or none, may be coded. If one 
of the choices is underlined, the 
option associated with that choice is 
assumed to be specified if the operand 
is not coded. 



indicates that one of the enclosed 
operands must be coded. 



> 



defines the limits of a syntactical 
unit, if the unit consists of more 
than one operand, for example, 
( (operandone , operand two) ,...). The 
{ } and ellipsis signifies that the 
two operands may be repeated in sets. 
The enclosing parentheses must be 
coded. 
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DEFINING THE TELEPROCESSING SYSTEM 



Defining a teleprocessing system means 
specifying to BTAM and OS/VS the charac- 
teristics of the communications lines, 
TCUs, and remote stations comprising the 
system. Using this information, OS/VS 
establishes the appropriate program inter- 
faces between the user program and data 
management I/O routines. 

During system generation, the programmer 
must specify the types of TCUs and remote 
stations making up the teleprocessing sys- 
tem and the features associated with each 
TCU and station. Appendix D explains how 
to code system generation macro instruc- 
tions to provide this information. (See 
the OS/V51 or 0S/VS2 system generation 
reference manual for general information 
about the system generation procedure.) 

During assembly and during program 
execution, the programmer must define com- 
munications line groups and terminal lists, 
as explained below. 

For information about defining the local 
3270 display system and about attention 
interruption handling, see the section "IBM 
3270 Information Display System — Program- 
ming Considerations." 



same features and must use the same 
transmission code, but they need not 
all be of the same type. That is, more 
than one type (for example, System/370 
Model 135, 1130, 2770) can be connected 
to the same nonswitched multipoint 
line, or more than one type can call or 
be called by the central computer over 
the same switched line termination 
(that is, the same telephone number at 
the central computer) . 

• Any optional functions that are speci- 
fied apply to all lines in the group. 
For example, if dynamic buffering is 
specified for the line group, all lines 
must use dynamic buffering. 

• Do not assign more than 60 lines to a 
DCB line group. 



Communications line groups are treated 
as data sets, although they do not conform 
to the usual definition of data set (a 
named, organized collection of logically 
related records). Like other data sets, a 
communications line group is represented by 
a data control block (DCB), which is 
defined using the DCB macro instruction. 



DEFINING COMMUNICATIONS LINE GROUPS 

A communications line group is a logical 
association of lines having characteristics 
similar enough that the same channel pro- 
grams can be used for all lines in the 
group. These characteristics are as 
follows: 

• All lines in a group must be start- 
stop, or all must be BSC; both types 
cannot be mixed in the same group. 

• All lines must be of the same type. 
For start-stop lines, this means that 
all lines in the group must be non- 
switched, or all must be switched. For 
BSC lines, all lines in the group must 
be nonswitched point-to-point, non- 
switched multipoint, or switched 
point-to-point . 

• All remote terminals connected to 
start-stop lines in a group must be of 
the same type, must have the same fea- 
tures, and must use the same transmis- 
sion code. 

• All remote stations connected to BSC 
lines in a line group must have the 



You may establish a line group in either 
of two ways. First, you may specify during 
system generation what lines are tc consti- 
tute the group and symbolically identify 
the group during program execution by means 
of the UNIT parameter of a DD statement. 
Second, you may specify the makeup of the 
group during program execution, again using 
UNIT parameters on DD cards. Whichever 
method is used, during system generation 
you must identify to OS/VS (1) what kind of 
TCU is connected to each line and (2) what 
kind of terminals (start-stop) or what type 
of line (BSC) is associated with each line 
address . 



A series of examples will make this 
clear. Assume that the teleprocessing net- 
work includes seven lines — five start- 
stop and two BSC lines. Assume further 
that IBM 1050 terminals are connected to 
the five start-stop lines, and that any 
type of BTAM-supported BSC station is con- 
nected to the two BSC lines (see Figure 3). 
(The decision as to what types of remote 
stations are to be connected to which lines 
is part of installation planning; this 
example assumes that the decision has 
already been made.) 
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figure 3. Sample Line Addresses and Asso- 
ciated TCU and Station Types 



Before establishing the makeup of a line 
group, you must specify with IODEVICE macro 
instructions the type of TCU (2701, 2702, 
or 2703) and tne type of terminal (for 
start-stop lines) or type of line (for BSC 
lines) associated with each line address. 



IODEVICE 
IODEVICE 
IODEVICE 
IODEVICE 
IODEVICE 
IODEVICE 
IODEVICE 



UNIT=1050 
TCU=2702, 
UNIT=1050 
TC'J=270 2, 
UNIT=1050 
TCU* 270 2, 
UNIT=1050 
TCU=270 2, 
UNIT=1050 
TCU=270 2, 
UNIT=BSC3 
TCU=2703, 
UNIT=BSC3 
TCU=2703, 



, ADDRESS=0 21, 
,ADDRESS=022, 
,ADDRESS=025, 
,ADDRESS=027, 
,ADDRESS=02E, 
,ADDRESS=0 31, 
, ADDRESS=033, 



Notice that the UNIT operands in the 
first five macro instructions specify the 
type of terminal, and those in the remain- 
ing two macro instructions specify "BSC3," 
a value that represents the type of line, 
in this case nonswitched multipoint. For a 
nonswitched point-to-point line you would 
specify BSC1; for a switched point-to-point 
line, BSC2. See the description of the 
IODEVICE macro instruction in Appendix D. 

In these macro instructions, the three- 
digit addresses represent communications 
lines rather than specific devices, as 
would be the case in defining local I/O 
equipment. The ellipses represent other 
appropriate IODEVICE operands, including 
FEATURE, ADAPTER, and 3ETADDR. These are 
explained in Appendix D. 

Assume now that you wish to establish 
three line groups from the seven lines, as 



shown in Figure 4. 
to do this. 



Two examples show how 



Example 1 : To define the groups during 
system generation, you would code a UNIT- 
NAME macro instruction for each line group: 

UNITNAME UNIT* (021, 022, 025, 02E> ,NAME=GR0UP1 
UNITNAME UNIT=(0 27),NAME=GROUP2 
UNITNAME UNIT=(031,033) ,NAME=GROUP3 

During program execution, you would associ- 
ate these line groups with specific data 
control blocks in your program by issuing 
for each group a DD statement identifying 
the group by its name, and indicating the 
number of lines in the group: 



//DDGRP1 DD 
//DDGRP2 DD 
//DDGRP3 DD 



UNIT= (GROUP 1,4) , 
UNIT=(GROUP2,l), 
UNIT=(GR0UP3,2) , 



The name of the DD statement (for example, 
CDGRP1) roust be the same as the DDNAME 
parameter in the data control block. In 
the foregoing DD statements, the number of 
lines indicated for each group is the same 
as the number of lines specified during 
system generation in the UNITNAME macros. 
You may, however, specify any lesser number 
of lines to be in the group when you issue 
a DD statement. Lines are always included 
beginning with the lowest line address. 

For example, if you code 



//DDGRP1 DD 



UNIT=(GR0UP1,2) , . .. 



the two lines associated with the two low- 
est addresses in the original four-line 
group, 021 and 022, constitute the group. 



Example 2 : Alternatively, you may elect 
not to define the groups during system 
generation but to identify the lines in the 
group individually during program execu- 
tion. To do this, code a separate DD 
statement for each line, specifying the 

Line -Address 



TCU 



■021 

■022 

■025 

■027 — »-Line Group 2 
-02E 



«- V Line Group 1 



TCU 



-\ 



■031 



-033 



> Line Group 3 



J 



Figure 4. Sample Line Group Makeup 
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actual line address (instead of the name of 
a line group, as in example 1) : 



//DDGRP1 DD 
// DD 
// DD 



UNIT=021, 
UNIT=02E, 
UNIT=027, 



These DD statements establish a group 
containing three lines. 

Even if you have defined a line group by 
using a UNITNAME macro instruction during 
system generation, you may redefine it by 
using DD statements as shown in this 
example. 

Relative Line Numbers : In READ and WRITE 
macro instructions, you must specify the 
line over which the Read or Write operation 
is to take place. Rather than specify an 
actual line address, you code in the macro 
a relative line number (RLN) , which refers 
to the numerical position of the actual 
line address relative to other lines in the 
group. Thus, in Example 1, the relative 
line numbers are as shown in Figure 5; in 
Example 2, as shown in Figure 6. (In 
Example 2 four lines are not defined in any 
group . ) 

If you define a line group during system 
generation, using the UNITNAME macro 
instruction, the relative line numbers are 
assigned so that they represent an ascend- 
ing numerical order of addresses, regard- 
less of the actual sequence in which the 
addresses were arranged in the macro 
instruction. If, however, you define a 
line group by a sequence of DD statements, 
relative line numbers are applied in the 
same sequence in which the DD statements 
are coded. 

See Appendix D for further information 
about system generation macro instructions 
involved in generating a BTAM system, and 
see the 0S/VS1 or 0S/VS2 system generation 
reference manual for complete information 
about system generation procedures. 



TCU 




ne Group 1 



TCU 



031 



033 



Figure 6. Relative Line Numbers for 
Example 2 



DCB (Data Control Block) Macro Instruction 

The DCB macro instruction defines the 
structure of a data control block and 
includes in it certain information that you 
have coded in the macro instruction. You 
roust issue a separate DCB macro instruction 
for each line group data set. 

Of the parameters that appear in the 
data control block, you must code certain 
ones in the macro instruction; others ei- 
ther may be coded in the macro instruction 
or may be supplied from an alternate 
source. The alternate source for an 
operand is indicated in the description of 
the operand, as follows: 

• PP means you can enter the parameter 
into the data control block yourself 
during program execution at any time 
prior to opening the line group data 
set. 

• OE means you can enter the parameter 
into the data control block yourself 
during program execution at any time up 
to and including the DCB exit taken 
during the opening process. 



TCU 



TCU 



Line 
Address 



Figure 5 . 



-021 

-022 

025 

-027-+-RLN 1 
-02E 



->-RLN 1 
-»-RLN 2 
->-RLN 3 



Line Group 2 
>-RLN 4 



•031 



-»~RLN 1 



Line Group 3 



033- 



-»-RLN 2 



Line Group 1 



Relative Line Numbers for 
Example 1 



r t t 1 

| Name | Operation (Operands | 

|. A 1 

| symbol | DCB | keyword operands | 

l x J. J 

symbol 

is the name of the DCB macro instruc- 
tion. It must be specified. 

keyword operands 

are the operands that can be included 
(see Figure 7) . 

The format of the data control block is 
shown in Figure 8. The contents of the 
fields in the DCB are described in Figure 
9. 
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■i 



j Keyword Operand and Description (part 1 of 5) I 

j. 1 

DSORG=CX 

identifies the data set organization as that of a communications line group. 



MACRF=(R) 

MACRF=(W) 

MACRF=(R,W) 

specifies that access to the line group is to be gained with READ or WRITE macro 
instructions or both. Whichever option is coded, BTAM permits access with both 
READ and WRITE macro instructions. This operand is required. 
| 

[DDNAME=ddname] (Alternate source: PP) 
is the name that appears in the DD statements associated with this data control 
block. If this operand is omitted, and no value is provided through an alternate 
source, the job is terminated. 
h 1 

[BUFNO=number of buffers] (Alternate source: OE) 
is the number of buffers to be obtained by BTAM during open, if you wish BTAM to 
provide a buffer pool. Up to 225 buffers can be specified. You need not code 
this operand if BTAM is not to obtain a buffer pool, 
j , 

[BUFL= buffer length] (Alternate source: OE) 
is the length in bytes of the buffers making up the buffer pool, whether you pro- 
vide the pool or BTAM provides it. The maximum value for BUFL is 32,760. A 
minimum limit on buffer length applies to BSC line groups under certain condi- 
tions (see "Programming Notes" under "READ and WRITE Macro Instructions." Speci- 
fy this operand for all applications using buffers. BUFL must be a multiple of 
four. 
^ ^ 

(BUFCB=buff er control block address) (Alternate source: OE) 
specifies the address of the buffer control block for a buffer pool you provide. 
If you wish BTAM to provide the buffer pool, omit this operand, and code the 
BUFNO and BUFL operands. 
| 

fEXLST=exit list address] (Alternate source: PP) 
specifies the address of a BTAM program exit list, if you wish to provide one. 
Only the DCB exit may be used, 
j . 

[BFTEK=D) (Alternate source: OE) 

specifies that dynamic buffering is to be used for this line group. If dynamic 
buffering is specified, a buffer pool must be defined. 



[LERB=line error block address] (Alternate source: OE) 
specifies the address of the line error recording block. This operand is valid 
only if C is coded among the EROPT operand options. 
| 

[EROPT=code] (Alternate source: OE) 

specifies the error recovery, error recording, and online test options to be pro- 
vided for the line group. 
E 
specifies that the basic error recovery procedures (ERP) are to be provided for 
the line group. If EROPT is omitted, E is assumed. 
R 
specifies that text-read errors are to be retried in addition to the basic error 
recovery procedures. This option is valid only for the following terminals: 
1050 terminals (valid for the card reader and paper tape reader only if line 
correction feature is installed), 2740 terminals with checking feature, and 2260 
terminals. Do not specify EROPT=R if dynamic buffering is to be used (BFTEK=D), 
because the use of dynamic buffering precludes the retrying of text-read errors. 
(See the discussion under N, below, for considerations for AT£T 83B3 and WU 115A 
terminals. ) 

Figure 7 (Part 1 of 5). Keyword Operands for the BTAM DCB Macro Instruction 
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r 

| Keyword Operand and Description (part 2 of 5) 



w 
specifies text-write errors are to be retried in addition to basic error recovery 
procedures. This option is valid for all start-stop terminals, except World 
Trade telegraph terminals. It is invalid for BSC stations. It results in an 
additional copy of the message for each retry (except for the 2260 with the line 
address feature and the 1050 card punch and paper tape punch with the line 
correction feature) . This parameter is ignored for BSC and World Trade telegraph 
terminals. Do not specify EROPT=W if dynamic buffering is to be used (BFTEK=D) , 
because the use of dynamic buffering precludes the retrying of text-write errors. 

C 
specifies that threshold error counts and cumulative error counts are to be main- 
tained in the line error recording block (LERB) for the line for data check, 
intervention required, and nontext time-out errors. 

N 
specifies that no error recovery procedures are to be provided for the line 
group. This parameter and E, R, W, and C are mutually exclusive. This parameter 
is invalid for BSC stations; if coded, it is ignored. It is recommended that 
EROPT=N be coded for AT6T 83B3 and WU 115A terminals if dynamic buffering is spe- 
cified (BFTEK=D) , because BTAM does not perform error retry either before or 
after start of text transfer when dynamic buffering is used for terminals of 
these types. If EROPT is omitted, or E, ER, or R is coded in the EROPT operand, 
ERP routines are unnecessarily loaded into the system, as they will remain 
unused. 

T 
specifies that the online test facility is to be used for the line group. This 
option is valid for all IBM stations with or without error recovery procedures. 
To receive standard IBM maintenance for a remote or local 3270 display system, 
this option must be specified. 

Note: The parameters E, R, W, C, and T may appear in any combination. The parameter 
N may appear alone or with T. Commas must not be coded in this parameter. Example: 
EROPT=RECWT. When EROPT (any combination of E, R, W, and C) is coded in the DCB 
macro instruction, the user automatically gets the Outboard Recorder (OBR) and the 
Statistical Data Recorder (SDR) facilities for this line group. (These are facili- 
ties used by the customer engineer.) Error recovery procedures are required for BSC 
stations. For BSC line group data sets C and T are the only valid EROPT options; all 
other option codes are ignored. For World Trade telegraph terminals, E, C, and N are 
the only valid EROPT options; all other option codes are ignored. For the local 3270 
display system, E and T are the only valid EROPT options; all other option codes are 
ignored. 



DEVD=BS 
DEVD=WT 
DEVD=d D 

LD 

specifies that the line group contains locally attached devices. 

BS 
specifies that BSC is to be used and causes a UU-byte field to be added to the 
DCB. This field contains the line control characters in the transmission code to 
be used. 

WT 
must be coded if the line group contains World Trade telegraph terminals or if 
any of the keyword operands IAM,WRU,MON,NONDIY,ECM, and EOT are coded. 



(f«iODE=( CIBC) , [CNTRL] , 



[l]'[t] n 



(BSC line group only) 



IBC 
specifies that the transmission control unit (TCU) at the central computer is to 
operate in EIB (Error Information Byte) mode. EIB mode is discussed in the Gen- 
eral Information section of the BSC Read and Write Operations chapter. 

CNTRL 
should be coded if the central computer (this System/370 ) is to be given control 
when contention occurs on a point-to-point nonswitched line. It should be 
omitted if the remote station is to be given control. 

L J 

Figure 7 (Part 2 of 5) . Keyword Operands for the BTAM DCB Macro Instruction 
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| Keyword Operand and Description (part 3 of 5) 



A 

specifies that communications are to be through the 2701 Data Adapter Unit's Dual 

Communication Interface A. 
B 

specifies that communications are to be through the 2701's Dual Communication 

Interface B. This parameter may not be coded if this feature is not present on 

the 2701. 
A 

specifies use of the transmission code designated by Code A for 2701 Data Adapter 

Unit Dual Code Feature. 
B 

specifies use of the transmission code designated by Code B for 2701 Dual Code 

Feature. This parameter may not be coded if this feature is not present on the 

2701. 
j. ^ 1 

[CODE=trans miss ion code] (BSC line group only) 

EBCDIC 
specifies transmission in Extended Binary Coded Decimal Interchange Code. 

USASCII 
specifies transmission in United States of America Standard Code for Information 
Interchange. 

TRANSC 
specifies transmission in six-bit Transcode. 
j. ^ 

[,READYQ=( H 
\relexpf 

specifies the action that BTAM takes when polling a local 3270 device on a 
Read Initial operation, if a device previously not ready is turned on. 



specifies that BTAM issues a RESETPL for the user when it discovers that a 
device previously not ready has become ready during Read Initial processing 
by sending Device End to the channel. After a Read Initial is issued, BTAM 
checks for attention interruptions before checking for devices that have 
become ready. The relative line number of the device that became ready is 
in the DECB at location DEPOLPT+3. 

relexp 

specifies the address of a user routine that is asychronously scheduled when 
a device that was previously not ready sends Device End to the channel. The 
user routine might, for example. Write Erase to clear the device's buffer. 
The routine receives control in problem program state, operating under the 
protection key of the user's task. Upon entry, register one contains in the 
high-order byte the relative line number of the device that became ready; the 
low-order three bytes contain the address of the DEB that defines the devi- 
ce's line group, standard register save conventions are expected. 

Note : If READYQ is omitted, an Intervention Required is posted as a per- 
manent I/O error. If READYQ is specified, DEVD and LERB cannot be speci- 
fied. 

Figure 7 (Part 3 of 5) . Keyword Operands for the BTAM DCB Macro Instruction 
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., 

Keyword Operand and Description (part 4 of 5) I 

i 1 

The following six operands apply only to line groups for World Trade tele- 
graph terminals: 
h 4 



[ M0N=YES"1 
[ _MON=NO J 



YES 
specifies that each terminal of the line group is equipped with the optional 
Motor-On feature. 

NO 
specifies that the terminals are not equipped with the Motor-On feature. NO is 
assumed if this operand is omitted. 



| |MONDLY=nn] 
| [mONDLY=15J 



nn 
specifies the number of Mark Characters corresponding to a 1.5-second time-out 
when the terminal is not equipped with the optional Motor-On feature. MONDLY=10 
corresponds to 50-baud service, MONDLY=15 corresponds to 75-baud service, and 
MONDLY=20 corresponds to 100-baud service. When this operand is omitted or nn 
exceeds 20, MONDLY=15 is assumed. 



[~IAM=YES] 
[lAM=NO j 



YES 
specifies that the terminal can ask for the computer identification sequence by 
sending FIGS D. 

NO 
specifies that the terminal cannot ask for the identification sequence of the 
computer. NO is assumed if this operand is omitted. 

L 

Figure 7 (Part 4 of 5) . Keyword Operands for the BTAM DCB Macro Instruction 
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r 

| Keyword Operand and Description (part 5 of 5) 



WRU=YES 
WRU=NO 



YES 
specifies that by sending FIGS D, either the computer or the terminal can ask for 
the identification sequence of the other. When WRU=YES is specified, IAM=YES is 
assumed. 

NO 
specifies that the computer cannot ask for the identification sequence of the 
terminal. NO is assumed if this operand is omitted. 



EOM=WRU 

EOM=X'hh' 

EOM=X'hhlF' 

WRU 
specifies that the end-of-message signal is the WRU signal. 

X'hh' 
specifies that FIGS x is used as the EOM signal. 1 hh is the hexadecimal repre- 
sentation of FIGS x set in the adapter. 

X'hh IF' 
specifies that FIGS y LTRS is used as the EOM signal. 1 hh is the hexadecimal 
representation of FIGS y set in the adapter. WRU is assumed if this operand is 
omitted. 



EOT=2EOM 
EOT^X'hhlF' 

2 EOM 
specifies that two consecutive EOM signals will be recognized by BTAM as end-of- 
transmission, except when IAM=YES and EOM=WRU are specified. 

X'hh IF* 
specifies that FIGS y LTRS is used as the EOT signal. 1 Therefore, EOM=X'hhlF* 
cannot be specified for the EOM signal. 

Note : A time-out is also recognized as EOT. Moreover, two consecutive EOM sig- 
nals are always recognized as an EOT signal, except when IAM=YES and EOM=WRU are 
specified. 



*-x and y are the values assigned by the user and set in the adapter at the time of 
installation of the equipment. 

i 

Figure 7 (Part 5 of 5) . Keyword Operands for the BTAM DCB Macro Instruction 
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Displacement 
Hex Dec r — — 



T T ** T 

I I I I 

10 16 I DCBBQFLG I DCBWTEOM I DCBWTEOT I DCBWTPAD 
I I I I 



14 


20 


18 


24 


1C 


28 


20 


32 


24 


36 


28 


40 


2C 


44 


30 


48 


28 


40 


2C 


44 


30 


48 


30 


48 



r T 

I DCBBUFNO I DCBBUFCB 



I DCBBUFL 
(. 



DCBDSORG 



| DCBDEVTP | DCBIOBAD 

H X r 

| DCBBFTEK j DCBERROP j DCBBUFCT 
h x x 

j DCBEIOBX j DCBEXLST 

C X 



DCBDDNAM 



T T 

DCBOFLGS j DCBIFLG j DCBMACR 

X X 



| DCBTIOT 

h 
I 

I 



j DCBMACRF 



DCBIFLGS I DCBDEBAD 



DCBOFLGS | 

J 



DCBREAD, DCBWRITE 



34 52 j DCBLERB 



38 56 
3C 60 
40 64 



38 


56 


3C 


60 


40 


64 


44 


68 


48 


72 


4C 


76 


50 


80 


54 


84 


60 


96 


Figure 



| DCBXCODE | 
.X X. 



DCBBSTSX 



-H 



(reserved) 



DCBXMODE | DCBXCODE 
DCBBSTSX | DCBBSSTX 
1DCBBSAK0 



DCBBSENQ | DCBBSNAK 
x 

DCBBSEOT j DCBBSSYN 

X 



DCBBSONL 
DCBBSRVI 






DCBBSRSV | DCBBSWBT 

DCBBSTEX J DCBBSETX 

DCBBSAK1 



DCBBSETB | DCBBSDLE 
X 1 

DCBBSTBE | DCBBSTEB 

X 



DCBBSSAK 

(reserved) 



(reserved) 



World Trade Telegraph 
Interface (before and 
after Open 



Common 
Interface 



Foundation Extension 



Foundation 

before 

Open 



Foundation 

After 

Open 



BTAM 
Interface 



BSC 

Interface 
(before Open) 



BSC 

Interface 
(after Open) 



8. Format of Data Control Block (DCB) 
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I Field 

h 

DCBBQFLG 
DCBWTEOM 
DCBWTEOT 
DCBTPAD 



DCBBUFNO 
DCBBUFCB 
DCBBUFL 



DCBDSORG 
DCBDEVTP 
DCBIOBAD 
DCBBFTEK 
DCBERROP 
DCBBUFCT 

DCBEIOBX 
DCBEXLST 
DCBDDNAM 
DCBOFLGS 

DCBIFLG 

DCBMACR 

DCBTIOT 

DCBMACRF 

DCBIFLGS 

DCBDEBAD 

DCBOFLGS 

DCBREAD/DCBWRITE 

DCBLERB 

DCBXMODE 

DCBXCODE 

DCBBSRSV 

DCBBSWBT 

DCBBSTSX 

DCBBSSTX 

DCBBSTEX 

DCBBSETX 

DCBBSAKO 

DCBBSAK1 

DCBBSENQ 

DCBBSNAK 

DCBBSETB 

DCBBSDLE 

DCBBSEOT 

DCBSSYN 

DCBBSTBE 

DCBBSTEB 

DCBBSONL 

DCBBSSAK 

DCBBSRVI 



j Contents 

+ 

World Trade telegraph flag byte. 

The EOM character (WT terminals) . 

The EOT character (WT terminals). 

Number of pad (LTRS) characters required for motor-on delay (WT 

terminals) . 

Number of buffers, obtained during open for this DCB. 

Address of buffer control block. 

Buffer length (length of buffers to be obtained during open for a 

BTAM-provided buffer pool or the buffer length to be used if the 

length parameter of a READ or WRITE macro instruction is coded as 'S* 

or both) . 

Data set organization (bit 3=1 for BTAM). 

Index to the device entry in Device I/O directory. 

Input/output block (IOB) address. 

Buffering technique (bit 4=1 indicates dynamic buffering). 

Error recovery procedures defined by DCB EROPT operand. 

Maximum number of buffers to be obtained by BTAM for a Read or Write 

operation (dynamic buffering). 

Extended IOB index. 

Address of a user-provided exit list. 

DD name of the line group data set. 

Flags used during open and checked by programmer to determine whether 

the data set has been opened. 

Flags used by the Input/Output Supervisor (IOS) . 

Macro instruction reference. 

Pointer to the DD entry in task I/O table. 

Same as DCBMACR. 

Same as DCBIFLG. 

Address of the associated Data Extent Block (DEB). 

Same as DCBOFLGS above. 

Address of the Read/Write module. 

Address of the line error recording block (LERB) . 

Transmission mode for BSC lines. 

Transmission code for BSC lines. 

The DLE character.^ 

(reserved) 

DLE character. 

STX character. 

DLE character. 

ETX character. 

ACK-0 sequence 1 . 

ACK-1 sequence 2 . 



Hexadecimal representation 

of 

transmission 

code 



ENQ character. 
NAK character. 
ETB character. 
DLE character. 
EOT character. 
SYN character. 
DLE character. 
ETB character. 
SOH % characters 
WACK sequence 3 . 
RVI sequence 44 . 



^ACK-O is two characters: DLE X'70* (EBCDIC), DLE (USASCII), or DLE - 

(TRANSCODE) . 
2 ACK-1 is two characters: DLE / (EBCDIC), DLE 1 (USASCII), or DLE T (TRANSCODE). 
3 WACK is two characters: X'lOeB' (EBCDIC), X'lOaB* (USASCII). 
*»RVI is two characters: X'107C (EBCDIC), X'lOac* (USASCII). 



Figure 9. Contents of DCB Fields 
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DEFINING AND MODIFYING TERMINAL LISTS 

A terminal list is a table from which BTAM 
obtains the information it needs to estab- 
lish contact with a remote station when you 
issue a READ Initial or WRITE Initial macro 
instruction (and occasionally other types 
of READ and WRITE macro instructions). 
This information consists of telephone num- 
bers (dial digits) , polling and addressing 
sequences, and identification sequences 
which can be sent to remote stations or 
against which an incoming sequence can be 
checked to ensure that contact has been 
established with a valid station. 

There are several kinds of terminal 
lists, having different names and formats. 
For example, a polling list is one kind of 
terminal list; it is used for supplying the 
polling sequences BTAM needs to activate 
certain kinds of remote stations. Another 
kind is a dial list, used in operations 
over switched lines. Appendix A shows the 
formats of terminal lists and gives 
examples of what they contain. 

Two macro instructions, DFTRMLST and 
CHGNTRY, provide the ability to define ter- 
minal lists and to modify existing lists. 

DFTRMLST (Define Terminal List) Macro 
Instruction 

DFTRMLST generates a terminal list having 
the format and contents required by the 
type of station and kind of communication 
line involved in the Read or Write opera- 
tion that uses the list. The macro 
instruction specifies the format and pro- 
vides telephone numbers, polling or ad- 
dressing characters, and identification 
sequences, as required by the Read or Write 
operation. 

Described below are each of the operands 
that may be coded in a DFTRMLST macro 
instruction; only a few of these are coded 
for a particular list. To determine which 
ones to code for a particular Read or Write 
operation, see the discussion on terminal 
lists for the particular type of remote 
station or line configuration for which the 
terminal list is required in the sections 
"Start-Stop Read and Write Operations" and 
"BSC Read and Write Operations." 

A separate DFTRMLST macro instruction 
must be issued for each list to be defined. 
Appendix A illustrates the formats of 
various kinds of lists, with examples. 

Notes : The DFTRMLST macro instruction is 
not used for the local 3270 display system. 

For more information about the DFTRMLST 
macro instinct ion for the remote 3270 dis- 
play system, see "Defining Terminal Lists" 



under the heading "Defining and Modifying 
Terminal Lists" in the section "IBM 3270 
Information Display System — Programming 
Considerations . " 

r r r 1 

| Name | Operation! Operand | 

t x x + 

I symbol j DFTRMLST | list type, | 

| | | device- dependent j 
| | | operands j 

u. x x 1 

list type 

specifies the format of the terminal 
list. Code one of the following, as 
required by the remote station or line 
configuration involved: 

OPENLST (start-stop, BSC; multipoint line) 
generates an open polling list (for 
programmed polling of start-stop ter- 
minals) or an addressing list (for ad- 
dressing of start-stop or BSC 
stations) . 

WRAPLST (start-stop; multipoint line) 

generates a wraparound polling list 
(for programmed polling). 

SSALST (start-stop; multipoint line) 

generates an open polling list for 
Autopoll operations. 

SSAWLST (start-stop; multipoint line) 

generates a wraparound polling list 
for Autopoll operations. 

DIALST (start-stop, BSC; switched line 

except for switched 3275) 

generates a Calling list or an answer- 
ing list. 

IDLST (start-stop [TWX only] ; switched 

line) 

generates a calling list or an answer- 
ing list with ID verification. 

BSCLST (BSC; switched line) 

generates a calling or an answering 
list (for switched lines), with ID 
verification. This kind of list spe- 
cifies an identification sequence to 
be sent to a remote BSC station and 
specifies what identification sequence 
will be accepted from a remote BSC 
station. 

AUTOLST (BSC; multipoint line) 

generates an open polling list for 
Autopoll operations. 

AUTOWLST (BSC; multipoint line) 

generates a wraparound polling list 
for Autopoll operations. 

WTTALST (start-stop (WT telegraph only] ; 
nonswitched point-to-point line) 
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generates a World Trade telegraph ter- 
minal list containing the identifica- 
tion sequence expected from a remote 
station and the identification to be 
sent to the remote station when trans- 
mission begins. 



WTLIST (BSC; switched line) 

generates a terminal list to be used 
for Read and Write operations involv- 
ing manual dialing of a remote station 
or manual answering of calls from 
remote stations, where the expanded ID 
verification facility is not to be 
used (that is, when only one unique ID 
sequence is to be accepted from any 
remote station that calls or is called 
by the central computer) . 



SWLST (BSC; switched line) 

generates a terminal list to be used 
for Read and Write operations involv- 
ing automatic or manual dialing of a 
remote BSC station or automatic an- 
swering of calls from remote BSC sta- 
tions, where the expanded ID verifica- 
tion facility is to be used (that is, 
when any of several authorized ID 
sequences is to accepted from a remote 
station) . 

device-dependent operands 

specify the information to be placed 
in the list. Parenthesized sublists 
separated by commas are required if 
more than 255 characters. 

xx 

two hexadecimal digits representing 
the transmission bit pattern of a 
single polling or addressing charact- 
er. Example: 62 (representing the 
polling character A in transmission 
code (1030]). 

xxyy 

four hexadecimal digits representing 
the transmission code bit patterns of 
a two-character polling or addressing 
sequence. Example: E202 (represent- 
ing the polling characters Al in 
transmission code [1050]). 

dialcount 

one or two decimal digits representing 
the number of dial digits in the tele- 
phone number of the remote station to 
be called. Example: 7. 

dialchars (numeric only) 

the digits of the telephone number to 
be dialed. Example: 5672022. 

numrec 

one or two decimal digits representing 
the number of characters in an identi- 
fication expected from a remote 
station. 



ridseq 

hexadecimal digits representing the 
transmission code bit patterns of the 
identification sequence to be 
received. 

numsent 

one or two decimal digits representing 
the number of characters in the iden- 
tification sequence to be sent to a 
remote station. 

tidseq 

hexadecimal digits representing the 
transmission code bit patterns of the 
identification sequence to be sent. 

numcnsent 

one or two decimal digits representing 
the number of characters in a terminal 
control sequence to be sent 'to a TWX 
station. 

cntrlseq 

hexadecimal digits representing the 
transmission code bit patterns of the 
terminal control sequence to be sent. 

length 

the number of characters composing a 
"data tone" (an audible signal to be 
sent to a remote station that calls 
the central computer) . Code this 
operand only for lists of the WTLIST 
type. (A sequence of X*FF' characters 
is recommended for the data tone.) 

area 

the address of the area containing the 
data tone character sequence. Code 
this operand only if you code the 
length operand. 

faaseq (2760 only) 

hexadecimal digits representing the 
transmission code bit patterns of the 
three- character frame change sequence 
(F,A 1 ,A 2 characters). 

Programming Note : The DFTRMLST macro 
instruction cannot define open or wra- 
paround lists of the OPENLST or WRAPLST 
types having more than 31 entries. If a 
larger list is required, you must define it 
yourself; see Appendix A for the required 
format . 

CHGNTRY (Change Terminal Entry) Macro 
Instruction 

CHGNTRY is used to cause BTAM to suspend or 
resume polling or addressing of a specific 
remote station or component represented by 
a terminal list entry or to change the 
value of a control byte in an answering 
list of the SWLST form. (CHGNTRY cannot be 
used to change the control byte value of a 
calling list of the SWLST form.) For a 
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programmed polling list or an addressing 
list, CHGNTRY sets the skip bit of the 
entry to one,, if polling or addressing is 
to be skipped; or sets the bit to zero, if 
polling or addressing is to be resumed. 
For an Autopoll polling list, CHGNTRY moves 
an entry to be skipped to the end of the 
list, so that all active entries appear at 
the beginning of the list and all entries 
to be skipped appear at the end of the 
list. CHGNTRY moves an entry to be reacti- 
vated back to its original position in the 
list. 

You must issue a separate CHGNTRY macro 
instruction for each list entry you wish to 
skip or activate or for each SWLST control 
byte value to be changed. 

You can change a terminal list entry 
only if the list is not currently in use by 
a Read or Write operation. You should 
therefore issue CHGNTRY only after making 
sure that no Read or Write operation is in 
progress on the line to which the list ap- 
plies. If you wish to change the list 
while wraparound polling is in progress, 
first issue a RESETPL macro instruction to 
terminate polling, then issue a CHGNTRY 
macro instruction for the entry to be 
changed. 

CHGNTRY cannot be used to modify a ter- 
minal list of the IDLST or BSCLST format. 

Note ; A special form of the CHGNTRY macro 
instruction is used for the local 3270 dis- 
play system. See "Attention Interruptions 
and Read Initial Operations" in the section 
"IBM 3270 Information Display System — 
Programming Considerations." 

r t t 1 

| Name | Operation | Operand | 

| + + ^ 

j [symbol] | CHGNTRY | listaddr,listype, | 

| j | list position, numchars, | 
| j | action | 

l x x j 

listaddr 

specifies the address of the first 
entry of the terminal list containing 
(1) the entry to be skipped or acti- 
vated or (2) the SWLST entry the con- 
trol byte value of which is to be 
changed. 

listype 

specifies the type of list, as coded 
in the DFTRMLST macro instruction that 
defined the list: OPENLST, WRAPLST, 
DIALST, SSALST, SSAWLST, AUTOLST, 
AUTOWLST, or SWLST. (IDLST, BSCLST 
and WTTALST are invalid operands.) 

listposition 

specifies the original relative posi- 



tion in the list of the entry to be 
changed. Code a one if the first 
entry is to be changed, two if the 
second entry, etc. 



numchars 

specifies the number of polling or ad- 
dressing characters in each entry of 
the list. This operand may be omitted 
if listype is SSALST, SSAWLST, or 
SWLST. 

action 

specifies the action to be performed 
on the entry: 

• For listypes other than SWLST: 

SKIP 

indicates that polling or address- 
ing is to be suspended. 

ACTIVATE 

indicates that polling or address- 
ing is to be resumed. 

• For a listype of SWLST: 

The following operands specify the 
action to be performed when the ID 
ENQ sequence is received from a 
remote station on a Read Connect 
operation. 

ACTIVATE 

specifies that BTAM is to send the 
ID ACK-0 sequence contained in the 
idsent field of the answering list 
and then read a message block, if 
any. ACTIVATE sets the control 
byte to X'00 # . 

DISC 

specifies that BTAM is to send the 
disconnect signal (DLE EOT) and 
then break the line connection. 
(The two commands that perform 
this function are part of the Read 
Connect channel program.) BTAM 
then restarts the channel program 
at the Enable command to await a 
new call. DISC sets the control 
byte to X^Ol*. 

POST 

specifies that BTAM is to post the 
Read Connect operation complete. 
The user program then must take 
the appropriate action. POST sets 
the control byte to X , 02*. 



Return Codes : After you issue a CHGNTRY 
iracro instruction with a listype of SSALST, 
SSAWLST, AUTOLST, or AUTOWLST only, BTAM 
indicates the result of the operation, by 
means of a return code in register 15: 
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Code Meaning 

X'OO* The requested action was per- 
formed, or it was already per- 
formed (that is, polling or ad- 
dressing was already suspended or 
resumed) . 

X'0i»' The requested action was not per- 
formed, because the terminal list 
is in use by a Read or Write 
operation. 

X'08* The requested action was not per- 
formed, because the value coded 
in the listposition operand 
exceeded the number of entries in 
the list (that is, no such entry 
exists) . 
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BUFFER MANAGEMENT 



This chapter describes how to construct 
buffer pools, obtain buffers through both 
programmer buffering and dynamic buffering, 
and release buffers after use. Dynamic 
buffering for Read and for Write operations 
is differentiated. 



CONSTRUCTING BUFFER POOLS 

If you intend to use buffers for holding 
input and output messages, a buffer pool 
must be constructed in one. of several ways, 
as illustrated by Figures 10 through 13. 
(Only those operands of concern in con- 
structing buffer pools are shown.) The 
BUILD, GETMAIN and GETPOOL macro instruc- 
tions mentioned below are fully explained 
in OS/VS Data Management Services Guide and 
OS/VS Supervisor Services and Macro 
Instructions . 

Using the BUILD Macro Instruction 

First, reserve a storage area during 
assembly using DC or DS instructions, or 
issue a GETMAIN macro instruction to obtain 
the space. The area must begin on a full- 
word or doubleword boundary and must con- 
tain enough space for an eight-byte buffer 
control block and the number of buffers 
needed. 

Then issue a BUILD macro instruction 
specifying the number of buffers, their 
length, and the address of the area 
reserved during assembly or obtained by the 
GETMAIN macro (GETMAIN provides the 
address, in a register, of the area it has 
obtained). The BUILD macro constructs the 
ouffer control block and the buffer chain. 

The length of each buffer must be four 
bytes longer than the length of the data to 
be placed in the buffer, because BTAM uses 
the first four bytes of each buffer as a 
link field containing the address of the 
next buffer. If this caution is not 
observed, the data, when placed in the buf- 
fers, may overlay the link field, which 
destroys the link addresses and thus causes 
loss of data. 

In the DCB macro instruction for each 
line group that is to use this buffer pool, 
specify the address of the buffer control 
block (BUFCB operand) . 

Figures 10 and 11 show examples that use 
DS statements and the GETMAIN macro. 



Using the GETPOOL Macro Instruction 

You may issue a GETPOOL macro instruction 
either before opening the data control 
block to be associated with this buffer 
pool or during the DCB exit routine. In 
the GETPOOL macro instruction specify the 
address of the data control block and the 
number and length of the buffers you need. 
You roust also specify the buffer length in 
the DCB macro instruction (BUFL operand) . 

GETPOOL obtains sufficient storage to 
accommodate the pool, structures the buffer 
control fclock and the buffer chain, and 
places the buffer control block address in 
the data control block (see Figure 12). 

BTAM Construction of Buffer Pools 

If you wish BTAM to provide the buffer pool 
automatically, you simply specify the num- 
ber of buffers (BUFNO) and their length 
(BUFI) in the DCB macro instruction for the 
line group that is to use the buffer pool. 
During the opening of the data control 
block, BTAM uses OS/VS data management 
facilities to obtain storage for the buffer 
pool and then structures it (see Figure 
13). 

After a buffer pool has been con- 
structed, you can either request buffers 
yourself before the Read or Write operation 
that uses them (programmer buffering), or 
let BTAM obtain them automatically (dynamic 
buffering) . 



PROGRAMMER BUFFERING 

To obtain buffers yourself, issue a REQBUF 
macro instruction, specifying how many you 
need. Then check the return code in regis- 
ter 15 to determine whether all of the buf- 
fers you requested, some of them, or none 
of them are available to you. If any are 
available, REQBUF provides, in a register 
you have designated, the address of the 
first buffer. Simply specify this address 
in the READ or WRITE macro instruction. In 
the case of a WRITE macro instruction, you 
move the message to be written into the 
buffers, beginning at the address of the 
first buffer. 

In moving an output message into a buf- 
fer chain, remember that each buffer begins 
with a fullword link field. You must fill 
each buffer individually, inspecting the 
link field each time to learn the location 
of the next buffer. The address of the 
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BUILD BFRPOOL, 20,100 
OPEN ( LINEGP1 , , LINEGP2 ) 



BUILD BUFFER POOL 
OPEN LINE GROUPS 



| J 



ENDJOB 



CLOSE 



RETURN 
LINEGP1 DCB 
LINEGP2 DCB 
BFRPOOL DS 

DS 



(LINEGP1,,LINEGP2) 



BUFL=1 , BUFCB=BFRPOOL , 
BUFL=100 , BUFCB= BFRPOOL, 
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Figure 10. Constructing Buffer Pools Using DS and BUILD 
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Figure 11. Constructing Buffer Pools Using GETMAIN and BUILD 
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Figure 12. Constructing Buffer Pools Using GETPOOL 
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ENDJOB CLOSE (LINEGP1, , LINEGP2) CLOSE LINE GROUPS 

RETURN 
LINEGP1 DCB BUFL=100,BUFNO=10 SPECIFY BUFFER LENGTH 

LINEGP2 DCB BUFL=120,BUFNO=8 

l . 

Figure 13. Constructing Buffer Pools Automatically 



buffer, plus four bytes, yields the address 
where the message data should begin. 

After you issue a REQBUF macro instruc- 
tion, the return code in register 15 may 
indicate that only some of the buffers you 
requested are available or that none of 
them are available. 

If some buffers are available, they are 
assigned to you. The address of the first 
one is in the register you designate, and 
register indicates how many of the buf- 
fers that you requested were unavailable. 

The action you take when the full number 
of buffers is not available depends on your 
application. Either use the number of buf- 
fers supplied (if any) and issue another 
REQBUF for the remainder; or, issue a 
RELBUF macro instruction to release the 
ones supplied to you and reissue the REQBUF 
for the original number of buffers you 
requested. If the insufficient-buffer con- 
dition occurs infrequently, the cause is 
probably a momentary peak of activity on 
several lines at once. In this case, you 
will most likely obtain the buffers you 
need the next time you issue the REQBUF 
macro instruction. On the other hand, fre- 
quent recurrence of this condition indi- 
cates that you should increase the number 
of buffers in the pool, as the amount of 
transmission activity on the lines using 
the pool exceeds the present capacity of 
the pool. 

DYNAMIC BUFFERING 

To be able to use dynamic buffering for 
a line group, you must specify BFTEK=D in 
the DCB macro instruction for the line 
group. Because channel programs differ for 
dynamic buffering and programmer buffering, 
and all lines in a line group use the same 
channel programs, you must use either 
dynamic buffering or programmer buffering 
for all lines in the group; you cannot use 
dynamic buffering for some lines, and pro- 
grammer buffering for others. 

Note : Dynamic buffering cannot be used for 
the local 3270 display system. If dynamic 
buffering is specified, the specification 
is ignored . 



For VS2 Release 2, dynamic buffering 
requires running in real mode (ADDRSPC= 
REAL on the JOB or EXEC statement) . If you 
try to run in virtual mode with dynamic 
buffering, abend code 99 is issued. 

Read operations and Write operations 
employ dynamic buffering somewhat 
differently. 



READ OPERATIONS 

The first buffer for a Read operation may 
be obtained in one of two ways': either you 
supply the buffer yourself, by giving its 
address in the area operand of the READ 
iracro instruction, or you let BTAM provide 
the first buffer by coding *S* as the area 
operand. BTAM places the address of the 
first buffer it obtains in the DECAREA 
field of the DECB for the line. This tells 
you where the received message begins. 
Regardless of which method you choose, BTAM 
automatically obtains all subsequent buf- 
fers needed to contain the data being 
received. If you provide the first buffer 
yourself, BTAM automatically places the 
address of the first buffer it provides in 
the first fullword of your buffer and 
reads data into your buffer beginning at 
the second fullword. 

An advantage of supplying the first buf- 
fer yourself is that it need not be a buf- 
fer from the buffer pool; it can be an area 
you have defined in your program as the 
place where all incoming messages begin; 
this affords you the convenience of always 
beginning your message processing at the 
same main storage address. Another advan- 
tage is that this area can be small com- 
pared to the size of your buffers, allowing 
short messages to be read into this small 
area rather than into a regular buffer. 
Improved buffer utilization results, espe- 
cially when the pool consists of a small 
number of large buffers. 

After each buffer is full, it is posted 
complete. The first word of each buffer is 
treated as an event control block (ECB) . A 
completion code is set in the high-order 
byte of the ECB, and the address of the 
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next buffer is placed in the three lew- 
order bytes. 

The user program may wait for the entire 
message block to be read by issuing a WAIT 
macro instruction for the primary ECB, in 
the same manner as is done without dynamic 
buffer allocation. Alternatively, the user 
program may wait for each buffer to be 
posted complete. This is accomplished by 
obtaining the address of the first buffer 
from the DECAREA field of the DECB and 
using that address as the ECB address in 
a WAIT macro instruction. After the first 
wait completes, the user program may 
obtain the address of the second buffer 
from the chain address field of the first 
buffer and issue a WAIT macro instruction 
for the second buffer. Succeeding buffers 
are waited for in a similar manner. After 
each buffer completes, the user program 
must check for a zero chain address, which 
indicates that it is the last buffer in 
the chain . 

As the Read operation progresses, BTAM 
obtains buffers successively until it 
detects the receipt of an ending character 
such as ETB, ETX, or EOT. When this 
occurs, BTAM does not obtain any more buf- 
fers. If by the time the ending character 
is received BTAM has obtained another buf- 
fer, BTAM releases that buffer automati- 
cally, unless the ending character is in 
the last byte of the current buffer. In 
this event, you must release the extra buf- 
fer yourself. You can check for this con- 
dition in one of two ways. 

1. Compare the residual count in the 
DECCOUNT field against the buffer 
length in the DCBBUFL fie-ld minus 
four. If count and length-minus-f our 
are equal, the last buffer BTAM 
obtained for the Read operation is 
unused. (This method cannot be used 
if the Read operation includes the 
Reset function, for example, the Read 
Initial and Reset (TIR) option.) 

2. Test the last byte of the next-to-last 
buffer for an appropriate ending char- 
acter. If one is present, the last 
buffer is unused. 

When you detect an unused buffer, 
release it with a RELBUF macro instruction 
and place zeros in the low-order three 
bytes of the high-order word of the next- 
to-last buffer (that is, the one containing 
the ending character), to indicate that 
this buffer is the last one in the chain. 
If you are waiting for buffers, do not 
release the unused buffer until it is 
posted. 

In the channel programs for Read opera- 
tions using dynamic buffering, each Read 
Text command is followed by a Read Skip 



command. When the Read Text command is 
executed, a program controlled interruption 
(PCI) occurs. This causes BTAM to obtain 
another buffer, place its address in the 
next Read Text command, and change the Read 
Skip command to a transf er-in-channel (TIC) 
command pointing to the next Read Text com- 
mand. When the first buffer is filled, 
incoming data begins filling the buffer 
just obtained. The same action occurs as 
each Read Text command is executed. 

The action just described represents the 
normal case in which BTAM is able to obtain 
the next buffer in time to receive data 
from the line. Occasionally, however, BTAM 
itay be unable to obtain the next buffer in 
time. Should this occur, the Read Skip 
command following the Read Text command 
remains unchanged. The Read Skip receives, 
but does not place in main storage, all 
data received from the line after the cur- 
rent buffer is full. In this way, the line 
is cleared of incoming data. The Read 
operation ends when BTAM detects an ending 
character, posts the operation as normally 
completed (X'7F') in the event control 
block (DECSDECB) , and turns on bit U of 
CECFLAGS to indicate that part of the 
incoming message has been lost in the man- 
ner described. By checking this bit after 
each Read operation using dynamic buffer- 
ing, you can detect the condition and take 
appropriate action; normally, you would 
release the buffers and send a negative 
response in reply to the message, causing 
the remote station to resend it. 

As indicated under "Programmer Buffer- 
ing," frequent unavailability of buffers 
may be caused by a buffer pool that is too 
small to satisfy the demands made upon it. 
Increasing the number of buffers should 
solve the problem. 

Caution : If the CPU is stopped while 
operations involving dynamic buffering are 
in progress, message data may be lost, as 
the program- controlled interruptions (PCI) 
required to obtain successive buffers are 
not handled when the CPU is stopped. 



WRITE OPERATIONS 

Whereas in Read operations the main storage 
locations of individual buffers are unknown 
to the programmer until BTAM links them 
into a chain, in Write operations the chain 
must already have been formed from buffers 
whose locations and contents are known to 
the programmer. You must, therefore, 
always specify in the Write operation the 
address of the first buffer in the chain 
whose contents are to be transmitted. As 
the Write operation progresses, BTAM pro- 
vides to the operation the address of each 
of the remaining buffers in the chain. 
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Normally, you will have obtained the 
buffers for the Write operation by means of 
a REQBUF macro instruction; or you will 
have obtained them dynamically during a 
preceding Read operation, when you wish to 
send the same data you received during the 
Read. A Write operation ends when BTAM 
detects an ending character or when all the 
data in the last buffer has been trans- 
mitted, whichever occurs first. The length 
you specify in the WRITE macro instruction 
must be great enough to encompass the num- 
ber of characters in the last buffer, 
including the ending character or character 
sequence. For write operations using 
dynamic buffering, the ending character 
must be in the last buffer in the chain. 



After each buffer is transmitted, it is 
posted complete, in the same manner as for 
Read operations. The user program may wait 
either for the entire message block to be 
transmitted or for each buffer, in the same 
manner as for Read operations. After the 
message is successfully transmitted, the 
buffer chain can be returned to the pool 
with the RELBUF macro instruction. 



dcbaddr 

specifies the address of the data con- 
trol block with which the buffer pool 
is associated. 

returnreg 

specifies a general register (2 
through 12) into which you wish BTAM 
to return the address of the first 
buffer to be provided. 



count 



specifies the number of buffers you 
are requesting. 

If you specify one of the registers 2 
through 12, you must previously have 
loaded the count into the low-order 
byte of that register; the high-order 
bytes are ignored. 

If you specify register 0, you must 
previously have loaded the count into 
the high-order byte of the register; 
the low-order bytes must contain zero. 

If you omit this operand, BTAM pro- 
vides one buffer, that is, the link 
field contains zero. 



BUFFER MANAGEMENT MACRO INSTRUCTIONS 

REQBUF (Request Buffer) Macro Instruction 

REQBUF is used to obtain one or more buf- 
fers from a buffer pool that has been con- 
structed before or during opening of a line 
group data set. 

When you are using programmer buffering, 
you may issue a REQBUF macro instruction to 
obtain one or more buffers in which data 
can be received from a line (Read opera- 
tions) or in which to build or move an out- 
put message (Write operations). 

When you are using dynamic buffering, 
BTAM automatically obtains buffers for Read 
operations, so you do not issue a REQBUF 
macro instruction to obtain them. For 
Write operations, however, use of REQBUF is 
the same as for programmer buffering. 

The buffers provided are not necessarily 
in consecutive storage locations. They are 
chained together, the link field of each 
containing the address of the next. The 
link field of the last buffer in the chain 
contains zeros. 



i t r 1 

| Name | Operation | Operand | 

|. + + 4 

| ( symbol ] | REQBUF | dcbaddr, returnreg , | 
| j J (count] | 

l x x j 



Return Codes ; After you issue a REQBUF 
vacro instruction, the low-order byte of 
register 15 contains a return code indicat- 
ing the result of the buffer request. (The 
three high-order bytes of the register con- 
tain zeros.) The return code, in hexadeci- 
mal notation, is one of the following: 

00 Normal return . BTAM has provided the 
total number of buffers you 
requested. The return register con- 
tains the address of the first one. 

04 Partial fulfillment of request . You 
requested more buffers than are cur- 
rently available in the pool. All 
those available were provided. The 
return register contains the address 
of the first one. 

08 No buffers available . The buffer 

pool had been exhausted at the moment 
of your request. The return register 
and register contain zero. 

0C No buffer pool . The request cannot 
be filled, because no buffer pool is 
associated with the data control 
block you have specified in the macro 
instruction. 

10 No buffer routine . The request can- 
not be filled because the BTAM buffer 
management routine has not been 
included in your program. (The rou- 
tine is automatically included if you 
have specified BFTEK=D in the DCB 
macro or if the data control block 
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contains the address of a buffer con- 
trol block- ) 

Programming Notes : If the buffer request 
was partially filled (return code is 04) , 
the low-order byte of register contains 
the count of the number of buffers not pro- , 
vided. (The three high-order bytes contain 
zeros. ) 

When the REQBUF macro instruction is 
used for the local 3270 display system, an 
entire message must fit into one buffer. 

RELBUF (Release Buffer) Macro Instruction 

RELBUF is used to return to the buffer pool 
one or more buffers obtained by a REQBUF 
macro instruction or automatically during 
dynamic buffering. Failure to issue this 
macro instruction following Read and Write 
operations for which buffers have been 
obtained will ultimately result in exhaus- 
tion of the buffer pool. RELBUF releases 
each buffer in the chain, beginning with 
the one whose address you specify and end- 
ing with the one whose link field contains 
zero (that is, the last buffer). 

r t t 1 

| Name | Operation | Operand | 

,. + + < 

j [symbol] j RELBUF | dcbaddr,buf f eraddr | 
i x a j 

dcbaddr 

specifies the address of the data con- 
trol block associated with the buffer 
pool to which the buffers are to be 
released. 

bufferaddr 

specifies a general register (2 
through 12) into which you must pre- 



viously have placed the address of the 
first buffer to be released. 

Return Codes ; After you issue a RELBUF 
iracro instruction, the low-order byte of 
register 15 contains a return code indicat- 
ing the result of the operation. (The 
three high-order bytes of the register con- 
tain zeros.) The return code, in hexadeci- 
mal notation is one of the following: 

00 Normal return : The specified buffers 
have been returned to the pool. 

04 Already returned : The first buffer 
of the chain to be released has 
already been returned to the pool (or 
has never been obtained from the 
pool) . 

0C No buffer pool : The buffer release 
cannot be accomplished because no 
buffer pool is associated with the 
data control blocks you have speci- 
fied in the macro instruction. 

10 No buffer routine : The buffer 

release cannot be effected, because 
the BTAM buffer management routine 
has not been included in your 
program. 

Programming Note : If you wish to release a 
different number of buffers than you 
obtained by a REQBUF macro or by dynamic 
buffering (assuming the first buffer to be 
released is the same as the first buffer 
that was obtained) , you will have to place 
zeros in the link field of the last buffer 
you wish returned. Be sure to retain the 
address of the buffer that follows the last 
one you return, since it will become the 
first of the remaining buffers in the orig- 
inal chain. 



30 OS/VS BTAM SRL 



CODE TRANSLATION 



As pointed out in the first chapter in the 
discussion of how information is repre- 
sented in various parts of a teleprocessing 
system, it is the programmer's responsibil- 
ity to perform code conversion between 
transmission code and the internal code of 
the central computer, if the application 
requires it. 



BTAM provides a translation routine and 
a set of translation tables that convert 
between EBCDIC and the transmission code or 
codes employed by the types of remote sta- 
tions supported by BTAM. Some terminal 
types can be furnished with any of several 
character sets; BTAM provides translation 
tables for the more common sets. (In most 
cases the sets vary by only a few charac- 
ters.) When a remote station in your con- 
figuration uses a character set not direct- 
ly supported by a BTAM- provided translation 
table, you can easily modify an existing 
table to accommodate that station. Alter- 
natively, you can define an entirely new 
table (but you must not give it the same 
name as a BTAM-provided table) . You must 
format any table you define according to 
the requirements of the System/370 transl- 
ate (TR) instruction. 

If you wish to refer to a BTAM-provided 
translation table after assembling it into 
your program (for example, to modify the 
table by means of an MVC instruction or to 
use it in conjunction with the TR instruc- 
tion) , you must refer to the table by the 
name IECTxxxx, where the x*s represent the 
f our-character table name as shown in 
Figure 14. In referring to the table with 
the TRNSLATE macro instruction, however, 
you need specify only the four- character 
table name. Figure 14 lists the transla- 
tion tables provided by BTAM. 

At the end of this publication are two 
sets of code tables. Appendix H is a code 
correspondence chart that shows for each of 
the 256 EBCDIC bit patterns the correspond- 
ing character (and its transmission code 
bit pattern) to or from which the BTAM- 
provided translation tables convert the 
EBCDIC character. Full understanding of 
this chart requires that you read the 
explanatory material preceding it. 

Appendix I shows for each of the 256 
possible bit patterns in a System/370 byte 
the character represented by that pattern 
in each of the transmission codes and in 
EBCDIC. This chart is useful in interpret- 
ing the contents of main storage locations. 



ASMTRTAB (Assemble Translation Table) Macro 
Instruction 

ASMTRTAB assembles into a program one or 
more BTAM-provided translation tables. You 
iray code all table names in one ASMTRTAB, 
and you need code only one ASMTRTAB regard- 
less of the number of lines and line groups 
for which the table is needed. Code the 
oracro instruction among the program con- 
stants, not in the middle of executable 
code. 

Note ; The ASMTRTAB macro instruction is 
not used for the local 3270 display system. 

r -t r t 

(Name | Operation | Operand | 

^ + + 1 

| (Omit) (ASMTRTAB | tablename, . . . | 

L X X I 

tablename 

specifies the BTAM-provided transla- 
tion table or the table you wish to 
assemble into your program. Code any 
table name listed in Figure 14. Tatle 
names may be coded in any sequence. 

Example ; If you wish to perform code 
translation between EBCDIC and 1030 code, 
and between EBCDIC and TRANSCODE, code; 

ASMTRTAB RC30,SD30,RC80 , SD80 

TRNSLATE Macro Instruction 

TRNSLATE translates data in main storage 
from transmission code to EBCDIC (for 
received data) or from EBCDIC to transmis- 
sion code (for data to be transmitted). 
Code TRNSLATE at each point in your program 
where translation is required. 

Note ; The TRNSLATE macro instruction is 
not used to translate between transmission 
code and EBCDIC for the local 3270 display 
system. 

r t t T 

I Name | Operation | Operand | 

|. x + 1 

| [symbol] | TRNSLATE | (dcbaddr] , tablename, | 
| | | area, length j 

L X X J 

dcbaddr 

specifies the address of the data con- 
trol block for the line group. This 
operand is required if you code the 
length operand as *S'; otherwise, it 
may be omitted. 
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tablename 

specifies the four- character name 
(for example, RC50) of the BTAM- 
provided translation table to be used, 
or the name of your own translation 
table. (You must have previously 
assembled the indicated table into 
your program.) 



area 



specifies the address of the storage 
area in which the data to be trans- 
lated is located. If dynamic buffer- 
ing is used for the line group 
involved, the address specified by 
area must be a fullword boundary. If 
you use TRNSLATE to translate a chain 
of buffers you have defined, those 



buffers must be formatted and chained 
just like BTAM- provided buffers: the 
first fullword of each buffer contains 
the address of the next buffer (except 
that the first fullword of the last 
buffer contains zeros) . Each buffer 
must begin on a fullword boundary. 



length 

specifies the number of bytes to be 
translated, from 1 to 32,767. If you 
wish to translate the contents of a 
chain of buffers, code *S' as the 
length operand. This causes the 
translate routine to use the buffer 
length given in the data control 
block. 



| Type of Remote Station 



Transmission Code 



Table Name 



For incoming messages: 
(Translation from trans- 
mission code to EBCDIC) : 

IBM 1030 

IBM 1050 

IBM 1060 
IBM 2260 

IBM 2740,2741 



IBM S/370 
IBM System/ 3 
IBM 2770 
IBM 2780 

Remote IBM 3270 

ATfiT 83B3, WU 115A 

WU TWX (Models 33,35) 

World Trade Telegraph 
Terminals 



EBCD/PTTC 
EBCD/PTTC 

BCD/PTTC 

USASCII 

BCD/PTTC 

EBCD/PTTC 

Correspondence code 

USASCII 

USASCII 

USASCII 

(USASCII 

(Six-bit Transcode 

USASCII 

Baudot code 

TWX Code 

(ZSC3 code 
{ ITA2 code 



RC30 

RC50 
RF50* 

RC60 

RSCI 

RB40 
RU40* 

RC40 
RF40* 

RC41 
RF41* 

RASA 

RASA 

RASA 

RASA 
RC80 

RASA 

RCT1 

RCT2 

RCT3 
RCTW 



Figure 14 (Part 1 of 2). Code Translation Tables Provided by BTAM 
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j Type of Remote Station 



j Transmission Code 



j Table Name 



J. 

| For outgoing messages 
| (translation from EBCDIC 
j to transmission code) : 


.-+ ._. 




_. + 4 


| IBM 1030 


| EBCD/PTTC 




| SD30 | 


| IBM 1050 


| EBCD/PTTC 




| SD50 | 


| IBM 1060 


| BCD/PTTC 




| SD60 | 


| IBM 2260 


| USASCII 




| SSCI | 


| IBM 2740,2741 


| (BCD/PTTC 

j< EBCD/PTTC 

| (correspondence 


code 


| SBUO | 
| SD40 j 
| SD41 j 


| IBM S/370 


| USASCII 




| SASA | 


| IBM System/ 3 


| USASCII 




| SASA | 


j IBM 2770 


| USASCII 




| SASA | 


| IBM 2780 


| USASCII 

| Six-bit Transcode 


| SASA | 
| SD80 j 


| Remote IBM 3270 


| USASCII 




| SASA | 


| AT6T 83B3, WU 115A 


| Baudot code 




| SCT1 | 


j WU TWX (Models 33,35) 


| TWX code (even- 


-parity) 


| SCT2 | 


j World Trade Telegraph 
| Terminals 


I/ZSC3 
| \ ITA2 




| SCT3 | 
| SCTW j 


r — -— — —_—-—_ — — -. 1 

11. Translation tables marked * convert both uppercase and lowercase alphabetic chara- | 
| cters to uppercase EBCDIC equivalents (for example, both A and a are converted to j 
| A) ; tables not so marked convert uppercase to uppercase and lowercase to lowercase | 
| (for example, A to A and a to a) . j 


|2. Transmission code abbreviations used above: j 
| BCD = binary coded decimal | 
| EBCD = extended binary coded decimal j 
| PTTC = perforated tape and transmission code j 
| USASCII = USA Standard Code for Information Interchange | 
1 ZSC3 = Figure Protected Code j 
j ITA2 = International Telegraph Alphabet Number 2 | 


|3. See "General Notes" in 


Appendix H for discussion of 


TWX Code parity. j 



Figure 14 (Part 2 of 2). Code Translation Tables Provided by BTAM 
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ACTIVATING AND DEACTIVATING THE TELEPROCESSING SYSTEM 



The operations performed by a user's tele- 
processing program preparatory to data 
transmission is called activating the sys- 
tem. Similarly, deactivating the system 
refers to the operations performed after 
all transmission has ceased. These opera- 
tions largely consist of opening (activat- 
ing) and closing (deactivating) the com- 
munications line group data sets. 



PROGRAM INITIALIZATION 

Before activating the teleprocessing system 
you must first perform the usual initiali- 
zation steps required of any program that 
runs under OS/VS. These are as follows: 

1. Using a SAVE macro instruction (or a 
Store Multiple instruction) , store the 
contents of the general registers you 
will use in your program in a register 
save area, the address of which is in 
register 13 upon entry to your 
program. 

2. Store the contents of register 13 in 
the second fullword of a save area you 
have defined in your program. 

3. Load the address of your program's 
save area into register 13. (Save 
areas are required by most system 
macro instructions. ) Unless you 
require register 13 for other pur- 
poses, you need to load it only at the 
beginning of your program. 



See Figure 15 for an example of the 
foregoing linkage. More detailed informa- 
tion on the use and format of register save 
areas and on linkage conventions is con- 
tained in OS/VS Supervisor Services and 
Macro Instructions and OS/VS Data Manage- 
ment Services Guide . 

In addition to these initialization 
steps, you should create dummy control sec- 
tions (DSECTs) for the data control blocks 
and data event control blocks in your pro- 
gram, to allow you to refer symbolically to 
fields in these control blocks. To create 
these DSECTs, use the DCBD and IECTDECB 
macro instructions as shown in Figure 16. 
If the teleprocessing system includes BSC 
stations, a second operand, DEVD=BS, must 
appear in the DCBD macro; similarly, if the 
system includes World Trade telegraph ter- 
minals, code the second operand as DEVD-WT. 
If the system includes both kinds of sta- 
tions, code DEVD=(BS,WT). 

Code the DCBD and IECTDECB macros at the 
end of the control section (CSECT) in which 
they appear. 



OPENING AND CLOSING LINE GROUP DATA SETS 

Before you can perform data transmission 
operations over a line, you must open, or 
activate, the line group data set encom- 
passing that line, by means of an OPEN 
iracro instruction. When you issue an OPEN 
macro instruction, an open routine estab- 
lishes and initializes various internal 
control blocks and loads from the system 



YOURPROG 


CSECT 






♦ 


SAVE 


(14,12) 


1. 


LR 


BASEREG,15 






USING 


YOURPROG , BASEREG 






ST 


SAVEREG , SAVEAREA* 4 


2. 


* 
BASER EG 


LA 


SAVEREG , SAVEAREA 


3. 


EQU 


12 




SAVEREG 


EQU 


13 





SAVE REGISTERS IN CALLING 
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Figure 15. Initializing Your Program 
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Figure 16. Establishing Addressability for 
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conditioning occurs for some other reason 
(for example, TCU malfunction), the fact 
that the line has not been opened becomes 
evident when the first READ or WRITE macro 
instruction issued for that line results in 
a return code of X"14'. For this reason, 
the user program should check for this 
return code after the first READ or WRITE 
macro instruction following opening of the 
line. 

BTAM provides the LOPEN (Line Open) 
iracro instruction for use in opening (that 
is, conditioning the line adapter for) a 
single line in a line group. LOPEN is 
intended for use following a return code of 



library those routines and tables needed 
for BTAM to construct the channel programs 
required by subsequent READ and WRITE macro 
instructions. The Open routine also "con- 
ditions" the communications line adapters 
within each TCU associated with the line 
group. Conditioning a line adapter makes 
the line attached to it ready for data 
transmission. 

The fact that you have issued an OPEN 
macro instruction does not guarantee that 
the line group is open. The DCB for the 
line group has a bit, called the Open flag, 
that you can check to determine whether the 
line group is open. The Open flag is bit 3 
of the DCBOFLGS field; if it equals one, 
che line group is open. 

If after you issue the OPEN macro in- 
struction, the Open flag is still zero, 
there is probably a coding error; most 
likely, the DD (data definition) card for 
the line group contains the wrong line 
group name. 

Even if the open flag is 1, one or more 
lines in the line group may not be ready for 
transmission because: the local control unit 
was powered off; a device attached to the 
control unit was inoperable; or the line 
adapter was not successfully conditioned. 

If this occurs because the TCU power is 
off or if the TCU is offline (remotes only) ; 
or the 3270 CU or device is inoperable, 
powered off or is offline the operating 
system prints, on the console, error message 
IEC804A, and enters wait state. This message 
identifies the condition and requests a 
response from the console operator. 

He replies; CONT. to retry this I/O 
operation possibly after correcting the 
error condition; POST to proceed with OPEN 
processing; DROP (Local 3270 ONLY) to proceed 
with OPEN processing without issuing the 
message for other devices in the line group. 

The DROP or POST option will allow the 
user application to proceed with operations 
on unaffected lines. IF unsuccessful 



Depending on your application, you may 
wish to open all line groups at once or to 
open different groups at successive inter- 
vals during the day. Opening line groups 
at different times would be appropriate, 
for instance, when the remote stations con- 
nected to one group are located in a dif- 
ferent time zone from those connected to 
another group. 

After completion of data transmission 
over all lines in a line group, you may 
close the line group by means of a CLOSE 
iracro instruction. If BTAM provided a buf- 
fer pool during opening of the line group 
(see the section "Buffer Management"), you 
must issue the CLOSE macro instruction only 
after you have no further use for the con- 
tents of any of the buffers in that pool. 
This is necessary because when you close 
the line group, BTAM relinquishes the main 
storage area occupied by the pool and 
various pointers to buffers no longer 
exist. 

OPEN Macro Instruction 

OPEN completes the initialization of the 
data control block representing the line 
group data set, builds a buffer pool if you 
specify in the DCB macro that this be done, 
and loads from the system library those 
routines and tables necessary for BTAM to 
construct the appropriate channel programs. 
As explained earlier, the Open routine also 
conditions each TCU line adapter connected 
to a line in the group. 

See Figure 17 for the format of the OPEN 
macro instruction. 

A single OPEN macro instruction can 
activate any number of line groups and any 
other data sets defined in your program, 
including those for other access methods. 



Example : To open two line group data sets 
and three BSAM data sets (one on magnetic 
tape, two on direct access devices) , you 
could code a single OPEN macro instruction 
as follows: 
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0PEN1 OPEN (LG1050,,LG27<»0,,TAPELOG, 
(OUTPUT) ,MSGFILE1, 
( INOUT, LEAVE) , MSGFILE2, 
(OUTPUT) ) 

LG1050 and LG27U0 are the two line group 
data sets; the second comma following each 
of these operands indicates the absence of 
volume-positioning option parameters, which 
are not appropriate for communications line 
groups. The remaining operands are repre- 
sentative of data set addresses and volume- 
positioning options for the three BSAM data 
sets. (See OS/VS Data Management Macro 
Instructions for information on coding OPEN 
macro instructions for nonline-group data 
sets. ) 

No return code is provided following an 
OPEN macro instruction; as explained earli- 
er, you should check the Open flag in the 
DCB to see whether the line group was suc- 
cessfully opened. 

LOPEN Macro Instruction 

LOPEN causes BTAM to issue commands that 
condition the TCU line adapter for a spe- 
cific line, when conditioning of the adapt- 
er was not successful during opening of the 
line group. It is appropriate to issue 
LOPEN after receiving a return code X'lU* 
following issuance of a READ or WRITE macro 
instruction for the line. LOPEN causes the 
appropriate command (Set Address, Set Mode, 
or Enable) to be sent to the line adapter. 

(LOPEN may also be used to reestablish 
data set synchronism for a line using an 
IBM 3977 Model 2 modem (data set) , as fol- 
lows. When the modem loses synchronism, 
transmission errors (that is, a NAK 
response from the remote station or a time- 
out error) occurs during Write operations. 
When errors of these kinds occur, it is 
appropriate to issue an LOPEN macro in- 
struction, which, by disabling the line and 
then enabling it or setting the mode, 
causes the modem to regain synchronism. ) 

r t t 1 

| Name | Operat ion | Operand | 

j. + x H 

I ( symbol ] | LOPEN | decbaddr j 

i jl x J 

decbaddr 

specifies the address of the data 
event control block associated with 
the line. 

Programming Note : You should not issue an 
LOPEN macro instruction from within a timer 
exit, since LOPEN uses the STIMER macro. 



Return Codes ; Upon return of control to 
your program, the low-order byte of regis- 
ter 15 contains a return code. Normal com- 
pletion is indicated by X'OO*. Abnormal 
completion is indicated by the following 
hexadecimal codes: 



04 The line was not successfully 
opened . 



08 The specified line is busy. 

0C The relative line number specified 
in the data event control block is 
larger than the number of lines in 
the line group. 

10 The DCB for the line group is not 
open. 

1H The request was rejected, because 

OLTEP was using the local 3270 
device. 

20 Local device is not 3270 device type 

Only the abnormal return codes, X'04' 
and X'14', can be encountered in a debugged 
user program; the other four result from 
program errors. If a code of X'04 1 is 
returned after you issue an LOPEN macro 
instruction, you may wish to notify the 
console operator that he should check the 
condition of the affected TCU. 



CLOSE Macro Instruction 

CLOSE terminates the availability of a line 
group data set, frees the storage space 
occupied by the buffer pool if the pool was 
constructed by the Open routine, and frees 
the storage space obtained by the Open rou- 
tine for control blocks. CLOSE also causes 
the fields in the data control blocks to be 
restored to the condition they were in 
before the DCB was opened. Just as OPEN 
causes the TCU line adapters associated 
with the line group to be conditioned for 
use, CLOSE cancels the conditioning. For 
this reason, if you issue a CLOSE macro in- 
struction while data transfer is still in 
progress over one or more lines in the line 
group, unpredictable loss of data can 
result. You should therefore close the 
line group only after all message traffic 
has ceased. See Figure 17 for the format 
of the CLOSE macro. 

A single CLOSE macro instruction can 
deactivate any number of line groups and 
any other data sets defined in your program 
(including those for other access methods), 
in the same way an OPEN macro instruction 
can activate them. 
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r t t -. 1 

| Name | Operation | Operand | 

| + _ + + 



[symbol] j ( OPEN \ j ( { deb, ,}...), [MF=L 

j | CLOSE | j LMF=(E, 

symbol 



listnaice) 



deb 



specifies: 

• For standard or execute macro instruction format, the name of the first in- 
struction generated by the macro instruction. For these formats the use of 
symbol is optional. 

• For list format, the name of the parameter list created by the macro. For 
this format, you must specify a name. 

specifies the name of the line group data set you wish to open or close. 



MF=L (List format) 

specifies that a parameter list is to be created, containing the names of 
the data control blocks to be opened or closed. The function is not per- 
formed until you issue an OPEN or CLOSE macro instruction of the execute 
format specifying the name of the parameter list. 

MF=(E,listname) (Execute format) 

specifies that the open or close function is to be executed for the data 
sets contained in the parameter list specified by list name. You must pre- 
viously have created the list with an OPEN or CLOSE macro instruction of the 
list format (MF=L) . If you wish to override certain parameters in the list, 
specify replacement parameters in the macro instruction having the execute 
format. Code the replacement parameters in the positions corresponding to 
the locations of the parameters to be overridden. 

(Standard format - MF operand omitted) 

specifies that both (1) a parameter list is to be created, containing the 
names of the data control blocks to be opened or closed, and (2) the open or 
close function is to be executed for the data sets contained in the created 
parameter list. 



Example: 



OPENLIST OPEN (LG1050 , ,LG2740, ,LG1130) ,MF=L 



OPEN (,,LG2260, ,) ,MF=(E, OPENLIST) 

The first macro creates a list; the second executes the Open function for data sets 
LG1050, LG2260, and LG1130. 

After you have defined a parameter list by either an OPEN or a CLOSE macro instruc- 
tion of the list or standard format, you may subsequently specify that list by both 
OPEN and CLOSE macro instructions of the execute format. 

L - 

Figure 17. Formats of OPEN and CLOSE Macro Instructions 
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LINE CONTROL AND MESSAGE TRANSMISSION 



LINE CONTROL 

Communication between the central computer 
and remote stations requires a discipline 
called line control, as mentioned earlier 
in this publication. Given here is a sum- 
mary of the control scheme used for various 
line configurations and types of remote 
stations. 

Line control does not apply to the local 
3270 display system, which uses attention 
interruptions to regulate communications 
between the central computer and local dis- 
play stations. For more information, see 
"Attention Interruptions and Read Initial 
Operations" in the section "IBM 3270 Infor- 
mation Display System — Programming 
Considerations . " 

Contention System 

In the most elementary form of line control 
each of the two stations at the ends of a 
point-to-point communications line gains 
use of the line by sending to the other 
station a special control character signi- 
fying the station's intention to begin 
transmission. The first station to initi- 
ate contact in this manner "seizes" the 
line and prevents its use by the other sta- 
tion until the first station has concluded 
its message transmission. If both stations 
should simultaneously try to initiate 
transmission, they are said to be contend- 
ing for use of the line, hence the name 
contention system. In this kind of system 
some method is required for resolving a 
contention situation. 

The action of requesting use of the line 
is sometimes called bidding for the line. 

Centrally-Controlled System 

In this kind of system, the central comput- 
er acts as a control station. That is, it 
initiates all contacts between all stations 
on a multistation (multipoint) line. It 
does this by periodically sending on the 
line a series of station identifiers, 
called polling characters or polling 
sequences. Each station on the line has a 
different polling sequence. Thus, although 
all stations ' receive all polling sequences, 
each station responds only to its own. 
This response indicates to the control sta- 
tion (the central computer) whether or not 
that remote station is ready at that moment 
to send a message. It sends a positive 
response if it is ready, a negative 
response if it is not. For some types of 



stations the polling sequence identifies a 
specific component of the station, as well 
as the station itself. In this case, the 
response indicates whether or not that par- 
ticular component is ready to send a 
iressage. 

Similarly, when the control station 
wishes to send a message to a remote sta- 
tion, it transmits an identifier sequence 
on the line. This is called addressing, or 
selection. Again, all stations receive the 
addressing characters, but only one 
responds. The addressed station returns to 
the computer a positive response if the ' 
station (and perhaps a specific component) 
is ready to receive a message. 

In a system of this kind, the stations 
can te in one of two modes: control mode 
and text mode. The stations are all in 
control mode before a transmission begins, 
and in this mode they monitor the line for 
polling and addressing sequences. When a 
polled or addressed station responds posi- 
tively, message transmission between the 
central computer and the remote station can 
tegin. At this point, it is necessary to 
place all stations in text mode, so that 
any characters received by any station 
except the polled or addressed station are 
ignored. (If the other stations remained 
in control mode, any sequence of message 
characters that happened to constitute a 
polling or addressing sequence for one of 
the stations would activate that station.) 
Accordingly, each message begins with a 
special control character whose purpose is 
to cause the stations to enter text mode. 
Two characters used for this purpose are 
EOA (end-of-address) and STX (start-of- 
text) . The type of station on the line 
determines which character is used. 

At the end of a transmission, all sta- 
tions on the line must be returned to con- 
trol mode, so that they can again respond 
to polling and addressing sequences. 
Another character or character sequence, 
called end-of -transmission (EOT) , performs 
this function. 

The function of returning the stations 
to control mode is often called resetting 
the line. 

Switched Systems 

In a switched system, contact must be es- 
tablished by one or the other of two sta- 
tions: the central computer or the remote 
station. In some switched configurations. 
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either the computer or a remote station can 
call the other station; in others, only one 
or the other of these can make the call. 
User requirements determine which case 
applies. 

When the computer initiates contact with 
the remote station, it performs the calling 
function, when it answers a call from a 
remote station, it performs the answering 
function. 

Although a remote station can call the 
central computer at any time, the computer, 
to fulfill its function as control station, 
must be able to accept or reject a call. 
If it wishes to accept calls, it "enables 
the line," that is, conditions the TCU to 
respond to calls over the given switched 
line termination. The user program deter- 
mines which lines are to be enabled at any 
given moment. Conversely, to return the 
TCU to the state in which it will not 
respond to (that is, answer) calls is 
called disabling the line. 

If a remote station calls in on a line 
that is not currently enabled or that is 
enabled but is occupied with another remote 
station, the calling station receives a 
busy signal, and contact is not estab- 
lished. The station must try again later. 

After the line connection is estab- 
lished, one of the preceding line control 
schemes, contention or centrally con- 
trolled, takes effect just as on a non- 
switched line. The scheme used is the same 
as that used for a nonswitched line for the 
particular type of stations involved. 



ERROR DETECTION AND MESSAGE BLOCKING 

Line control may also involve detection of 
transmission errors. For the types of 
remote stations for which this is possible, 
a character called end-of-transmission- 
block (ETB), also called end-of-block 
(EOB) , is sent following a sequence of text 
characters; this sequence is then called a 
message block. Whenever the sending sta- 
tion senses an ETB in the data it is send- 
ing, it follows that ETB with a check accu- 
mulation (VRC, LRC, or cyclic) and awaits a 
response from the receiving station. The 
receiving station compares the check char- 
acter with the check character it has accu- 
mulated. If they match, indicating that it 
received the text without error, it sends a 
positive response (or acknowledgment) to 
the sending station. If they do not match, 
indicating that a transmission error has 
occurred, it sends a negative response 
(acknowledgment) to the sending station. A 
positive response indicates that the send- 
ing station may continue with the next mes- 



sage block; a negative response tells it to 
resend the erroneous block. 



CHANNEL PROGRAMS 

The various line control functions are 
achieved by the central computer through a 
combination of equipment and programming. 
Generally, each discrete function, such as 
enabling or disabling the line and reading 
and writing message text and responses is 
effected by separate channel commands that, 
when combined in appropriate sequences in a 
channel program, perform the overall line 
control actions needed to establish con- 
tact, transmit messages and check for 
errors. Channel programs are generated by 
BTAM as directed by the READ and WRITE 
macro instructions issued in the user 
program. 



MESSAGE TRANSMISSION 

All message transmission is effected by 
Read and Write operations of various kinds, 
which in turn are produced by coding equi- 
valently named macro instructions in the 
user program. (For information about Read 
and Write operations for the local 3270 
display system, see the section "IBM 3270 
Information Display System — Programming 
Considerations.") Thus a Read Initial 
operation is produced by a READ Initial 
nracro instruction. These operations are as 
follows . 

A Read or Write Initial operation estab- 
lishes contact with the remote station and 
receives or sends the first message block. 
In establishing contact, the operation per- 
forms whatever functions are appropriate. 
That is, for a nonswitched line in a con- 
tention system. Read Initial first sends 
the character that signifies to the receiv- 
ing station that the line is being seized 
by the sending station. In a centrally 
controlled system, the first function is to 
send a character or sequence that places 
all stations in control mode, as explained 
earlier. For a switched line, Read Initial 
either enables the line, if the operation 
is to continue when a remote station calls 
in, or it dials the remote station. 

Following execution of whichever of the 
foregoing functions is appropriate, polling 
may take place, if required by the type of 
station involved. Then the first block of 
the message is read or written. 

After a Read or Write Initial operation 
has concluded, you generally issue as many 
READ or WRITE Continue macro instructions 
as necessary to receive or send the remain- 
ing blocks of the message. 
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If a Read operation receives an 
erroneous message block, you may undertake 
Read Repeat operation; the negative 
response sent by Read Repeat signifies to 
the remote terminal operator or to the 
remote computer program that he or it 
should resend the block in error. 

Sometimes it is desirable to reverse the 
direction of message transmission during 
one transaction or to exchange the roles of 
the receiving and sending stations. Read 
and Write Conversational operations permit 
this. 



text. Since the user program probably does 
not know when to expect the last block of 
text, if message lengths vary, it should 
check after every Read operation for 
receipt of an EOT, which is considered an 
exceptional condition. 

Some operations will end unsuccessfully, 
with an error condition of some kind, such 
as a parity error (data checks) in text or 
an invalid response. Again, the user pro- 
gram must analyze the results of each Read 
or Write operation to see if an error con- 
dition has occurred. 



In binary synchronous communications, it 
is sometimes desirable to send data in 
transparent mode. This means that any 
transmission code bit pattern can be sent 
as data; whereas in normal transmission 
certain patterns are recognized and 
responded to as line control characters. 
Read and Write transparent operations are 
available for this purpose. 

These various operations can be combined 
in several ways. Inspection of the Read 
and Write operations for a specific type of 
remote station and line configuration will 
illustrate some of these ways. 

Although in coding a user program, it is 
not usually necessary to understand all the 
details of the various commands that make 
up a channel program, each command is 
explained fully in the publications per- 
taining to TCUs. These publications are 
listed in the Preface of this manual. 

User Program Analysis 

Upon completion of each Read or Write 
operation, the user program must analyze 
the results of the operation to determine 
which Read or Write operation to perform 
next. If the operation was successful and 
either message text or some expected 
response was received, the decision about 
the next operation depends largely on the 
kind of application. Sometimes, it may 
depend on the content of the received text. 
For example, in an application that 
involves transmission of fairly long mes- 
sages, it is common practice to break the 
message into sequences of message blocks. 
It is then appropriate to send or receive 
the first block using a WRITE or READ Ini- 
tial macro instruction or one of the 
variants, such as WRITE Initial Transparent 
for BSC, and then send or receive the rest 
of the blocks with WRITE or READ Continue 
macros or variants. 

An operation may end successfully, but 
with some exceptional condition. For 
example, a sequence of Read operations will 
end when a remote station sends an EOT 
after having sent a number of blocks of 



BTAM provides error recovery procedures 
(ERP) for automatically attempting to reco- 
ver from errors. These are optional for 
start-stop lines, mandatory for BSC lines. 
It is only after BTAM ERP has attempted re- 
covery and failed that the error condition 
is indicated to the user program. If ERP 
is successful in clearing the condition, 
BTAM posts the operation complete-without- 
error, and the user program is unaware that 
the error has occurred. 

The section "Error Recovery Procedures 
and Error Recording, " discusses the BTAM 
ERP facilities and suggested user analysis 
procedures . 

Use of Line Control Characters 

To achieve successful communication with 
any given type of remote station requires 
that- the data stream between the central 
computer and the remote station contain the 
appropriate line control (also called data 
link control) characters and character 
sequences. A BTAM programmer must be con- 
cerned with the proper use of these charac- 
ters. In message data received from a 
remote station, you may need to scan the 
input areas to determine the locations of 
control characters and perhaps to remove 
them. In message data to be sent to a 
remote station, however, you must assure 
yourself that these characters are sent at 
the appropriate point in the transmission. 
Some control characters are sent automati- 
cally by BTAM in a separate command within 
a channel program. Others you must place 
in the message output area. For example, 
when using a transparent-type Write opera- 
tion to send data in transparent mode (that 
is, to prevent the control units at the 
central computer and remote station from 
reacting to bit patterns that correspond to 
line control characters), you must place 
the DLE STX character sequence in the out- 
put -area at the point where transparent 
transmission is to begin. You do not, 
however, place the ending sequence, DLE ETX 
(or DLE ETB) , in the output area, because, 
as inspection of the channel program shows, 
the command following the Write Text com- 
mand sends these characters. 
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It is most, important to be familiar with 
the usage of line control characters for 
the type of remote station for which you 
are coding Read and Write operations. The 
line control characters and their proper 
usage are defined in the publications per- 
taining to the various types of stations, 
and, in the case of binary synchronous com- 
munications, in the general information 
publication for BSC. (These publications 
are listed in the Preface of this manual.) 
Line control character usage may vary 
depending on particular features or combi- 
nation of features with which the stations 
are equipped. 



READ AND WRITE OPERATIONS 



Data Event Control Block 

The parameters BTAM needs to perform a Read 
or Write operation are contained in a data 
event control block (DECB) . Some of these 
parameters are: 

• The type of Read or Write operation 
(for example. Initial, Continue 
Conversational) 

• The address of the data control block 
(DCB) for the line group encompassing 
the line over which the operation is to 
take place 

• The relative line number of the line 
involved 



The next two chapters of this publica- 
tion contain descriptions of the READ and 
WRITE macro instruction options available 
for each of the types of remote stations 
with which the central computer can commun- 
icate under BTAM control. In the section 
"Start-Stop Read and Write Operations," 
these descriptions are arranged by type of 
station. In the section "BSC Read and 
Write Operations," they are arranged by 
type of line configuration. This is done 
because the channel program for each type 
of operation is the same for any type of 
station (for a given line configuration). 

The Reset Function 

For many of the Read and Write opera- 
tions listed there is an optional reset 
function. This simply means that if the 
Read or Write operation has progressed 
satisfactorily up to that point (that is, 
message text was received or sent without 
error), one or two additional commands are 
executed that reset the station to control 
mode, and, for switched line operations, 
that break the line connection. This is 
the only difference between a reset and a 
nonreset operation, and for this reason is 
not stated explicitly in each description. 
The reset function is not performed if a 
permanent error occurred during the 
operation. 

Terminal Lists 

The description of the DFTRMLST macro in- 
struction earlier in this manual explains 
all of the operands of that macro instruc- 
tion. In the next two chapters, each sec- 
tion covering a type of remote station or a 
line configuration indicates which type of 
terminal list you must define for Read and 
Write operations and shows what operands to 
code in the DFTRMLST operand field to 
obtain that list. See the explanation of 
the DFTRMLST macro instruction for the 
meanings of the operands, and see Appendix 
A for format illustrations and examples. 



• The address of the terminal list entry 
containing the information necessary to 
establish contact with the remote 
station 

• The addresses of the input or output 
areas to contain the message text. 

The DECB also contains fields in which 
the results of the Read or Write operation 
are indicated. Among these fields are: 

• An event control block (ECB) , in which 
a standard completion code is placed 
upon conclusion of the Read or Write 
operation. 

• A response field (DECRESPN), which 
receives addressing responses from the 
remote station. 

• Fields containing specific indicators 
of the results of the operations: 
DECSENSO (sense information); DECFLAGS 
(condition flags); DECERRST (error sta- 
tus) and DECCSWST (channel status word 
status byte) . 

The format of the DECB and the contents 
of its fields are given in Appendix B. 

One DECB is required for each communica- 
tions line; more than one can be provided, 
if desired. 

DECBs are created by READ and WRITE 
rracro instructions as follows. A macro of 
the list form (specified by the keyword 
operand MF=L) reserves space for a DECB and 
fills in certain of its fields with the 
parameters provided by the macro. This is 
done during assembly, and is the sole func- 
tion of the list form macro instruction; 
that is, the macro instruction does not 
perform a Read or Write operation. If you 
define a DECB in this way, you must code 
the macro instruction among the program 
constants (or create your own linkage 
around it) , since a macro instruction of 
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the list form does not generate executable 
code. 

In order to perform a Read or Write 
operation using a DECB created by the list 
form of the macro instruction, you issue a 
READ or WRITE macro instruction of the 
execute form, specified by the MF=E keyword 
operand. This form of macro instruction 
does not establish a DECB; it executes the 
Read or Write operation using an existing 
list. In this macro instruction you may 
specify which, if any, of the parameters in 
the original DECB you wish to change. For 
example, if you wish to issue a series of 
WRITE macro instructions, all of which 
require the same DECB parameters except for 
the entry parameter, it would be appropri- 
ate to issue one WRITE (or READ) macro in- 
struction of the list form to establish the 
DECB. Then you would code the other WRITE 
macro instructions in the execute form and 
in each one specify only the entry operand, 
of those operands that are optional. 

An alternate method is to code the stan- 
dard form of the READ or WRITE macro in- 
struction, by omitting the MF keyword 
operand. A macro instruction of this type 
generates both a DECB and the executable 
code required to perform the Read or Write 
operation* 

Just as you issue a macro instruction of 
the execute form referring to a DECB 
defined by a macro instruction of the list 
form, you may issue an execute-form macro 
instruction that refers to a DECB generated 
by a previous macro instruction of the 
standard form. 

An important point to remember in using 
the same DECB for a sequence of Read or 
Write operations is that the contents of 
many of the fields change with each 
issuance of a macro instruction or execu- 
tion of a Read or Write operation. This 
means that at the conclusion of each Read 
or Write operation you should do whatever 
checking of DECB fields is necessary before 
you issue the next macro instruction that 
will refer to the same DECB. 

Not all of the READ and WRITE macro in- 
struction operands are optional. Regard- 
less of the macro instruction form, you 
must provide the address of the DECB and 
the operation type. In the standard form, 
you must always code the DCB address and 
the relative line number. 

READ and WRITE Macro Instructions 

READ and WRITE macro instructions produce 
the Read and Write operations that achieve 
message transmission. You issue one of 
these macro instructions each time you wish 
to receive a message from a remote station, 
send a message to a remote station, or per- 



form any of several other functions related 
to message transmission, such as sending 
and receiving responses, disabling or dis- 
connecting a switched line, etc. 

In the READ or WRITE macro instruction you 
specify: 

• The line group and specific line within 
that group over which the operation is 
to occur. 

• The address of a terminal list or an 
entry in that list that contains the 
information BTAM needs to establish 
contact with a station. Examples of 
this kind of information are telephone 
numbers, polling and addressing 
sequences, and identification 
sequences. 

• The type of Read or Write operation to 
be performed (Read Initial, Write Con- 
tinue, etc.) 

• The address of the data event control 
block (DECB) that the READ or WRITE 
macro instruction is to define or the 
address of an existing DECB that the 
operation is to use. 

• The addresses of input and output areas 
into which or out of which message text 
is to be received or sent. 

Each of these parameters is discussed in 
the explanation of the operands. 



r t r 

| Name | Operat ion | Operands 




decbaddr,optype, 
dcbaddr, 
[inoutarea] 
( [inarea], 
[out area] ) 



[inoutlength] 
( [inlength] , 
[out length] ) 



r,MF=L"j 
[entry], [rln] [,MF=EJ 



decbaddr 

specifies the address of the DECB 
associated with the line. You can use 
register notation only if the macro 
instruction is of the execute form 
(MF=E) . 

optype 

specifies one of the operation-type 
codes listed in Figures 18, 19, and 
20. The channel program generated for 
each type of Read and Write operation 
differs depending on the particular 
terminal and network configuration. 
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The available types for a given type 
of remote station or line configura- 
tion are given in the next two chap- 
ters. The available types for the 
local 3270 display system are given in 
the section "Local Read and Write * 
Operations." In all cases, if the 
single letter T is coded, no type code 
is set in the DECB. The T can be used: 

1. With a list form, to create a DECB 
with no type code. The type code 
would be furnished by a subsequent 
READ or WRITE macro instruction of 
execute form. 

2. With an execute form, when the 
type code already in the DECB is 
to be used. 

dcbaddr 

specifies the address of the DCB for 
the line group. 

inoutarea 

specifies the address of the first 
byte of the input area (Read opera- 
tions) or the first byte of the output 
area (Write operations). In a READ 
macro instruction, you may code this 
operand as *S' if you are using dynam- 
ic buffering and wish BTAM to provide 
the needed buffers. If the inoutarea 
operand is specified as • S', the 
inoutlength operand is ignored and 
BTAM obtains the buffer length from 
the DCB. This operand may be omitted 
for read types TIQ and TQ and write 
types TR, TQ, TN, TA, TD, and TW. 

For write type TQ , if inoutarea is 
omitted or inoutlength is equal to or 
less than two, the response is read 
into the DECRESPN field of the DECB. 



dynamic buffering and wish BTAM to 
provide the needed buffers. 

For more information about using the 
inarea and outarea operands for the 
remote 3270 display system, see "Read 
Operations" and "Write Operations" 
under the heading "Line Control and 
Message Transmission" in the section 
"IBM 3270 Information Display System 
— Programming Considerations." 

inoutlength 

specifies the number of bytes in the 
input or output area defined by the 
inoutarea operand, in a WRITE macro 
instruction, you may code this operand 
as 'S f , to cause BTAM to obtain the 
buffer length from the DCB. The 
inoutlength operand need not be coded 
for read types TIQ and TQ and write 
types TR, TO, TN, TA, TD, and TW. 

For write typeTQ, if inoutlength is 
omitted or is equal to or less than 
two, the response is read into the 
DECRESPN field of the DECB. 

CAUTION : Specify 'S' only if the last 
buffer to be sent contains the ending 
character. 



inlength and outlength (BSC only) 

are for use in the same types of macro 
instructions indicated under "inarea 
and outarea, " and specify the length 
of these areas. In a WRITE macro in- 
struction, you may code outlength as 
• S*, to cause BTAM to obtain the buf- 
fer length from the DCB. The same 
caution indicated for inoutlength app- 
lies to outlength. 



inarea and outarea (BSC only) 

are for use in READ macro instructions 
of the TCW, TTL and TPL types and 
WRITE macro instructions of the TIV, 
TIVX, TTV, and TTVX types. 

For read types TTL and TPL, outarea 
contains the leading- graphics charac- 
ters to be sent to the remote station, 
and inarea receives the text from the 
station. For read type TCW, outarea 
specifies the address of the tone 
characters to be sent to the remote 
station, and inarea receives the text 
from the station. For write types 
TIV, TIVX, TTV, and TTVX, outarea con- 
tains the text to be sent to the 
remote stations, and inarea receives 
the text transmitted from the remote 
station. 

For either READ or WRITE macro 
instructions, you may code inarea (but 
not outarea) as ' S* if you are using 



Programming Notes : 

1. The value specified for inoutlength, 
inlength, or outlength must include 
(a) all control characters that are to 
be sent or received if they will be 
sent from or received into the area 
(that is, the length should not 
include any control characters sent 
automatically by BTAM or received into 
other than the input area) and (b) the 
four-byte link field, if dynamic buf- 
fering is used. 

2. Any macro instruction of the execute 
form that specifies inarea and outarea 
rather than inoutarea must refer to a 
DECB that has been defined with a list 
or standard-form macro instruction 
that also specified inarea and out- 
area, because the DECB required for 
leading-graphics and conversational 
operations is longer than that for 
operations not requiring both input 
and output areas. 
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OPTION 


TYPE 
CODE 


1030 


1050 
(nonsw) 


1050 
(switched) 


1060 


2260 


83B3 
115A 


TWX 
33/35 


WT 
Teleg 


READ Initio! 


Tl 


X 

Note 


X 
Note 


X 


X 

Note 


X 


X 


X 


X 


READ Initial with Reset 


TIR 


X 
Note 


X 

Note 


X 


X 
Note 


X 




X 




READ Continue 


TT 


X 
Note 


X 


X 


X 
Note 


X 






X 


READ Continue with Reset 


TTR 


X 
Note 


X 


X 


X 

Note 


X 








READ Continue with Leading 
Acknowledgment 


TTA 


















READ Continue with ID Exchange 


TE 
















X 


READ Conversational 


TV 






X 








X 




READ Conversational with Reset 


TVR 






X 








X 




READ Repeat 


TP 


X 

Note 


X 


X 


X 

Note 


X 








READ Repeat with Reset 


TPR 


X 
Note 


X 


X 


X 

Note 


X 








READ Buffer 


TB 










X 








READ Skip 


TS 


X 


X 


X 


X 


X 


X 


X 




WRITE Initial 


Tl 


X 


X 


X 


X 


X 


X 


X 


X 


WRITE Initial with Reset 


TIR 


X 


X 


X 


X 


X 


X 


X 




WRITE Initial Optical 


TIO 


















WRITE Invitational Optical 


TCO 


















WRITE Continue 


TT 


X 


X 


X 




X 






X 


WRITE Continue with Reset 


TTR 


X 


X 


X 




X 








WRITE Continue Conversational 


TTV 




X* 


X 












WRITE Conversational 


TV 






X 








X 




WRITE Conversational with Reset 


TVR 






X 








X 




WRITE Conversational Optical 


TVO 


















WRITE at Line Address 


TL 






X 




X 








WRITE at Line Address with Reset 


TLR 










X 








WRITE Erase 


TS 










X 








WRITE Erase and Reset 


TSR 










X 








WRITE Break 


TB 












X 






WRITE Positive Acknowledgment 


TA 


X 


X 


X 


X 


X 








WRITE Negative Acknowledgment 


TN 


X 


X 


X 


X 


X 




X 




WRITE Disconnect 


TN 



















^Jote: Options for which Auto Poll channel programs are generated if the IODEVICE system generation macro instruction for the time specified FEATURE= 
AUTOPOLL. 

'Write TTV cannot be used if Auto Poll is specified (i.e., FEATURE=AUTOPOLL in IODEVICE macro for the line* 

Figure 18 (Part 1 of 2). READ and WRITE Options for Start-Stop 
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OPTION 


TYPE 
CODE 


2740 


2740C* 


2740D* 


2740 
DC* 


2740 
DT* 


2740 
DTC* 


2740 
S* 


2740 
SC* 


2740 
CO* 


2740 
DCO* 


2741 

NS* 


2741 
SW* 


READ Initial 


Tl 


X 


X 


X 


X 


X 


X 


X 

Note 


X 

Note 


X 


X 


X 


X 


READ Initial with Reset 


TIR 




X 


X 


X 


X 


X 




X 

Note 


X 


X 






READ Continue 


TT 




X 




X 




X 




X 


X 


X 




X 


READ Continue with Reset 


TTR 




X 




X 




X 




X 


X 


X 






READ Continue with 

Leading Acknowledgment 


TTA 


















X 


X 






READ Continue with ID Exchange 


TE 


























READ Conversational 


TV 






X 


X 


X j 


X 








X 




X 


READ Conversational with Reset 


TVR 






X 


X 


X 


X 








X 






READ Repeat 


TP 




X 




X 




X 




X 


X 


X 






READ Repeat with Reset 


TPR 




X 




X 




X 




X 


X 


X 






READ Buffer 


TB 


























READ Skip 


TS 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


WRITE Initial 


Tl 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 






WRITE Initial with Reset 


TIR 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 






WRITE Initial Optical 


TIO 


















X 


X 






WRITE Invitational Optical 


TCO 


















X 


X 






WRITE Continue 


TT 




X 




X 




X 




X 


X 


X 


X 


X 


WRITE Continue with Reset 


TTR 




X 




X 




X 




X 


X 


X 






WRITE Continue Conversational 


TTV 




X 




X 














X 


X 


WRITE Conversational 


TV 




X 


X 


X 


X 


X 






X 


X 


X 


X 


WRITE Conversational with Reset 


TVR 




X 


X 


X 


X 


X 






X 


X 






WRITE Conversational Optical 


TVO 


















X 


X 






WRITE at Line Address 


TL 


























WRITE at Line Address with Reset 


TLR 


























WRITE Erase 


TS 


























WRITE Erase with Reset 


TSR 


























WRITE Break 


TB 


























WRITE Positive Acknowledgment 


TA 




X 




X 




X 




X 


X 


X 






WRITE Negative Acknowledgment 


TN 




X 


X 


X 


X 


X 




X 


X 


X 






WRITE Disconnect 


TN 
























X 



*C Checking feature 

D Dial-up feature 

T Transmit Control feature 

S Station Control feature 

O Optical Image Unit feature 

NS Nonswitched 

SW Switched 



Note: Options for which Auto Poll channel programs are generated in the IODEVICE system generation macro instruction 
for the line specified FEATURE = AUTOPOLL 

Figure 18 (Part 2 of 2). READ and WRITE Options for Start-Stop 
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Option 



Type Code 



Nonswitched 
Point- to- Point 



Multipoint 



Switched 
Point-to-Point 



READ Initial 



TI 



•H 



READ Connect 



TC 



READ Connect with Tone 



TCW 



H 



READ Continue 



TT 



READ Continue with Leading 
Graphics 1 ,*, 8 



TTL 



h- 



READ Repeat 



TP 



■H 



H 



READ Repeat with Leading 
Graphics 1 , 4 *, 8 



TPL 



READ Initial Inquiry 



TIQ 



+- 



H 



READ Inquiry 



TQ 



H 



READ Inquiry Monitor 10 



TQM 



READ Interrupt" 7 



TRV 



WRITE Initial* 



TI 



WRITE Initial and Reset 2 



TIR 



H 



WRITE Continue 2 



TT 



+- 



1 



H 



WRITE Continue and Reset 2 



TTR 



WRITE Reset 



TR 



+- 



K- 



WRITE Inquiry 



TQ 



WRITE Reset Monitor 10 



\. 

WRITE Disconnect 

WRITE Wait Before 
Transmit 1 

WRITE Initial 
Conversational 2 , a 



TRM 

TD 

TW 

TIV 



— + 



+ 

+ 



X 
X 



H- 



-+■ 



WRITE Continue 
Conversational 2 , s 

WRITE Initial 
Transparent 3 , • 

WRITE Initial Transparent 
and Reset 3 , 9 

WRITE Initial Transparent 
Block 9 

Figure 19 (Part 1 of 2) . READ 



TTV 



TIX 






TIXR 









TIE 



and WRITE Options for BSC 
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Option 



Type Code 



-+ 



Nonswitched 
Point-to- Point 



Multipoint 



Switched 
Point-to-Point 



WRITE Continue 
Transparent 3 , • 

WRITE Continue Transparent 
and Reset 3 , 9 

WRITE Continue Transparent 
Block 9 



TTX 



TTXR 






TTE 



X 



--+ 



WRITE Initial Conversa- 
tional Transparent 3 , 6 , 9 



TIVX 



-+ 



WRITE Continue Conversa- 
tional Transparent 3 , 6 , 9 



TTVX 



WRITE Break** 



h" 



WRITE Connect 



TB 
TC 






*This macro cannot be used for a 2780 with which the central computer communicates 
using 6-bit Trans code. 

2 This macro cannot be used for a 2715 because text transmission to this type of sta- 
tion is always in transparent mode. 

3 This macro cannot be used for a 2972 because text transmission to this type of sta- 
tion is always in nontransparent mode. 

*»The 1800, 2715, and 2770 ignore leading graphics characters sent to them. That is, 
these characters are neither received into core storage (2715) or terminal buffer, 
nor passed to any output device attached to the station. 

5 The 1800, 2770 and 2972 do not transmit text as a response to text received from 

the central computer, the return 

6 The 1800, 2715 and 2770 the usual alternating acknowledgment (ACK-0 or ACK-1) . 

7 When this macro is used for the remote 3270, the response is always EOT. 

8 This macro is not applicable for the remote 3270, which cannot receive leading 
graphics. 

9 This macro is applicable for the remote 3270 only when that device has structure 
field capability. 
*°This macro is applicable only to the switched 3275. 
**This macro is not applicable to the switched 3275. 
i 

Figure 19 (Part 2 of 2) . READ and WRITE Options for BSC 



—J 



| Option 



| READ Initial 

I 

| READ Modified 

I 

jREAD Modified from Position 

I 

| READ Buffer 

I 

| READ Buffer from Position 

I 

| WRITE Initial 

I 

| WRITE Erase 

WRITE Erase Alternate 1 
IwRITE Structured Field 2 
I WRITE Unprotected Erase 

1 



T 1 

| Type Code | 
+ i 

TI 

TM 

TMP 

TB 

TBP 

TI 

TS 

TSA 

TSF 
TUS 



1 



Does not apply to 3272 devices. 



_J 



3. If online testing is made available 
for a BSC line (by coding T among the 
EROPT options in the DCB macro in- 
struction for the line group) , all 
READ Initial macro instructions issued 
for the line must specify a length of 
no less than 300 bytes. Online test 
RFT messages may be received into this 
area at any time. If 'T* is coded as 
the optype operand in a WRITE macro 
instruction of the list form (MF=L) , 
and the ' (inarea,outarea) ' and 
• (inlength,outlength) • operands are 
not coded, the resultant DECB does not 
allow space for the DECWLNG and 
DECWAREA fields. 

Note: For devices attached to the 
3274 or 3276 choose the test type 
that corresponds to the supported 
buffer size. 



'Does not apply to 3272 or 3274 Model IB devices. 



Figure 20. READ and WRITE Options for 
Local 3270 Display System 
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entry 



specifies the address of the terminal 
list or an entry therein, as follows: 



rln 



1. 



2. 



3. 



For a nonswitched line (OPENLST, 
AUTOLST, or SSALST) , it specifies 
the address of an entry within the 
terminal list. 

For a nonswitched line (WRAPLST, 
AUTOWLST, or SSAWLST) , it speci- 
fies either the address of any 
entry within the terminal list or 
•s'. 

Note; If • S* is specified, the 
system provides the address of an 
entry in the polling list as 
follows : 

a. If the previous polling opera- 
tion terminated with a nega- 
tive response as a result of a 
RESETPL macro instruction, the 
address of the next entry is 
provided. 

b. Otherwise, the address of the 
entry that was last polled is 
provided. 

For a switched line (DIALST, 
SWLST, BSCLST, IDLST, or WTTALST) , 
it must specify the address of the 
beginning of the terminal list; it 
cannot be coded as *S'. 

For read types TMP and TBP for the 
local 3270 display system, entry 
specifies the address of a four- 
byte area that gives the position 
from which the read operation is 
to begin. This operand may be 
omitted for all other read and 
write types for the local 3270 
display system, since the operand 
is ignored. 



specifies in decimal the relative line 
number within the line group (range 
1-255 inclusive) . This value is 
placed in the DECRLN field of the DECB 
in binary form. 

For read type TI for the local 3270 
display system, rln specifies the 
first display station that is to be 
checked for an attention interruption. 
For all other read and write types for 
the local 3270 display system, this 
operand specifies the device from 
which or to which a message is to be 
read or written. 



is specified by the decbaddr operand. 
Specify this when you wish to create a 
data event control block that will be 
referred to subsequently by one or 
more READ or WRITE macro instructions 
(each of which will specify the MF=E 
operand and decbaddr operand of which 
will specify the address of the data 
event control block created by this 
macro instruction) . 



WF=E 



MF=L 



specifies that this macro instruction 
causes only the creation of a data 
event control block the name of which 



specifies that this macro instruction 
causes execution of the Read or Write 
operation, using a data event control 
block created by a READ or WRITE macro 
instruction of the list or standard 
form. 

Return Codes : After a READ or WRITE macro 
instruction, BTAM sets register 15 to zero 
if no error has been detected. If an 
abnormal condition is detected, the opera- 
tion is not started, and control is 
returned to your program at the instruction 
following the READ or WRITE macro instruc- 
tion. A return code in register 15 indi- 
cates the error. Bits 2U through 31 will 
contain one of the following error codes in 
hexadecimal notation: 

OH Busy: The specified line is busy with 
a previously requested Read or Write 
operation. 

08 Invalid RLN: The relative line number 
specified in the operand field of the 
READ or WRITE macro instruction is zero 
or is larger than the number of lines 
in the line group. 

0C (1) Invalid "optype" code: The READ or 
WRITE macro instruction specified an 
"optype" that is invalid for the kind 
of remote station for which you issued 
the macro instruction. 

(2) An initial-type WRITE macro in- 
struction (for example, WRITE TI, TIX, 
TIV) erroneously specified an answering 
list instead of a calling list (that 
is, no dial digits are present in the 
list). 

10 All skip bits on (programmed polling) : 
The skip bit is on in all of the en- 
tries in the polling or addressing 
list. 

For local 3270, all skip bits are on 
by means of the CHGNTRY macro. 

Usage Count too large (Autopoll) : 
The Usage Count is larger than its 
maximum value of 15. 

14 Line Error during Open: SAD or Enable 
command (issued during Open) resulted 
in a permanent I/O error. The error 
status in the DECB may be inspected to 
determine the cause of the error. For 
local 3270 devices, the Write Erase 
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command issued during open processing 
did not complete successfully; other 
devices in th.2 line group which were 
success ffully opened will continue to 
operate when a read or write macro is 
issued specifying the rln of any of 
those devices. 

18 Buffers Not Available: The buffer 
pool does not contain enough buffers 
to satisfy the Read operation (area 
coded • S ' ) . 

1C No Buffer Pool: No buffer pool was 
defined in the DCB macro instruction, 
or there was no indication that BTAM 
was to provide the pool associated 
with the line group prior to Open. 

20 No Buffer Routine: You did not indi- 
cate you wanted the buffer routine 
prior to open, so it was not loaded 
with the system. The return code 
occurs on a Read operation. 

24 Invalid Order: The second byte of the 
area specified by the entry operand of 
a READ TMP o* TBP macro instruction 
(for a local 3270 display system) is 
not an SBA order. 

28 Invalid Control Block: An invalid con- 
trol block was encountered during a 
read or write operation for the local 
3270 display system. 

2C Device Not Available: A request for a 
read or write operation was rejected, 
because OLTEP is using the local 3270 
device. If the read operation request- 
ed was a READ INITIAL, processing does 
not continue for the rest of the line 
group. 

Note : All nonzero return codes indicate 
that no I/O operation was initiated; there- 
fore, the program must not issue a WAIT or 
TWAIT macro instruction for a READ or WRITE 
macro instruction that resulted in a non- 
zero return code, because the task would 
enter a permanent wait state. 

Programming Note : Execution of a READ or 
WRITE macro instruction causes control to 
be passed to a BTAM routine which con- 
structs channel programs. If no invalid 
conditions are detected, a channel program 
is generated for the requested I/O opera- 
tion. After the channel program has been 
started, control is returned to your pro- 
gram with a return code of zero. The I/O 
operation proceeds asynchronously with 
respect to program execution. When you 
wish to determine whether the I/O operation 
has completed, issue a WAIT or TWAIT macro 
instruction, or check the DECSDECB field 
(the event control block) . 

If you intend to make use of the * S' 
option for the entry operand in READ Ini- 
tial macro instructions, ensure that the 
polling list address is placed in the data 
event control block before the first execu- 



tion of the READ Initial macro instruction. 
This may be done by defining the polling 
list address in a READ macro instruction of 
the list form and then using the ' S' in a 
READ Initial macro instruction of the 
execute form. However, if a WRITE Initial 
macro instruction is issued (using the same 
DECB) before the first READ Initial macro 
instruction, steps must be taken to replace 
the polling list address in the DECB. 
After the first READ Initial macro instruc- 
tion, BTAM maintains the polling restart 
address in the DECB for the line. Thus, by 
using the *S* option, the polling list 
address is preserved across write opera- 
tions (even though they utilize the same 
CECB field for addressing list pointers). 

When a READ or WRITE macro instruction 
specifies "reset at completion" for a 
switched line, BTAM disconnects the line 
only if no error condition occurs during 
the execution of the basic channel program. 
Thus, the program may attempt retransmis- 
sion without reestablishing the line con- 
nection. If the program elects not to 
attempt retransmission, the WRITE TN macro 
instruction may be executed to perform the 
disconnect function. 

When a READ or WRITE macro instruction 
specifies "reset at completion" for a non- 
switched line, the EOT character (or 
sequence of characters) is transmitted only 
if no error condition occurs during execu- 
tion of the basic channel program. 

When a polling function is performed in 
a Read Initial operation, the terminal list 
address field in the DECB (DECENTRY) con- 
tains the address of the entry in the poll- 
ing list that was last polled. Thus, the 
program may determine the source of the 
it ess age (if one was received) by inspecting 
the contents of the polling list entry at 
that address. Note that the terminal list 
address field in the DECS is not modified 
for addressing operations. 

With Autopoll an index byte is provided 
in the first byte of DECPOLPT. The index 
byte contains the number of the polling 
entry for the terminal from which the mes- 
sage was read (that is, it contains one for 
the first entry in the polling list, two 
for the second entry, etc.). The program 
iray obtain the index byte from DECPOLPT to 
identify the originating terminal following 
any Read operation. 

When a READ macro instruction is used 
for the local 3270 display system, the 
relative line number of the device from 
which the message is read is placed into 
the DECPOLPT field of the DECB. 

User program error routines that operate 
synchronously with respect to the comple- 
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tion of the I/O operation may retry a macro 
instruction with the knowledge that the 
proper parameters are in the DECB. The 
error routine may use a READ or WRITE macro 
instruction of the execute form with only 
the decbaddr and the optype operands 
specified. 

RESETPL (Reset Polling List or Reset Line) 
Macro Instruction 

RESETPL may be issued whenever you wish to 
cancel a Read operation that is currently 
in progress but has not yet received a 
positive response to polling from a remote 
station (nonswitched multipoint line), or 
has not yet received an ENC character indi- 
cating the remote station's intention to 
transmit (nonswitched point-to-point line) , 
or has not yet received a call from a 
remote station (switched line) . If at the 
time the RESETPL is issued, a positive 
response or a call has been received or 
message transmission has taken place, the 
reset function has no effect; the Read 
operation proceeds as usual. 

RESETPL functions with a nonswitched 
multipoint line in the following manner. 
If a programmed polling operation is cur- 
rently in progress, and if it elicits a 
negative response, polling is terminated, 
the polling list pointer (DECPOLPT) is 
incremented, and the operation is posted 
complete. If an Autopoll polling operation 
is currently in progress, and if it elicits 
negative responses to all entries in the 
list, the operation is posted complete and 
the index byte identifying the last active 
entry is stored in the first byte of 
DECPOLPT. In both cases (programmed and 
Autopoll), the negative response bit is set 
in DECFLAGS. If the polling operation eli- 
cits a positive response or a time-out, the 
polling list pointer is not incremented, 
and the operation proceeds to its normal 
conclusion (normal conclusion for a time- 
out is to post it complete-with-error) . 

For a nonswitched point-to-point line, 
if a Prepare operation is currently in pro- 
gress, and the Prepare has not been com- 
pleted, a Halt I/O command is issued for 
that line. If an operation other than the 
Prepare is currently in progress (for 
example, message reception, message trans- 
mission, addressing) , it proceeds to its 
normal completion. 

The RESETPL macro instruction functions 
with a switched line in the following man- 
ner. If an Enable command has been issued 
to a line (to allow a terminal to dial the 
computer) , and a call has not been received 
(the Enable has not been completed) , BTAM 
stops line activity oy means of a Halt I/O 
command. If the Enable has already been 
completed and a polling operation (start- 
stop only) is currently in progress, the 



function descrioed above for programmed 
polling or multipoint lines is performed. 
If the Enable has already been completed 
and no polling operation (Start-Stop only) 
is in progress, the Read operation proceeds 
unaffected. 

Note : A special form of the RESETPL macro 
instruction is used for the local 3270 dis- 
play system. See "Attention Interruptions 
and Read Initial Operations" in the section 
"IBM 3270 Information Display System — 
Programming Considerations. " If only the 
decbaddr operand is specified, the instruc- 
tions that are generated include support 
for the local 3270 display system. 

i 1 ; 1 

I Name (Operation 1 Operand 

I 1. 1 

I [symbol] I RESETPL I decbaddr 



1 
J 



, ,11102740 
, POLLING 
,ANSRING, H102740 



I J I !± : "LI 

decbaddr 

specifies the address of the data 
event control block for the line for 
which the reset operation is to be 
performed. 

POLLING 

specifies that only the instructions 
required to terminate polling on a 
nonswitched line will be generated by 
this macro instruction. 

ANSRING 

specifies that only the instructions 
required to terminate an answering 
operation on a switched line will be 
generated by this macro instruction. 

HIO2740 

specifies that a H10 will be done to 
a 2740 line. 

If no second operand is specified, 
instructions are generated to determine at 
execution time which function is to be per- 
formed. For World Trade telegraph terminal 
lines, omit POLLING and ANSRING. 



Programming Note ; No further READ or WRITE 
macro should be issued for a line for which 
a RESETPL macro has been issued until the 
operation in progress has been posted com- 
plete. That is, provided that the RESETPL 
macro instruction gave a return code of 
X'00* or X'04', a WAIT macro instruction 
should be coded between the RESETPL macro 
and the next READ or WRITE macro. 

Return Codes ; After execution of a RESETPL 
macro instruction, bits 24 through 31 of 
register 15 contain a return code indicat- 
ing the status of the operation. Bits 
through 23 contain zeros. The code is one 
of the following, in hexadecimal notation: 



50 OS/VS BTAM SRL 



00 Normal Return: This code is set if an 
Enable or Prepare command was outstand- 
ing and a Halt I/O instruction was suc- 
cessfully executed. 

04 Complete: This code is set if the 

Enable command was already completed or 
the Post flag in the UCB is not on. 

08 Illegal Request: This code is set if 
the unit control block (UCB) , an inter- 
nal OS/VS control block, specifies a 
nonteleprocessing device. 

0C Unsuccessful: This code is set if an 
invalid unit control block address has 
been passed to the 10 HALT system macro 
instruction, or if the Halt I/O in- 
struction has terminated in error (for 
example, Channel Data Check, or a Not 
Operational condition code) . This code 
is also set if the DCB has not been 
opened. 

10 Not Issuesd: this code is set if no 
Enable command had been issued. This 
is not used in point-to-point contention, 

Note : These return codes have different 
meanings for the form of the RESETPL macro 
instruction used for the local 3270 display 
system. See "Attention Handling and Read 
Initial Operaitions" in the section "IBM 
3270 Information Display System — Program- 
ming Considerations." 

WAIT Macro Instruction 

The WAIT macro instruction relinquishes 
control of the CPU when the user program 
has no further processing to do and must 
wait for the completion of one or more 
Read/Write operations. See OS/VS Supervi- 
sor Services and Macro Instructions for 
complete information about this macro 
instruction. 



I T T T 

I Name | Operation | Operand | 

| [symbol! | WAIT | t count], | 

| J | ECB=ecb address j 
| | j ECBLIST=ecb list addr| 
i x x j 



count 



ECB 



specifies the number of events among 
the events referred to by the ECB or 
ECBLIST operand that must be posted 
complete before the WAIT macro in- 
struction is satisfied. If the count 
operand is omitted, one is assumed. 



specifies the address of an event con- 
trol block (ECB) representing a single 
event to be posted complete before 
processing by the user program can 
continue , 



ECBLIST 

specifies the address of a variable- 
length list containing fullword 
entries with each fullword entry con- 
taining the address of an event con- 
trol block (ECB) in the low-order 
three bytes. Each event control block 
pointed to represents an event await- 
ing completion. In this list of ECB 
addresses, the high-order bit (0-bit) 
of each fullword entry except the last 
in the list must be zero. In the last 
entry in the list, you must set the 
0-bit in the high-order byte of the 
entry to one. 



TWAIT Macro Instruction 

The TWAIT macro instruction relinquishes 
control of the CPU when the user program 
must wait for the completion of one of a 
number of events before further processing 
can be done. 



(Name j Operation {Operands | 

j. x x 1 

| [symbol] | TWAIT | (returnreg), | 

| | |ECBLIST=ecb list addr j 

returnreg 

contains the address of the ECB repre- 
senting the event posted complete. 

ECBLIST 

specifies the address of the user- 
created list of ECB addresses repre- 
senting events awaiting completion. 
Each entry in the list is a fullword 
containing an address in the low-order 
three bytes. Because the list is of 
variable length, the high-order bit 
(0-bit) of each fullword entry (except 
the last) must be set to zero except 
that of the last entry. The high- 
order bit of the last fullword entry 
must be set to one to identify the 
entry as the last in the list. 

If TWAIT is issued for any event other 
than a Read or Write operation, your pro- 
gram should clear the ECB. The TWAIT macro 
instruction is similar to the WAIT macro 
instruction except that: 

• TWAIT requires the completion of one 
event only before returning control to 
the problem. 

• The ECB keyword is not used in TWAIT. 

• The address of the ECB that was posted 
complete is returned to you in the reg- 
ister specified (as the first operand 
of TWAIT). 
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• The displacement of the ECB address 
from the beginning of the ECB list (as 
specified in the ECBLIST operand) is 
returned in register 15. 

The last point above simplifies branch- 
ing to a routine associated with a particu- 
lar ECB. Set up a where-to-go list of 
four-byte entries, each entry containing 
the address of a routine to be associated 
with the ECB whose address is in the corre- 
sponding entry of the ECB list. Then you 
may code, following the TWAIT macro 
instruction, 

L 15,WTGLIST(15) 
BALR 14,15 

or the equivalent, to branch and link to 
the appropriate routine. 

Read Skip Operations 

One of the types of Read operations that 
may be performed for terminals on a start- 



stop communications line is Read Skip. In 
this operation, effected by the READ Skip 
macro instruction, any data being received 
from a terminal is discarded, instead of 
being placed in main storage. This action 
"clears the line" of any unwanted data, so 
that normal Read and Write operations can 
be resumed. A Read Skip operation is 
intended for use in user-written recovery 
routines when a lost-data error has 
occurred. (It may be used for any start- 
stop terminal. ) 

Because it is not used in normal message 
transmission operations. Read Skip is not 
discussed in the section "Start-Stop Read 
and Write Operations." 

In a READ Skip macro instruction you 
need not specify the address of an input 
area, since the data it receives does not 
enter main storage; however, you must spec- 
ify for the length a value exceeding the 
maximum amount of text data to be received 
by the Read Skip operation. 
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START -STOP READ AND WRITE OPERATIONS 



IBM 1030 DATA COLLECTION SYSTEM 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a single polling character that 
identifies the terminal. To define a poll- 
ing list, code the operand field of a 
DFTRMLST macro like this: 



I [openlst] 



| WRAPLSTJ, Ixx,...) 

LZ i 



Write Operations 

A Write Initial operation requires an ad- 
dressing list having a single entry, con- 
taining a single addressing character that 
identifies the terminal that is to receive 
the output message. To define an address- 
ing list, code the operand field of a 
DFTRMLST macro like this: 



1. 


Write 


Circle Y 


EOT EOT 


EOT 






2. 


Write 


Polling Character 






3. 


Read 


Response 










4. 


Read 


Text 










5. 


Write 


Circle Y 


EOT EOT 


EOT 


(TPR 


only 


READ 


Repeat 


(TP) 










READ 


Repeat 


and Reset 


(TPR) 









READ Repeat writes a negative response, 
successively polls the terminals in the 
polling list, beginning with the terminal 
to which it sent the negative response, and 
upon receiving a positive response to poll- 
ing, reads a message block. This macro is 
for use following an unsuccessful READ Ini- 
tial (TI), READ Continue (TT) or READ 
Repeat (TP) , to read the same message block 
received by the previous operation. 



1. 


Write 


Circle N EOT EOT EOT 


2. 


Write 


Polling Character 


3. 


Read 


Response 


4. 


Read 


Text 


5. 


Write 


Circle Y EOT EOT EOT (TPR only 



WRITE MACRO INSTRUCTIONS 



| OPENLST, xx 

L 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 



1. 

2. 
3. 
4. 
5. 

READ 
READ 


Write EOT EOT EOT 

Write Polling Character 

Read Response 

Read Text 

Write Circle Y EOT EOT EOT (TIR only 

Continue (TT) 

Continue and Reset (TTR) 



READ Continue writes a positive response, 
successively polls terminals in the polling 
list, beginning with the terminal to which 
it sent the response, and upon receiving a 
positive response to polling reads a mes- 
sage block. This macro is for use follow- 
ing a successful READ Initial (TI) or 
another READ Continue to receive another 
message block. 



Programming Notes: 

1. If an EOA is the first character of a 
message block (as it will be if the 
block has not been modified since it 
was received from a 1030 terminal) , it 
will print at the terminal as #. You 
should therefore overlay with an idle 
character the first character of each 
block received from a 1030. 

2. Each outgoing message block roust end 
with ETB. 

3. Insert three idle (EBCDIC) or Write 
Marks (transmission code) characters 
between adjacent message text charac- 
ters. (This is required of all mes- 
sages sent to a 1033 printer.) 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial addresses a terminal, writes 
an EOA to place the terminal in receive 
state, writes message text, and reads a 
response from the terminal. 



1. 


Write 


EOT EOT EOT Circle S 


2. 


Write 


Addressing Character 


3. 


Write 


■ i« 


4. 


Read 


Response 


5. 


Write 


EOA 
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6. Write Text 

7 . Read Response 

8. Write EOT EOT EOT (TIR only) 



WRITE Continue (TT) 
WRITE Continue and Reset 



(TTR) 



WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 

1. Write Text 

2 . Read Response 

3. Write EOT EOT EOT (TTR only) 

WRITE Positive Acknowledgment (TA) 

WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT sequence 
to indicate to the terminal that the com- 



puter received message text without error 
and to stop line activity. This macro is 
for use after a Read operation, when you 
wish to stop receiving from the terminal 
before the terminal has sent an EOT. 

1. Write Circle Y EOT EOT EOT 



WRITE Negative Acknowledgment (TN) 

WRITE Negative Acknowledgment writes an EOT 
sequence to indicate to the terminal that 
the computer received text with an error 
and to stop line activity. The terminal 
interprets the EOT sequence a's a negative 
response. This macro is for use after a 
Read operation, when you wish to stop 
receiving from the terminal before the ter- 
minal has sent an EOT. 

1. Write EOT EOT EOT 
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IBM 1050 DATA COMMUNICATION SYSTEM — 
NONSWITCHED LINES 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a two- character polling 
sequence. The first character identifies 
the terminal; the second identifies the 
specific component from which an input mes- 
sage is solicited. (If the second charac- 
ter is the common polling character, 0, 
input messages are read from any ready com- 
ponent. To define a polling list, code the 
operand field of a DFTRMLST macro like 
this: 



j ( OPENLST ) 

1 1 WRAPLST J , (xxyy , . . . ) 



for use following a successful READ Initial 
(TI) , READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 

1. Write Circle Y 

2 . Read Text 

3. Write EOA EOT EOT EOT (TTR only) 

READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI) , READ Continue (TT) , or another READ 
Repeat, to receive the same message block 
read by the previous operation. 

1. Write Circle N 

2. Read Text 

3. Write EOA EOT EOT EOT (TPR only) 



Write Operations 

A Write Initial operation requires an ad- 
dressing list having one or more terminal 
entries, each containing a two-character 
addressing sequence. The first character 
identifies the terminal; the second identi- 
fies the specific component that is to 
receive the output message. (If the second 
character is the common addressing charac- 
ter, 9, the output message is sent to all 
ready components.) To define an addressing 
list, code the operand field of a DFTRMLST 
macro like this: 



| OPENLST, (xxyy,...) 



WRITE MACRO INSTRUCTIONS 
Programming Notes : 

1. The first block of a message received 
from a 1050 on a Read Initial opera- 
tion will begin with an EOA character. 
If the same message block is then sent 
to a 1050, it will be printed as #. 
This may be avoided by overlaying the 
EOA with an Idle character before 
sending the message block. 

2. Each outgoing message block must end 
with EOB. 



WRITE Initial (TI) 
WRITE Initial and Reset 



(TIR) 



READ MACRO INSTRUCTIONS 



READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 



EOT EOT EOT 

Polling Sequence 

Response 

Text 

EOA EOT EOT EOT (TIR only) 



READ Continue (TT) 

READ Continue and Reset (TTR) 

READ Continue writes a positive response 
and reads a message block. This macro is 



1. 


Write 


2. 


Write 


3. 


Read 


i*. 


Read 


5. 


Write 



WRITE Initial addresses a terminal, and if 
the response to addressing is positive, 
writes an EOA followed by message text and 
reads the response to text. If the termi- 
nal sends a negative response to address- 
ing, the operation is posted complete. 



1. Write 


EOT EOT EOT 


2. Write 


Addressing Sequence 


3 . Read 


Response 


4. Write 


EOA 


5. Write 


Text 


6. Read 


Response 


7. Write 


EOT EOT EOT (TIR only) 


WRITE Continue (TT) 


WRITE Continue and Reset (TTR) 



WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Init^=»l 
(TI) or another WRITE Continue. 
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1 . Write Text 

2. Read Response 

3. Write EOT EOT EOT (TTR only) 

WRITE Continue Conversational (TTV) 

WRITE Continue Conversational writes a mes- 
sage block and reads a response from the 
terminal, then resets the terminals on the 
line to control mode, successively polls 
the terminals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 



1. Write 


Text 


2 . Read 


Response 


3 . Write 


EOT EOT EOT 


4. Write 


Polling Sequence 


5 . Read 


Response 


6 . Read 


Text 


Programming 


Notes: 



1. WRITE TTV performs exactly the same 
functions as would be performed by a 
WRITE Continue (TT) followed by a READ 
Initial (TI) , but saves coding effort 
by allowing you to verify successful 
initiation and conclusion of the 
operation (i.e., by checking return 
and completion codes) just once, 
instead of after each of the two 
separate macro instructions. 



2. You must specify a polling list entry 
in the WRITE TTV macro instruction. 



WRITE Positive Acknowledgment (TA) 

WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT sequence 
to indicate to the terminal that the com- 
puter received message text without error 
and to stop line activity. This macro is 
for use after a Read operation, when you 
wish to stop receiving from the terminal 
before the terminal has sent an EOT. 



Write EOA EOT EOT EOT 



WRITE Negative Acknowledgment (TN) 

WRITE Negative Acknowledgment writes an EOT 
sequence to indicate to the terminal that 
the computer received text with an error 
and to stop line activity. The terminal 
interprets the EOT sequence as a negative 
response. This macro is for use after a 
Read operation, when you wish to stop 
receiving from the terminal before the ter- 
minal has sent an EOT. 



1. Write EOT EOT EOT 
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IBM 1050 DATA COMMUNICATION SYSTEM — 
SWITCHED LINES 



To define an answering-addressing list, 
code the operand field of a DFTRMLST macro 
like this: 



DEFINING TERMINAL LISTS 



Read Operations 

A Read Initial operation that answers a 
call from a terminal requires an answer ing- 
polling list; a Read Initial operation that 
calls a terminal requires a calling- polling 
list. Either type of list may have one or 
more terminal entries (all representing the 
same terminal), each containing a two- 
character polling sequence. The first 
character identifies the terminal, and must 
be the same character for all entries in 
the list; the second character identifies 
the specific component from which an input 
message is solicited. (If the second char- 
acter is the common polling character, 0, 
input messages are read from any ready 
component . ) 

To define an answering-polling list, code 
the operand field of a DFTRMLST macro like 
this: 



| DIALST,0, (xxyy, . ..) 

c „ 



To define a calling-polling list, code the 
DFTRMLST operand field like this: 



j DI ALST, dial count, dial chars, (xxyy, .. .) j 

i j 



Write Operations 

A Write Initial operation that calls a ter- 
minal requires a calling-addressing list; a 
Write Initieil operation that answers a call 
from a terminal requires an answering- 
addressing list. Either type of list may 
have one or more terminal entries (all 
representing the same terminal), each con- 
taining a two-character addressing 
sequence. The first character identifies 
the terminal, and must be the same for all 
entries in the list; the second character 
identifies the specific component that is 
to receive the output message. (If the 
second character is the common addressing 
character, 9, the output message is sent to 
all ready components.) 

To define a calling- addressing list, code 
the operand field of a DFTRMLST macro like 
this: 



| DIALST,dialcount,dialchars, (xxyy,...) 

L 



| DIALST,0, (xxyy,. ..) 

L 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial and Reset (TIR) 

(Using Answering- Polling List) 

READ Initial answers a call from a termi- 
nal, polls it, reads the response, and if 
the response is positive, reads a message 
block. If the response is negative, the 
operation is posted complete. 

1 . Disable 



2. 


Enable 




3. 


Write 


Pad characters 


4. 


Write 


EOT EOT EOT 


5. 


Write 


Polling sequence 


6. 


Read 


Response 


7. 


Read 


Text 


8. 


Write 


EOA EOT (TIR only) 


i 9. 
1 


Disable 


(TIR only) 


J 

READ 


Initial 


(TI) 


! READ 


Initial 


and Reset (TIR) 


(Using Calling-Polling List) 



READ Initial dials the terminal, polls it, 
and if the response is positive, reads a 
message hlock. If the response is nega- 
tive, the operation is posted complete. 



1. 


Disable 




2. 


Dial 


Dial Digits 


3. 


Write 


Pad characters 


4. 


Write 


EOT EOT EOT 


5. 


Write 


Polling sequence 


6. 


Read 


Response 


7. 


Read 


Text 


8. 


Write 


EOA EOT (TIR only) 


9. 


Disable 


(TIR only) 


READ 


Continue 


(TT) 


READ 


Continue 


and Reset (TTR) 



READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI), READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and - 
sent the previous block. 

1. Write Circle Y 

2. Read Text 

3. Write EOA EOT (TTR only) 

4. Disable (TTR only) 
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READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
CTI) , READ Continue (TT), or another READ 
Repeat, to receive the same message block 
read by the previous operation. 

1. Write Circle N 

2. Read Text 

3. Write EOA EOT EOT EOT (TPR only) 

4. Disable (TPR only) 

Programming Note : In order to be able to 
issue READ Repeat for the paper tape reader 
or card reader, the reader must be equipped 
with the Line Correction feature. For 
either of these components you may issue it 
only twice in succession. Furthermore, you 
should use this macro for the paper tape 
reader only if the message block being read 
is less than 312 characters. (Otherwise, 
the time required to back up the tape for 
retransmission exceeds the time-out interv- 
al of the terminal.) 

READ Conversational (TV) 

READ Conversational and Reset (TVR) 

READ Conversational polls the terminal, and 
if the response to polling is positive, 
reads a message block. If the response is 
negative, the operation is posted complete. 
This macro is for polling and reading a 
message block from a terminal with which a 
previous READ or WRITE macro has already 
established the line connection. Its main 
purpose is to allow you to change from 
sending message blocks to receiving them, 
without having to reestablish the line con- 
nection. READ Conversational can follow a 
READ Initial (TI) , READ Continue(TT) , or 
READ Repeat (TP) , or a WRITE Initial (TI) , 
WRITE Continue (TT) , or WRITE Conversation- 
al (TV). 

The terminal list used by the READ Con- 
versation must be an open polling list 
(calling or answering) , of the DIALST 
format. 



1. 


Write 


EOT EOT EOT 


2. 


Write 


Polling Sequence 


3. 


Read 


Response 


4. 


Read 


Text 


5. 


Write 


EOA EOT (TVR only) 


6. 


Disable 


(TVR only) 



WRITE MACRO INSTRUCTIONS 

Programming Notes : 

1. The first block of a message received 
from a 1050 on a Read Initial or Read 
Conversational operation will begin 



with an EOA character. If the same 
message block is then sent to a 1050, 
it will print as #. This may be 
avoided by overlaying the EOA with an 
Idle character before sending the 
block. 

Each outgoing message block must end 
with EOB. 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

(Using Calling-Addressing List) 

WRITE Initial dials a terminal, addresses 
it, and if the response to addressing is 
positive, writes an EOA followed by message 
text and reads the response to text. If 
the response to addressing is negative, the 
operation is posted complete. 



1. 


Disable 




2. 


Dial 


Dial digits 


3. 


Write 


Pad characters 


4. 


Write 


EOT EOT EOT 


5. 


Write 


Addressing sequence 


6. 


Read 


Response 


7. 


Write 


EOA 


8. 


Write 


Text 


9. 


Read 


Response 


10. 


Write 


EOT (TIR only) 


11. 


Disable 


(TIR only) 


WRITE Initial 


(TI) 



WRITE Initial and Reset (TIR) 
(Using Answering- Addressing List) 

WRITE Initial answers a call from a termi- 
nal, addresses it, and if the response is 
positive, writes an EOA followed by message 
text and reads the response to text. If 
the response to addressing is negative, the 
operation is posted complete. 



1. 


Disable 




2. 


Enable 




3. 


Write 


Pad characters 


4. 


Write 


EOT EOT EOT 


5. 


Write 


Addressing sequence 


6. 


Read 


Response 


7. 


Write 


EOA 


8. 


Write 


Text 


9. 


Read 


Response 


10. 


Write 


EOT (TIR only) 


11. 


Disable 


(TIR only) 


WRITE Continue (TT) 


WRITE Continue and Reset (TTR) 



WRITE Continue writes a message block and 
reads a response from the terminal. This 
iracro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 

1. Write Text 

2. Read Response 
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3. 

4. 



Write 
Disable 



EOT (TTR only) 
(TTR only) 



WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 

WRITE Conversational writes a positive 
response to text (the EOA character is the 
positive response), addresses the terminal, 
and if the response to addressing is posi- 
tive, writes an EOA followed by message 
text and reads the response to text. If 
the response to addressing is negative, the 
operation is posted complete. 

The terminal list used by the WRITE Con- 
versational must be an addressing list 
(calling or answering) of the DIALST 
format. 



1. Write 


EOA EOT EOT EOT 


2. Write 


Addressing sequence 


3 . Read 


Response 


4. Write 


EOA 


5. Write 


Text 


6 . Read 


Response 


7. Write 


EOT (TVR only) 


8 . Disable 


(TVR only) 


WRITE Continue Conversational (TTV) 



2. 



WRITE Continue (TT) followed by a READ 
Conversational (TV) , but saves coding 
effort by allowing you to verify suc- 
cessful initiation and conclusion of 
the operation (that is, by checking 
return and completion codes) just 
once, instead of after each of the two 
separate macro instructions. 



You must specify a polling list entry 
in the WRITE TTV macro instruction. 



WRITE Positive Acknowledgment and 
Disconnect (TA) 



WRITE Positive Acknowledgment and Discon- 
nect writes a positive response to text (an 
EOA) and breaks the line connection. This 
iracro is for use following a successful 
READ operation when you wish to break the 
line connection instead of receiving the 
remaining blocks of a message. 



1. Write 

2. Disable 



EOA EOT 



WRITE Continue Conversational writes a mes- 
sage block and reads a response from the 
terminal, resets it to control mode, polls 
it, and upon receiving a positive response 
to polling, reads a message block. 



1. Write 


Text 


2 . Read 


Response 


3. Write 


EOT EOT EOT 


4. Write 


Polling Sequence 


5 . Read 


Response 


6 . Read 


Text 


Programming 


Notes : 



1. WRITE TTV performs exactly the same 
functions as would be performed by a 



WRITE Negative Acknowledgment and 
Disconnect (TN) 

WRITE Negative Acknowledgment and Discon- 
nect writes a negative acknowledgment (the 
EOT character serves this purpose) and 
breaks the line connection. This macro is 
for use following an unsuccessful Read 
operation when you wish to break the line 
connection instead of receiving the remain- 
ing blocks of a message. The macro may 
also be used after a write operation when 
you wish to break the line connection. 

1. Write EOT 

2. Disable 
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IBM 1060 DATA COMMUNICATION SYSTEM 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a two-character polling 
sequence. The first character identifies 
the control unit, the second identifies the 
teller terminal that is to be polled. 

To define a polling list, code the 
operand field of a DFTRMLST macro like this 



| ( OPENLST 1 | 

| (WRAPLSTJ, (xxyy,. ..) | 

I 1 

Write Operations 

A Write Initial operation requires an ad- 
dressing list having one terminal entry 
that contains a two-character addressing 
sequence. The first character identifies 
the control unit, the second identifies the 
teller terminal to which the message is to 
be sent. 



another READ Continue to receive another 
message block. 



1. 


Write 


Circle Y EOT EOT 


EOT 


2. 


Write 


Polling Sequence 




3. 


Read 


Response 




4. 


Read 


Text 




5. 


Write 


Circle Y EOT EOT 
(TTR only) 


EOT 


READ 


Repeat 


(TP) 




READ 


Repeat 


and Reset (TPR) 





READ Repeat writes a negative response, 
successively polls the terminals in the 
polling list, beginning with the terminal 
to which it sent the negative response, and 
upon receiving a positive response to poll- 
ing reads a message block. This macro is 
for use following an unsuccessful READ Ini- 
tial (TI), READ Continue (TT) or READ 
Repeat (TP) , to read the same message block 
received by the previous operation. 



1. 


Write 


Circle N EOT EOT EOT 


2. 


Write 


Polling Sequence 


3. 


Read 


Response 


4. 


Read 


Text 


5. 


Write 


Circle Y EOT EOT EOT 
(TPR only) 



To define an addressing list, code the 
DFTRMLST operand field like this: 



| OPENLST, xxyy 

L 



The list must be defined as an open list. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 

1. Write EOT EOT EOT 

2. Write Polling Sequence 

3. Read Response 

4. Read Text 

5. Write Circle Y EOT EOT EOT (TIR only 

READ Continue (TT) 

READ Continue and Reset (TTR) 

READ Continue writes a positive response, 
successively polls terminals in the polling 
list, beginning with the terminal to which 
it sent the response, and upon receiving a 
positive response to polling, reads a mes- 
sage block. This macro is for use follow- 
ing a successful READ Initial (TI) or 



WRITE MACRO INSTRUCTIONS 

Programming Note ; Each outgoing message 
block must end with ETB. 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial addresses a terminal, and if 
the response to address is positive, writes 
an EOA followed by message text and reads 
the response to text. If the terminal 
sends a negative response to addressing, 
the operation is posted complete. 



1. Write 


EOT EOT EOT 


2. Write 


Addressing sequence 


3. Read 


Response 


4. Write 


EOA 


5. Write 


Text 


6 . Read 


Response 


7. Write 


EOT EOT EOT (TIR only) 


WRITE Positive Acknowledgment (TA) 



WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT sequence 
to indicate to the terminal that the com- 
puter received message text without error 
and to stop line activity. This macro is 
for use after a Read operation, when you 
wish to stop receiving from the terminal 
before the terminal has sent an EOT. 

1. Write Circle Y EOT EOT EOT 
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WRITE Negative Acknowledgment (TN) 

WRITE Negative Acknowledgment writes an EOT 
sequence to indicate to the terminal that 
the computer received text with an error 
and to stop line activity. The terminal 
interprets the EOT sequence as a negative 
response. This macro is for use after a 
Read operation, when you wish to stop 
receiving from the terminal before the ter- 
minal has sent an EOT. 

1. Write EOT EOT EOT 
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IBM 2260/2848 DISPLAY COMPLEX (REMOTE) AND 
IBM 2265/2845 DISPLAY COMPLEX (REMOTE) 

The information in this section applies 
equally to the IBM 2260/2848 display com- 
plex and the IBM 2265/2845 display complex, 
except that references to multiple display 
stations and the general polling function 
do not apply to the 2265/2845 display com- 
plex (only one 2265 display station can be 
attached to a 2845 display control). 



DEFINING TERMINAL LISTS 



Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a two-character polling 
sequence. The first character identifies 
the 2848 or 2845 Display Control, the 
second identifies the 2260 or 2265 Display 
Station from which an input message is 
solicited. (If, for a 2260/2848, the 
second character is coded as X'FF', a gen- 
eral poll is performed.) 

To define a polling list, code the 
operand field of a DFTRMLST macro like 
this: 



STX 



specifies the start of text 
characters. 



j | OPENLST ) , (Xxyy , . . . ) 
|{WRAPLSTJ 

t 

Write Operations 



A Write Initial operation requires an ad- 
dressing list. The list may have one or 
more terminal entries, each containing a 
two-character addressing sequence. The 
first character identifies the 2848 or 2845 
Display Control, the second identifies the 
2260 or 2265 Display Station or 1053 print- 
er that is to receive the output message. 

To define an addressing list, code the 
DFTRMLST operand field like this: 



j OPENLST, (xxyy,...) 

L 



READ MACRO INSTRUCTIONS 

The format of a message received through a 
READ macro instruction is : 



r T T T T 1 

| STX | device address j £text]| (CAN]|ETX| 

i x x x x J 



device address 

identifies the sending unit (display 
station or printer) . 



text 



CAN 



ETX 



is the message text. 



is the cancel character, sent only if 
the display control detects an inter- 
nal operation error when transmitting 
the message. 



is the end-of-text character. 



READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial successively polls the display 
stations and printers in the polling list, 
and upon receiving a positive response to 
polling, reads a message block or a printer 
status message. 



1. 


Write 


STX and 15 EOT's 


2. 


Write 


Polling Sequence 


3. 


Write 


READ MI code 


4. 


Read 


Response 


5. 


Read 


Text 


6. 


Write 


STX EOT EOT EOT 



(TIR only) 



J Functions of the Read Initial Operation 



The Read Initial operation can have one of 
three functions: 

Specific Polling of One or More Display 
Stations : A Read Initial operation 
executed for this purpose is similar to the 
Read Initial for other types of terminals 
that use the polling scheme. That is, the 
stations to be polled are individually 
represented in a terminal list and polling 
proceeds until the end of the list is 
reached (open list) or until a station 
returns a positive response and a message 
block (open or wraparound list) . 

Requesting Printer Status : The function of 
polling ordinarily refers to contacting a 
terminal or terminal component to determine 
whether it has any message to send to the 
computer. With reference to the 1053 
printer attached to an IBM 2848 Display 
Control, the term polling means contacting 
the printer to see if it is ready to 
receive a message from the computer. (The 
printer may not be ready because the termi- 
nal operator is using it locally or because 
its power is off or it is out of paper.) 
In order to be ready, the printer mechanism 
must be ready and the printer buffer must 
not be in use. (The printer buffer is in 
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use when it is being filled from the key- 
board buffer or the line, or if its con- 
tents are currently being printed. ) If the 
printer, when polled, is ready, it returns 
to the computer a positive response, the 
format of which is STX (device address) 
ETX. 

If the printer is not ready, it returns 
a NAK; if the printer mechanism is ready 
but the printer buffer is in use, the 
printer returns an EOT. Either NAK or EOT 
is considered a negative response. Once 
the printer status is requested, whether 
the status is positive or negative the 
printer is in the "printer-request" condi- 
tion, which means that it is available only 
for a message sent by a Write operation. 

If a general poll operation (see below) 
is being executed after the status is 
requested, the printer returns the positive 
response when its status changes from not- 
ready to ready. The response is given the 
first time the printer is polled following 
the change to the ready condition. 

General Polling of a 2848 Display Control ; 
In this form of operation, which is 
achieved by coding X'FF* as the second byte 
of a single polling list entry, all the 
display stations and printers connected to 
the display control identified by the first 
character of the entry are polled in wrap- 
around fashion, i.e., continuously, until 
one of the stations returns a positive 
response or until the printer responds with 
a status indication. The printer is always 
polled first, then the display stations, in 
each polling "pass". (The printer status 
is returned when it is polled, either if a 
previous Read Initial operation requested 
the status indication or if a previous 
Write Initial operation for the printer was 
not possible because the printer was not 
free.) 

When a display station sends a response, 
the Read operation receives the message 
block into the input area specified in the 
READ macro. When a printer returns a 
response, the Read operation receives the 
status indication in the input area. 

Programming Note : It is advisable to turn 
on the end-of-list bit of the polling list 
entry for the printer when executing a Read 
Initial operation to request printer sta- 
tus; then if the printer returns a negative 
response the operation is posted complete 
and the negative response condition can be 
tested for in the DECB. If the end-of-list 
bit is not on, the negative response is 
treated just like a negative response from 
a display station; polling continues, with 
no response indication given in the DECB. 



READ Continue (TT) 

READ Continue and Reset (TTR) 

READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI) , READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same display station that sent the 
previous block. 



1. Write 

2 . Read 

3. Write 



ACK 

Text 

STX EOT (TTR only) 



READ Repeat (TPR) 

READ Repeat and Reset (TPR) 

(Display Only) 

Read Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI) , READ Continue (TT), or another READ 
Repeat, to receive the same message block 
read by the previous operation. 



1. Write 

2 . Read 

3. Write 



NAK 

Text 

STX EOT (TPR only) 



READ Buffer (TB) 

READ Buffer and Reset (TBR) 

(Display only) 

READ Buffer is intended for special appli- 
cations and for use in diagnosing equipment 
troubles. It receives the entire contents 
of the buffer of the specified display 
station. 



STX and 15 EOT*s 

Polling sequence 

Read Buffer Code 

Response 

Text 

STX EOT EOT EOT (TBR only) 



Programming Note : At the completion of the 
Read Buffer operation you must issue a 
WRITE Erase to erase the screen or else 
write a message that will overlay the pre- 
vious buffer. 



WRITE MACRO INSTRUCTIONS 

The format of a message sent through a 
WRITE macro instruction is: 



1. 


Write 


2. 


Write 


3. 


Write 


<*. 


Read 


5. 


Read 


6. 


Write 



r t t 1 

| STX | text j ETX J 
i x x J 

BTAM supplies the STX character; it is 
not provided by the user. The ETX charac- 
ter must be the last character of a message 
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WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

(Display or Printer) 



WRITE Initial addresses a display station 
or printer, and if the response to address- 
ing is positive, writes an STX and the mes- 
sage text, then reads the response from the 
addressed unit. If the response to ad- 
dressing is negative, the operation is 
posted complete. 



1. Write 


STX and 15 EOT*s 


2. Write 


Addressing sequence 


3. Write 


Write Code 


4. Read 


Response 


5. Write 


STX 


6. Write 


Text 


7 . Read 


Response 


8. Write 


STX EOT EOT EOT (TIR only) 


Programming 


Notes: 

















1 


Dis 


play 


Line Addresses 


j 




r~ 






| EBCDIC 




| Display! 2260 or 


2265 


j. T 


-1 


|Line 
1 1 


-+- 


Code 


(hex) 


| Code ( hex) | Character | 
—i— — — — i— J 


50 




1 F0 | 


j 


1 2 




51 




1 Fl | 


1 1 


1 3 




52 




1 F2 | 


2 I 


1 4 




53 




1 F3 | 


3 I 


1 5 




54 




1 F4 | 


<l 1 


1 ^ 




55 




1 F5 | 


5 I 


1 7 




56 




1 F6 | 


6 1 


1 8 




57 




1 F7 | 


7 I 


1 ^ 




58 




1 F8 | 


8 1 


1 io 




59 




1 F9 | 


9 1 


1 11 




5A 




1 7A j 


; 1 


1 12 




5B 




1 5E | 


i 1 


1 13 




5C 




1 "C | 


< | 


1 1* 




5D 




1 7E | 


= | 


1 15 




5E 




1 6E | 


> | 














Figure 


21. 


IBM 


2260 


AND 2265 Display Line 



Addresses 



1. If you issue a WRITE Initial to send a 
message block to the printer and the 
printer returns a negative response 
(NAK or EOT) to addressing, the opera- 
tion is posted complete; the message 
text is not sent. If the response is 
positive, the message is sent. If an 
error occurs during transmission of 
text, the printer buffer is cleared. 
You may retry the operation with a 
WRITE Continue macro. 

2. If you issue a WRITE Initial to send a 
message block to a display station, a 
positive response is normally received 
and the text is sent. If during 
transmission of text, an error occurs, 
you may retry the operation by issuing 
a WRITE Continue, but the message con- 
taining the error is not cleared. You 
may also res end the message with a 
WRITE Erase macro, or with a READ Buf- 
fer followed by a WRITE Erase, if sev- 
eral messages were displayed. 

WRITE at Line Address (TL) 

WRITE at Line Address and Reset (TLR) 

(Display Only) , 

WRITE at Line Address has the same function 
as a WRITE Initial, but permits specifying 
the display line on which the message is to 
be displayed. 



1. 


Write 


STX and 15 EOT's 


2. 


Write 


Addressing sequence 


3. 


Write 


Line Address Code 


4. 


Read 


Response 


5. 


Write 


STX 


6. 


Write 


Text 


7. 


Read 


Response 


8. 


Write 


STX EOT EOT EOT (TLR only) 



Programming Note : The first byte of the 
message text must contain a line address 
character. The message will be displayed 
starting at the beginning of that line. 
See Figure 21 for valid display line 
addresses. 



WRITE Erase (TS) 

WRITE Erase and Reset (TSR) 

(Display Only) 

WRITE Erase has the same function as a 
WRITE Initial, but also causes the display 
station screen to be erased before the roes- 
sage is displayed. 



1. Write 


STX and 15 EOT's 


2. Write 


Addressing sequence 


3. Write 


Erase code 


4. Read 


Response 


5. Write 


STX 


6. Write 


Text 


7. Read 


Response 


8. Write 


STX EOT EOT EOT (TSR only) 


WRITE Continue (TT) 


WRITE Continue and Reset (TTR) 


(Display or 


Printer) 



WRITE Continue writes a message block and 
receives a response. This macro is for use 
following any Read or Write operation that 
did not include the Reset function. 

1. Write STX 

2. Write Text 

3. Read Response 

4. Write STX EOT EOT EOT (TTR only) 
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WRITE Positive Acknowledgment (TA) 
(Display Only) 

WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT to indi- 
cate that the computer received the message 
text without error and to stop line activi- 
ty. This macro is for use following a Read 
operation when you wish to stop receiving 
from the display station. 

1. Write STX EOT 

WRITE Negative Acknowledgment (TN) 
(Display Only) 

WRITE Negative Acknowledgment writes an 
EOT, which constitutes a negative response 
indicating that the computer received the 
message text with an error and to stop line 
activity. This macro is for use following 
a Read operation when you wish to stop 
receiving from the display station. 

1. Write EOT 
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IBM 2740 COMMUNICATION TERMINAL — GENERAL 
INFORMATION 

The IBM 2740 Communication Terminal 
(Model 1 or 2) is available with several 
features or combinations of features. Of 
these, BTAM supports the following: 

2740 on Nonswitched Lines : 

Basic 2740 
2740 with Checking 
2740 with Station Control 
274 with Checking and Station Control 
2740 with Checking and 2760 Optical 
Image Unit 

2740 on Switched Lines : 

2740 Dial 

2740 Dial, with Checking 

2740 Dial, with Transmit Control 

2740 Dial, with Checking and Transmit 

Control 

2740 Dial, with Checking and 2760 

Optical Image Unit 

The channel programs differ for the 
various feature combinations and are there- 
fore explained separately on the following 
pages. (See "IBM 2760 Optical Image Unit" 
for information about the 2760.) 

Programming Notes : 

1. The 2740 without station control and 
transmit control does not react to a 
transmission control unit (TCU) 
timeout, nor does it time out along 
with the TCU. Following a TCU 
timeout, the 2740 is left in transmit 
text mode is unresponsive to channel 
commands. The terminal operator must 
then depress the EOT key or power down 
and back up to place the 2740 in con- 
trol receive mode. 

2. Only 2740 terminals equipped with the 
Checking feature provide an automatic 
response to messages received from the 
computer. For 2740s not having this 
feature, responses, if desired, must 
be entered manually from the 2740 key- 
board, and the program must be able to 
receive such responses. That is, each 
Write operation for which a response 
is required must be followed by a Read 
operation. It is up to the user to 
establish a convention for responses; 
for example, to consider the letter Y 
received from the terminal as a posi- 
tive response (the terminal received 
the message correctly) and the letter 
N received from the terminal as a 
negative response (the terminal 
received the message incorrectly and 
the program should resend the same 
message) . 



3. Each message sent to a 2740 Model 2 
that is equipped with the Buffered 
Receive feature must end with an EOT 
character; the EOT must be supplied by 
the user program. 

4. Multiple- block messages must not be 
sent to a 2740 Model 2 that is 
equipped with the Buffered Receive and 
Checking features, because (a) the 
contents of the buffer are printed 
only when an EOT is received from the 
computer, and (b) all blocks are read 
into the same buffer. This means that 
if a multiple-block message is 
received, only the block received just 
prior to the EOT will be printed; all 
previous blocks will have been succes- 
sively overlaid in the buffer. 

5. In sending message text to a 2740 
Model 2 with the Buffered Receive fea- 
ture, be careful to avoid a buffer 
overflow condition that will occur if 
the central computer sends a message 
block exceeding the capacity of the 
terminal buffer. This can happen even 
when the length of the message block 
in main storage is less than the buf- 
fer size. For each change in case 
(upper to lower, or vice versa), the 
TCU inserts a shift character in the 
data stream going to the terminal. 
You should ensure not only that the 
length of the message block in main 
storage is shorter than the 2740 buf- 
fer, but that it is shorter by an 
amount sufficient to allow for the 
inserted shift characters. 

6. The Model 2 responds to addressing 
with a two- character reply. If the 
response is positive, the first char- 
acter indicates whether an error 
occurred during the previous Write 
operation while transferring data from 
the buffer to the printer; if an error 
occurred, its nature is indicated. 
The second character is the positive 
response, circle Y. 

If the response is negative, the first 
character indicates the reason for 
that response; the second character is 
the negative response, circle N. 

The two- character response is received 
in the DECRESPN field of the DECB for 
the line. 

The operation is posted complete, with 
or without error, in the event control 
block for the line, and the appropri- 
ate bits are set in the DECFLAGS field 
of the DECB. 

Following each Write operation you 
should examine the first byte of the 
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DECRESPN field to determine whether an 
error occurred, and what kind it is. 



The characters (in hexadecimal nota- 
tion) and their meanings are as 
follows ., 

Positive response (second character is 



Negative response (second character is 
Circle N) 



Circle 


Y) 




First 






Character 


Meaninq 


X'Ol' 




(No error; buffer success- 
fully printed) 


X f 23' 




Failure in electronic 
circuit 


X^* 




I/O device failure 


X*2<) % 




VRC error in text received 
on line 


X'31' 




Parity error in text 
received on line. 



When the first character is other than 
X*01', BTAM prints message IEA000I 
(I/O ERR) at the central computer con- 
sole (and/or teleprocessing or other 
console, if the operating system 
includes multiple console support) . 
See Appendix C for the format of this 
message. 



First 
Character 

X , 02 i 
X^O^ 



X'10' 
X'13' 



x^os 1 



Meaninq 

Terminal is in Bid mode 
Terminal is in Communic- 
ate mode 

Terminal is in Communic- 
ate mode with document 
device down 

Terminal is in Local mode 
Terminal is in Communic- 
ate mode but is out of 
paper 

Contents of buffer are 
being printed. 



When the first character is X*10, 
X*13\ or X^O 1 , BTAM posts the opera- 
tion complete-with- error (completion 
code X*41* in DECSDECB) and prints 
message IEA000I (I/O ERR) at the 
central computer console (and/or tele- 
processing or other console, if the 
operating system includes multiple 
console support). See Appendix C for 
the format of this message. When the 
first character is X*02', X'OU*, or 
X'OS', BTAM posts the operation with 
normal completion. 
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IBM 27U0 (BASIC) 

Read and Write operations for the basic 
2710 require no terminal lists. 



WRITE MACRO INSTRUCTIONS 

WRITE Initial (TI ) 

WRITE Initial and Reset (TIR) 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial monitors the line for an EOA 
sent by the terminal and reads the message 
block that follows. This is the only macro 
used to receive text. 

1. Write EOT 

2. Prepare 

3 . Read Text 



WRITE Initial writes an EOA to place the 
terminal in receive state, then writes mes- 
sage text. This is the only macro used to 
send text. 



1. Write EOA and 15 Idle Characters 

2. Write Text 

3. Write EOT (TIR only) 



68 OS/VS BTAM SRL 



IBM 2740 WITH CHECKING FEATURE 

The macro instructions in this section 
apply to a 2740 used as an operator's con- 
sole (under the Multiple Console Support 
option of OS/VS as well as to a 2740 used 
as a regular terminal. 

Read and Write operations for the 2740 
with the checking feature require no termi- 
nal lists. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial monitors the line for an EOA 
sent by the terminal and reads the message 
block that follows. 



1. 


Write 


EOT EOT 


EOT 








2. 


Prepare 












3. 


Sense 












4. 


Read 


Text 










5. 


Write 


EOA EOT 


EOT 


EOT 


(TIR 


only) 


READ 


Continue (TT) 










READ 


Continue and Reset 


(TTR) 







READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI), READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 

1. Write Circle Y 

2. Read Text 

3. Write EOA EOT EOT EOT (TTR only) 

READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI) , READ Continue (TT), or another READ 
Repeat, to receive the same message block 
read by the previous operation. 

1. Write Circle N 

2. Read Text 

3. Write EOA EOT EOT EOT (TPR only) 



WRITE MACRO INSTRUCTIONS 
Programming Notes 

1. Each outgoing message block roust end 
with EOB. 

2. Once it is in receive mode, the termi- 
nal cannot begin sending message text 



until it receives EOT. Therefore, 
following one or more Write opera- 
tions, you roust arrange to send EOT to 
put the terminal in stand-by mode. 
This may be done by specifying the 
reset option in the last Write opera- 
tion (i.e., TIR, TTR, or TVR) , or ty 
following the last Write operation by 
a Write TN macro. 

Restriction ; If a Read Initial operation 
immediately follows a Write with Reset 
operation, the first byte of data may be 
lost. 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial writes an EOA to place the 
terminal in receive state and turn on the 
terminal motors, writes message text, and 
reads the response. 

1. Write EOA and 15 idle Characters 

2. Write Text 

3. Read Response 

4. Write EOT (TIR only) 



WRITE Continue (TT) 

WRITE Continue and Reset (TTR) 

WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 



1. Write 

2. Read 

3. Write 



Text 

Response 

EOT (TTR only) 



WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 

WRITE Conversational writes an EOA to place 
the terminal in receive state, writes mes- 
sage text, and reads the response. This 
macro is for use following a Read opera- 
tion, to change from receiving text to 
sending text. 



1. Write 

2. Write 

3. Read 

4. Write 



EOA 

Text 

Response 

EOT (TVR only) 



WRITE Continue Conversational (TTV) 

WRITE Continue Conversational writes a mes- 
sage block and reads a response from the 
terminal, then resets it to control mode, 
monitors the line for an EOA from the ter- 
minal and reads the message block that 
follows. 
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1. 


Write 


Text 


2. 


Read 


Response 


3. 


Write 


EOT EOT EOT 


U. 


Prepare 




5. 


Sense 




6. 


Read 


Text 


Prog 


ramming 


Note: WRITE 



exactly the same functions as would be per- 
formed by a WRITE Continue (TT) followed by 
a READ Initial (TI), but saves coding 
effort by allowing you to verify successful 
initiation and conclusion of the operation 
(i.e., by checking return and completion 
codes) just once, instead of after each of 
the two separate macro instructions. 

WRITE Positive Acknowledgment (TA) 

WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT sequence 
to indicate to the terminal that the com- 
puter received message text without error 
and to stop line activity. This macro is 



for use after a Read operation, when you 
wish to stop receiving from the terminal 
before the terminal has sent an EOT. 

1. Write EOA EOT EOT EOT 



WRITE Negative Acknowledgment (TN) 

WRITE Negative Acknowledgment writes an EOT 
sequence to indicate to the terminal that 
the computer received text with an error 
and to stop line activity. The terminal 
interprets the EOT sequence as a negative 
response. This macro is for use after a 
Read operation, when you wish to stop 
receiving from the terminal before the ter- 
minal has sent an EOT, or after one or more 
Write operations, when you wish to begin 
receiving from the terminal via Read opera- 
tions (the terminal cannot begin sending 
text until it receives EOT) . 

1. Write EOT EOT EOT 
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IBM 2740 WITH DIAL-UP FEATURE 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an an- 
swering list, which you define by coding 
the operand field of a DFTRMLST macro like 
this: 



after a previous READ or WRITE macro has 
established the line connection. 

1. Prepare 

2. Read Text 

3. Write EOT (TVR only) 

4. Disable (TVR only) 



WRITE MACRO INSTRUCTIONS 



| DIALST,0 
L 



Write Operations 

A Write Initial operation requires a call- 
ing list, which you define by coding the 
DFTRMLST operand field like this: 

r 1 

| DIALST,dialcount,dialchars | 

t_ j 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial answers a call from a terminal 
and reads a message block. 

1 . Disable 

2. Enable 

3. Prepare 

4. Read Text 

5. Write EOT (TIR only) 

6. Disable (TIR only) 

READ Conversational (TV) 

READ Conversational and Reset (TVR) 

READ Conversational monitors the line for 
an EOA sent by the terminal and reads the 
message text that follows. This macro is 
for reading a message block from a terminal 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial dials a terminal, writes an 
EOA to place the terminal in receive state, 
and writes message text. 

1. Disable 

2. Dial Dial digits 

3. Write Pad characters 

4 . Write EOA 

5. Write Text 

6. Write EOT (TIR only) 

7. Disable (TIR only) 

WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 

WRITE Conversational writes an EOA to place 
the terminal in receive state and writes 
message text. This macro is for use fol- 
lowing a Read operation to change from 
receiving text to sending text, when the 
line connection is already established. 

1. Write EOA 

2. Write Text 

3. Write EOT (TVR only) 

4. Disable (TVR only) 

WRITE Disconnect (TN) 

WRITE Disconnect breaks the line 
connection. 

1. Write EOT 

2. Disable 
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IBM 2740 WITH DIAL-UP AND CHECKING FEATURES 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an an- 
swering list, which you define by coding 
the operand field of a DFTRMLST macro like 
this: 



| DIALST,0 



1. Write Circle Y 

2. Read Text 

3. Write EOA EOT CTTR only) 

4. Disable (TTR only) 

READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI), READ Continue (TT) , or another READ 
Repeat, to receive the same message block 
read by the previous operation. 



Write Operations 

A Write Initial operation requires a call- 
ing list, which you define by coding the 
DFTRMLST operand field like this: 



| DIALST,dialcount,dialchars 

t 



A Write Initial operation that encounters 
an answering list, which is defined by cod- 
ing the operand field of a DFTRMLST macro 
instruction as follows: 



| DIALST,0 



allows a write to answer a call from a ter- 
minal and immediately initiates data 
transfer to the terminal. In this case, no 
data (EOA) is expected from the calling 
terminal. 



1. Write 

2. Read 

3. Write 

4. Disable 



Circle N 

Text 

EOA EOT (TPR only) 

(TPR only) 



READ Conversational (TV) 

READ Conversational and Reset (TVR) 

READ Conversational monitors the line for 
an EOA sent by the terminal and reads the 
message block that follows. This macro is 
for use following a Write operation, to 
change from sending text to receiving text. 





1. 


Write 


EOT 


1 


2. 


Prepare 




1 


3. 


Read 


Text 


J 


4. 


Write 


EOA EOT (TVR only) 




5. 


Disable 


(TVR only) 



WRITE MACRO INSTRUCTIONS 



READ MACRO INSTRUCTIONS 



Programming Note : Each outgoing message 
block must end with EOB. 



READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial answers a call from a termi- 
nal, monitors the line for an EOA sent by 
the terminal, and reads the message block 
that follows. 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial dials a terminal, writes an 
EOA to place the terminal in receive state, 
writes message text, and reads the response 
to text. 



1. 


Disable 




2. 


Enable 




3. 


Prepare 




4. 


Read 


Text 


5. 


Write 


EOA EOT (TIR only) 


6. 


Disable 


(TIR only) 


READ 


Continue 


(TT) 


READ 


Continue 


and Reset (TTR) 



READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI), READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 



1. 


Disable 






2. 


Dial 


Dial digits (TI 


and TIR) 


3. 


Enable 


(TI with Answer 


List only) 


4. 


Write 


Pad characters 




5. 


Write 


EOA 




6. 


Write 


Text 




7. 


Read 


Response 




8. 


Write 


EOT (TIR only) 




9. 


Disable 


(TIR only) 




WRITE Continue 


(TT) 




WRITE Continue 


and Reset (TTR) 





WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 
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1. Write 

2. Read 

3. Write 

4. Disable 



Text 
Res pons e 
EOT (TTR only) 
(TTR only) 



WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 



versational (TV), but saves coding effort 
by allowing you to verify successful 
initiation and conclusion of the operation 
(that is, by checking return and completion 
codes) just once, instead of after each of 
the two separate macro instructions. 



WRITE Conversational writes an EOA to place 
the terminal in receive state, writes mes- 
sage text, and reads the response. This 
macro is for use following a Read opera- 
tion, to change from receiving text to 
sending text. 



1. 


Write 


EOA 


2. 


Write 


Text 


3. 


Read 


Response 


4. 


Write 


EOT (TVR only) 


5. 


Disable 


(TVR only) 



WRITE Continue Conversational (TTV) 

WRITE Continue Conversational writes a mes- 
sage block and reads a response from the 
terminal, then resets it to control mode, 
monitors the line for an EOA from the ter- 
minal and reads the message block that 
follows. 



1. write 


Text 


2 . Read 


Response 


3. Write 


EOT EOT EOT 


4 . Prepare 


5. Sense 




6 . Read 


Text 


Programming 


Note: WRITE 



WRITE Positive Acknowledgment and 
Disconnect (TA) 



WRITE Positive Acknowledgement and Discon- 
nect writes a positive response to text (an 
EOA) and breaks the line connection. This 
macro is for use following a successful 
READ operation when you wish to break the 
line connection instead of receiving the 
remaining blocks of a message. 



1. Write EOA EOT 

2 . Disable 

WRITE Negative Acknowledgment and 
Disconnect (TN) 

WRITE Negative Acknowledgment and Discon- 
nect writes a negative acknowledgment (the 
EOT character serves this purpose) and 
breaks the line connection. This macro is 
for use following an unsuccessful Read 
operation when you wish to break the line 
connection instead of receiving the remain- 
ing blocks of a message. The macro may 
also be used after a write operation when 
you wish to break the line connection. 



same functions as would be performed by a 
WRITE Continue (TT) followed by a READ Con- 



1. 
2. 



Write 
Disable 



EOT 
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IBM 2740 WITH DIAL-UP AND TRANSMIT CONTROL 
FEATURES 



CAUTION ; A 2740 having the Transmit Con- 
trol feature is equipped with a Transmit 
Control switch. This switch must always be 
in the MTC position when the 2740 is under 
BTAM control. 



1. 


Disable 


2. 


Enable 


3. 


Write 


4. 


Write 


5. 


Read 


6. 


Read 


7. 


Write 



Pad characters 
Selection sequence 
Response 
Text 

EOT (TIR only) 
8. Disable (TIR only) 

READ Conversational (TV) 

READ Conversational and Reset (TVR) 



DEFINING TERMINAL LISTS 

A Read Initial or Write Initial operation 
that answers a call from a terminal 
requires an answering list, which you 
define by coding the operand field of a 
DFTRMLST macro like this: 



| DIALST, 

L 



A Read Initial or Write Initial operation 
that calls a terminal requires a calling 
list, which you define by coding the 
DFTRMLST operand field like this: 



| DIALST, dialcount,dialchars 

L 



READ Conversational writes a selection 
sequence, and if the response is positive, 
reads a message block. If the response is 
negative, the operation is posted complete. 
This macro is for use following a Write 
operation, to change from sending text to 
receiving text. 

1. Write Selection sequence 

2. Read Response 

3. Read Text 

4. Write EOT (TVR only) 

5. Disable (TVR only) 



WRITE MACRO INSTRUCTIONS 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

(Using Calling List) 



WRITE Initial dials a terminal, writes an 
EOA to place the terminal in receive state, 
and writes message text to the terminal. 



READ MACRO INSTRUCTIONS 



READ Initial (TI) 

READ Initial and Reset (TIR) 

(Using Calling List) 

READ Initial dials a terminal, writes a 
selection sequence, and if the response is 
positive, reads a message block. If the 
response is negative, the operation is 
posted complete. 



1. Disable 




2 . Dial 


Dial digits 


3. Write 


Pad characters 


4. Write 


Selection sequence 


5. Read 


Response 


6. Read 


Text 


7. Write 


EOT (TIR only) 


8. Disable 


(TIR only) 


READ Initial 


(TI) 


READ Initial 


and Reset (TIR) 


(Using Answering List) 



READ Initial answers a call from a termi- 
nal, writes a selection sequence, and if 
the response is positive, reads a message 
block. If the response is negative, the 
operation is posted complete. 



1. Disable 




2. Dial 


Dial digits 


3. Write 


Pad characters 


4. Write 


EOA 


5. Write 


Text 


6. Write 


EOT (TIR only) 


7. Disable 


(TIR only) 


WRITE Initial 


(TI) 


WRITE Initial 


and Reset (TIR) 


(Using Answering List) 



WRITE Initial answers a call from a termi- 
nal, writes an EOA to place it in receive 
state, and writes message text to the 
terminal. 



1. Disable 




2. Enable 




3. Write 


Pad characters 


'*. Write 


EOA 


5 . Write 


Text 


6. Write 


EOT (TIR only) 


7. Disable 


(TIR only) 


WRITE Conversational (TV) 


WRITE Conversational and Reset (TVR) 



WRITE Conversational writes message text to 
the terminal. This macro is for use fol- 



74 OS/VS BTAM SRL 



lowing a Read operation, to change from WRITE Disconnect (TN) 
receiving text to sending text. 

WRITE Disconnect breaks the line 

connection. 

1 . Write EOA 

2. Write Text 

3. Write EOT (TVR only) 1. Write EOT 
*». Disable (TVR only) 2. Disable 
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IBM 2740 WITH DIAL-UP, TRANSMIT CONTROL. 
AND CHECKING FEATURES 

CAUTION ; A 2740 having the Transmit Con- 
trol feature is equipped with a Transmit 
Control switch. This switch must always be 
in the MTC position when the 2740 is under 
BTAM control. 



DEFINING TERMINAL LISTS 

A Read Initial or Write Initial operation 
that answers a call from a terminal 
requires an answering list, which you 
define by coding the operand field of a 
DFTRMLST macro like this: 



| DIALST,0 

L 



A Read Initial or Write Initial operation 
that calls a terminal requires a calling 
list, which you define by coding the 
DFTRMLST operand field like this: 



| DIALST,dialcount,dialchars 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 
READ Initial and Reset (TIR) 
(Using Calling List) 

READ Initial dials a terminal, writes a 
selection sequence, and if the response is 
positive, reads a message block. If the 
response is negative, the operation is 
posted complete. 

1. Disable 



2. Dial 


Dial digits 


3. Write 


Pad characters 


4. Write 


Selection sequence 


5 . Read 


Response 


6. Read 


Text 


7. Write 


EOA EOT (TIR only) 


8. Disable 


(TIR only) 


READ Initial 


(TI) 


READ Initial 


and Reset (TIR) 


(Using Answering List) 



7. Write EOA EOT (TIR only) 

8. Disable (TIR only) 

READ Continue (TT) 

READ Continue and Reset (TTR) 

READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI) , READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 



1. Write 

2. Read 

3. Write 

4. Disable 



Circle Y 

Text 

EOA EOT (TTR only) 

(TTR only) 



READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI), READ Continue (TT) , or another READ 
Repeat, to receive the same message block 
read by the previous operation^ 

1. Write Circle N 

2. Read Text 

3. Write EOA EOT (TPR only) 

4. Disable (TPR only) 

READ Conversational (TV) 



READ Conversational and Reset (TVR) 

READ Conversational writes a selection 
sequence, and if the response is positive, 
reads a message block. If the response is 
negative, the operation is posted complete. 
This macro is for use following a Write 
operation, to change from sending text to 
receiving text. 



1. 


Write 


EOT EOT EOT 


2. 


Write 


Selection sequence 


3. 


Read 


Response 


4. 


Read 


Text 


5. 


Write 


EOA EOT (TVR only) 


6. 


Disable 


(TVR only) 



WRITE MACRO INSTRUCTIONS 



READ Initial answers a call from a termi- 
nal, writes a selection sequence, and if 
the response is positive, reads a message 
block. 



1. 


Disable 




2. 


Enable 




3. 


Write 


Pad characters 


4. 


Write 


Selection sequence 


5. 


Read 


Response 


6. 


Read 


Text 



Programming Note : Each outgoing message 
block must end with EOB. 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

(Using Calling List) 

WRITE Initial dials a terminal, writes an 
EOA to place the terminal in receive state, 
writes message text to the terminal, and 
reads a response from the terminal. 
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1. 


Disable 




2. 


Dial 


Dial digits 


3. 


Write 


Pad characters 


4. 


Write 


EOA 


5. 


Write 


Text 


6. 


Read 


Response 


7. 


Write 


EOT (TIR only) 



8. Disable (TIR only) 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

(Using Answering List) 

WRITE Initial answers a call from the ter- 
minal, writes an EOA to place it in receive 
state, writes message text to the terminal, 
and reads a response from the terminal. 



1. 


Disable 






2. 


Enable 






3. 


Write 


Pad charact 


ers 


a. 


Write 


EOA 




5. 


Write 


Text 




6. 


Read 


Response 




7. 


Write 


EOT (TIR only) 


8. 


Disable 


(TIR only) 




WRITE Continue (TT) 




WRITE Continue and Reset 


(TTR) 



WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 



1. Write 

2. Read 

3. Write 

4. Disable 



Text 

Response 
EOT (TTR only) 
(TTR only) 



WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 



WRITE Conversational writes an EOA to place 
the terminal in receive state, writes mes- 
sage text, and reads the response. This 
macro is for use following a Read opera- 
tion, to change from receiving text to 
sending text. 



1. Write 

2. Write 

3 . Read 

4. Write 



EOA 

Text 

Response 

EOT (TVR only) 



5. Disable (TVR only) 

WRITE Positive Acknowledgment and 
Disconnect (TA) 

WRITE Positive Acknowledgment and Discon- 
nect writes a positive response to text (an 
EOA) and breaks the line connection. This 
macro is for use following a successful 
Read operation when you wish to break the 
line connection instead of receiving the 
remaining blocks of a message. 



1. 
2. 



Write 
Disable 



EOA EOT 



WRITE Negative Acknowledgment and 
Disconnect (TN) 

WRITE Negative Acknowledgment and Discon- 
nect writes a negative acknowledgment (the 
EOT character serves this purpose) and 
breaks the line connection. This macro is 
for use following an unsuccessful Read 
operation when you wish to break the line 
connection instead of receiving the remain- 
ing blocks of a message. The macro may 
also be used after a write operation when 
you wish to break the line connection. 

1. Write EOT 

2. Disable 



Start-Stop Read and Write Operations 77 



IBM 27 40 WITH STATION CONTROL FEATURE 



READ MACRO INSTRUCTIONS 



DEFINING TERMINAL LISTS 



READ Initial (TI) 



Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a single polling character that 
identifies the terminal. To define a poll- 
ing list, code the operand field of a 
DFTRMLST macro like this: 



READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 



1. Write 

2. Write 

3. Write 

4. Read 

5. Read 



EOT EOT EOT 
Polling character 
Space character 
Response 
Text 







1 


OPENLST ) 


1 


WRAPLST), (XX,. . .) 







WRITE MACRO INSTRUCTIONS 



Write Operations 

A Write Initial operation requires an ad- 
dressing list having a single entry, con- 
taining a single addressing character that 
identifies the terminal that is to receive 
the output message. To define an address- 
ing list, code the operand field of a 
DFTRMLST macro like this: 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 



WRITE Initial addresses a terminal, and if 
the response is positive, writes an EOA to 
set the terminal to receive state and 
writes message text to the terminal. If 
the terminal sends a negative response to 
addressing, the operation is posted 
complete. 



| OPENLST ,xx 

i 



1 

1 


1. 


Write 


EOT EOT EOT Circle S 


J 


2. 


Write 


Addressing character 




3. 


Write 


Space character 




4. 


Read 


Response 




5. 


Write 


EOA 




6. 


Write 


Text 




7. 


Write 


EOT EOT EOT (TIR only) 
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IBM 2740 WITH STATION CONTROL AND CHECKING 
FEATURES 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a single polling character that 
identifies the terminal. To define a poll- 
ing list, code the operand field of a 
DFTRMLST macro like this: 



OPENLST) 
WRAPLST), (xx,...) 



Write Operations 

A Write Initial operation requires an ad- 
dressing list having a single entry, con- 
taining a single addressing character that 
identifies the terminal that is to receive 
the output message. To define an address- 
ing list, cod€» the operand field of a 
DFTRMLST macro like this: 



| OPENLST, xx 

l 



READ MACRO INSTRUCTIONS 



READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 



1. 


Write 


EOT EOT EOT 


2. 


Write 


Polling character 


3. 


Write 


Space character 


4. 


Read 


Response 


5. 


Read 


Text 


6. 


Write 


EOA EOT EOT EOT (TIR only) 


READ 


Continue 


(TT) 


READ 


Continue 


and Reset (TTR) 



READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI) , READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 

1. Write Circle Y 

2. Read Text 

3. Write EOA EOT EOT EOT (TTR only) 



READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI) , READ Continue (TT) , or another READ 
Repeat, to receive the same message block 
read by the previous operation. 

1. Write Circle N 

2. Read Text 

3. Write EOA EOT EOT EOT (TPR only) 



WRITE MACRO INSTRUCTIONS 

Programming Note : Each outgoing message 
block must end with EOB. 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial addresses a terminal, and if 
the response to addressing is positive, 
writes EOA followed by message text and 
reads the response from the terminal. 





1. 


Write 


EOT EOT EOT Circle S 




2. 


Write 


Addressing character 




3. 


Write 


Space character 


"1 


4. 


Read 


Response 


1 


5. 


Write 


EOA 


J 


6. 


Write 


Text 




7. 


Read 


Response 




8. 


Write 


EOT EOT EOT (TIR only) 




WRITE Continue (TT) 




WRITE Continue and Reset (TTR) 



WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 

1. Write Text 

2 . Read Response 

3. Write EOT EOT EOT (TTR only) 

WRITE Positive Acknowledgment (TA) 

WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT sequence 
to indicate to the terminal that the corn- 
niter received message text without error 
and to stop line activity. This macro is 
for use after a Read operation, when you 
wish to stop receiving from the terminal 
before the terminal has sent an EOT. 

1. Write EOA EOT EOT EOT 

WRITE Negative Acknowledgment (TN) 

WRITE Negative Acknowledgment writes an EOT 
sequence to indicate to the terminal that 
the computer received text with an error 
and to stop line activity. The terminal 
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interprets the EOT sequence as a negative 
response. This macro is for use after a 
Read operation, when you wish to stop 
receiving from the terminal before the ter- 
minal has sent an EOT. 



1. Write EOT EOT EOT 
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IBM 2760 OPTICAL IMAGE UNIT — GENERAL 
INFORMATION 



OPERATION AND MESSAGE FORMATS 



This section 
tions of the 
and explains 
mats of messa 
(See the 2760 
in the Prefac 
this terminal 



describes the essential func- 
IBM 2760 Optical Image Unit 
their relationship to the for- 
ges to and from the computer. 

component description listed 
e for detailed information on 

device.) 



FILMSTRIP POSITIONING 

After the operator inserts the filmstrip 
cartridge into the front of the 2760, the 
filmstrip drive mechanism positions the 
filmstrip in accordance with instructions . 
from the user program. These instructions 
are received in the form of a message of 
predefined format, called a frame change 
message. Three characters, designated F, 
A ± , and A a , determine how the filmstrip is 
to be positioned. The F (function) charac- 
ter specifies the direction of filmstrip 
movement (this character has other func- 
tions, discussed below) . The A t and A 2 
characters are codes indicating the amount 
(that is, number of frames) of filmstrip 
movement. Figure 22 gives the meanings of 
the possible values of the F character; 
Figure 23 gives the codes for the h x and A a 
characters. 



MODES OF OPERATION 

In addition to indicating the direction of 
filmstrip movement, the F character desig- 
nates whether the unit is to operate in 
Manual or Automatic EOM mode and whether or 
not in Manual Frame Advance mode. 



F 
Char. 


Film 
Movement 


Mode 
of Operation 


Manual 
Frame Advance 










Space 


Reverse 


Auto EOM 


Disabled 


1 


Forward 


Auto EOM 


Disabled 


2 


Reverse 


Manual EOM 


Disabled 


3 


Forward 


Manual EOM 


Disabled 


4 


Reverse 


Auto EOM 


Enabled 


5 


Forward 


Auto EOM 


Enabled 


6 


Reverse 


Manual EOM 


Enabled 


7 


Forward 


Manual EOM 


Enabled 



Frames of 

Film 
Movement 

or 

Number in 

Image 

Index Counter 




Frames of 

Film 
Movement 

or 

Number in 

Image 

Index Counter 




Character 
Transmitted 


Character 

Transmitted 

A2A2 





Space (C Bi t) 





Space (C Bit) 


32 


@ 


1 


@ 


64 


- 


2 


- 


96 


& 


3 


& 


128 


1 


4 


1 


160 


/ 


5 


/ 


192 


J 


6 


J 


224 


a 


7 


a 


256 


2 


8 


2 


288 


s 


9 


s 


320 


k 


10 


k 


352 


b 


11 


b 


384 


3 


12 


3 


416 


t 


13 


t 


448 


I 


14 


I 


480 


c 


15 


c 




16 


4 


17 


u 


18 


m 


19 


d 


20 


5 


21 


V 


22 


n 


23 


e 


24 


6 


25 


w 


26 





27 


f 


28 


7 


29 


X 


30 


p 






31 


g 



Figure 23. A x /I ± and A a /I a Character Codes 



Figure 22. F (Function) Character Codes 
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Manual vs. Automatic EOM Mode 

The 2760 operates in one of two modes 
when sending a message to the computer. In 
automatic EOM (end of message) mode the 
message contains a single set of response 
point coordinates (explained below) , and 
the message is sent automatically when the 
terminal operator probes a response point. 

In manual EOM mode, more than one set of 
response point coordinates can be sent in 
the same message. In this mode, the termi- 
nal operator indicates the end of the mes- 
sage by probing the End Entry response 
point (one of the three Utility response 
points) . 

Manual Frame Advance 

Positioning of the filmstrip is ordinarily 
performed upon instruction from the user 
program. The filmstrip may alternatively 
be positioned by the terminal operator; 
this, in conjunction with Manual EOM mode, 
allows the operator to enter a message con- 
taining response points from more than one 
image (frame). Use of this feature results 
in fewer program interruptions for reposi- 
tioning the filmstrip and is therefore more 
economical of CPU time. Its use also simp- 
lifies logical program organization in that 
the program does not have to provide a 
frame change message for every possible 
circumstance. 

The terminal operator moves the films- 
trip by means of the Film switch on the 
front of the 2760. He can use the switch 
only when it has been made operational 
("enabled") by the program. The F charac- 
ter sent by the program determines whether 
the switch is enabled or disabled. 



RESPONSE POINTS AND COORDINATES 

Each of the two halves of the Optical Image 
Unit screen, the image screen (right half) 
and auxiliary screen (left half) has 120 
possible response points, in a 10 (hori- 
zontal) by 12 (vertical) matrix. Only a 
few, or perhaps one, of these points will 
be utilized in any given image (frame) or 
overlay. Each response point is repre- 
sented by a set of vertical and horizontal 
(V and H) coordinates. It is these coor- 
dinates that are sent to the computer when 
the operator probes a response point. The 
user program must contain a table that 
associates with each valid response point 
some value or bit setting representing the 
response probed by the operator. 

Figure 21 gives the V and H coordinates 
for each of the response points. Each 
coordinate is represented by a character, 
which on the communication line is repre- 



sented by the corresponding bit pattern in 
transmission code. 

Utility Response Points 

Three special response points appear in a 
vertical row to the right of the image 
screen. The Load response point, when pro- 
bed, indicates to the user program that the 
terminal operator has inserted a filmstrip 
cartridge into the Optical Image Unit. 
Upon receiving the V and H coordinates of 
this response point, the user program 
should send a frame change message to the 
2760 that causes it to advance the films- 
trip to the first frame. 

The Unload response point, when probed, 
indicates to the user program that it 
should send a message that retracts the 
filmstrip into the cartridge and ejects the 
cartridge. 

The End Entry response point is probed 
at the end of each message, when the 2760 
is operating in Manual EOM Mode. 



IMAGE INDEX COUNTER 

Within the Optical Image Unit is an elec- 
tronic counter called an Image Index Count- 
er, which is incremented and decremented in 
step with filmstrip movement. The counter 
thus maintains a continuous record of which 
frame of the filmstrip is currently being 
projected. The content of this counter is 
transmitted to the computer at the begin- 
ning of each message to the computer or, 
when manual frame advance is being used, at 
the beginning of each sequence of response 
points from a given image. The two charac- 
ters representing the content of the count- 
er are designated I x and I 2 . 

Upon receipt by the computer of each 
message from the 2760, the user program 
should check the I x I 2 characters to ensure 
that the correct image is being displayed. 

Figure 23 shows the characters that 
represent the numerical content of the 
image index counter. 

If the program sends to the 2760 a mes- 
sage that instructs the mechanism to move 
the filmstrip to a point that is beyond its 
last frame, an interlock is activated that 
prohibits filmstrip movement. This in turn 
prevents the image index counter from being 
incremented. 



MESSAGE FORMATS 

Each message from the computer to the IBM 
2760 begins with the sequence EOA PRE o 
(end-of-address, prefix, lowercase o) . The 
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U- 



Horizontal Positions 



(V) Vertical 
Coordinates* 



1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


15 


Id 


Im 


lu 


14 


Ic 


II 


It 


13 


lb 


15 


td 


tm 


tu 


t4 


tc 


tl 


tt 


t3 


tb 


35 


3d 


3m 


3u 


34 


3c 


31 


3t 


33 


3b 


b5 


bd 


bm 


bu 


b4 


be 


bl 


bt 


b3 


bb 


k5 


kd 


km 


ku 


k4 


kc 


kl 


kt 


k3 


kb 


s5 


sd 


sm 


su 


s4 


sc 


si 


St 


s3 


sb 


25 


2d 


2m 


2o 


24 


2c 


21 


2t 


23 


2b 


a5 


ad 


am 


au 


a4 


ac 


al 


at 


a3 


ab 


i5 


id 


jm 


i" 


i4 


jc 


I' 


i» 


J3 


ib 


/5 


/d 


/m 


/u 


/4 


A 


A 


A 


/3 


A 


15 


Id 


lm 


lu 


14 


lc 


ll 


it 


13 


lb 


&5 


&d 


&m 


&u 


&4 


&c 


&i 


&t 


&3 


&b 



11 12 13 14 15 16 17 18 19 20 



21 



M U 



Auxiliary Screen 



Vertical Positions 



Ik 


Is 


12 


la 


"i 


1/ 


11 


l& 


1- 


l@ 


1 
1 


tk 


ts 


t2 


ta 


n 


• 


tl 


t& 


t- 


t@ 


1 
1 


3k 


3s 


32 


3a 


3i 


3/ 


31 


3& 


3- 


3@ 


1 
1 


bk 


OS 


b2 


ba 


bi 


b/ 


bl 


b& 


b- 


b@ 


1 


kk 


ks 


k2 


ka 


M 


k/ 


kl 


k& 


k- 


k@ 


k space 


sk 


ss 


s2 


sa 


M 


s/ 


si 


s& 


s- 


s@ 


s space 


2k 


2s 


22 


2a 


2i 


2/ 


21 


2& 


2- 


2@ 


1 
1 


ak 


as 


a2 


aa 


a] 


a/ 


al 


a& 


a- 


a@ 


a space 


jk 


i* 


|2 


\o 


ii 


i/ 


M 


i& 


i- 


i@ 




A 


A 


/2 


/a 


A 


// 


/l 


/& 


/- 


/@ 




Ik 


Is 


12 


la 


M 


1/ 


11 


1& 


1- 


1@ 




&k 


&s 


&2 


&a 


&i- 


V 


&1 


&& 


&- 


&@ 


iu\ u 



UNLOAD 
LOAD 



END 
ENTRY 



@ 



(H) Horizontal 
Coordinates* 



Image Screen 



* Shown in upper case for ease of reading. The 2760 operates in lower case shift auto- 
matically. No case shift characters are required or permitted in messages to or from the unit. 



Figure 24. V £ H (Vertical € Horizontal) Response Point Coordinate Codes 



PRE o characters indicate that the message 
is intended for the 2760 and not for the 
IBM 2740 with which it is associated. 
Similarly, each message from the 2760 to 
the computer begins with BOA PRE o. The 
user program should check the input area 
for the presence of these two characters. 
(The PRE o sequence is represented by 
X , 3E4C* in transmission code.) Each mes- 
sage in either direction ends with an EOB 
(end-of -block) character. 

Figure 25 presents the formats for mes- 
sages between the computer and the Optical 
Image Unit. 

Computer to IBM 2760 

Output messages, referred to as frame 
change messages, direct the Optical Image 
Unit to move the film forward or backward, 
set the mode for the subsequent response 
message, and specify the amount of films- 
trip travel (that is, number of frames). 
See Figure 22 for the meanings of the poss- 
ible values of the F character; see Figure 



23 for the coded values representing amount 
of f ilmstrip movement (A*, and A a 
characters) . 

IBM 2760 to Computer 

Input messages, referred to as response 
ires sages, indicate to the user program 
which filmstrip frame is being displayed 
for the current response, and give the V 
and H coordinates of the response point or 
points the operator has probed. 

Auto EOM Mode ; In this mode, each probe 
action by the terminal operator causes a 
complete message, containing the coor- 
dinates of one response point, to be sent 
to the computer. 

Manual EOM Mode, Film Switch Disabled ; In 
this mode, a message may contain any number 
of response point coordinates. The 
sequence EOA PRE o I± I 2 V x H ± is sent to 
the computer when the first response is 
probed. Each subsequent set of V and H 
coordinates is sent individually as each 
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Computer to 2760 (Frome Change Message) 
























EOA 


PRE 


o 


F 


A l 


A 2 


EOB 










2760 to Computer (Response Message) 






Automatic EOM Mode: 






EOA 


PRE 


o 


', 


1 
2 


V 


H 


EOB 




Manual EOM Mode; Film Switch Disabled 


: 






FOA 


PRF 


o 


1. 


1, 


V. 


H 


V, 


H 2 




V 


H 


FOR 












1 


2 


1 


1 


2 




n 


n 










-»•— — «•_ 






End Entry 




response 




Manual EOM Mode; Film Switch Enablec 


i: 






EOA 


PRE 


o 


'l 


'2 


V l| H, 


V 2 


H 2 


... 


V 
n 


H n 




(Manual Frame Advance) 




PRE 


o 


1, 


1. 


V. 


H, 


V, 


H 




V 


H 










1 


I 


1 


1 


I 


2 




n 








[Manual Frame Advance) 








PRF 





1, 


1 , 


V, 


H 


V, 


H 




V 


H 


FOB 










1 


2 


1 


1 


I 


2 




n 










-^~ — ««- 




End Entry 




response 



Figure 25. Message Format 



response point is probed. The EOB charac- 
ter is automatically sent after the coor- 
dinates when the End Entry response point 
is probed. 

The user program should check for the 
End Entry response point to ensure that the 
message contains the correct number of 
responses . 



Manual EOM Mode, Film Switch Enabled ; In 
this mode, the terminal operator may repo- 
sition the filmstrip to a new frame while 
entering response points, so that the input 
message contains responses from more than 
one image. The image index counter is 
incremented or decremented each time the 
filmstrip is moved. 

The first probe action by the terminal 
operator following manual positioning of 
the filmstrip causes the sequence PRE o I x 
I 2 V t Hi ... to be sent to the computer. 
Figure 25 illustrates the message resulting 
from entering response points for three 
different images. 



The only times the operator cannot move 
the filmstrip, when the Film Switch is 
enabled, are when the image index counter 
contains a value of 2 or less, in which 
case reverse movement is inhibited; when 
the 2760 detects the hole in the tenth 
trailer frame, in which case forward move- 
ment is inhibited; and when the 2760 is at 
that moment receiving or executing a mes- 
sage from the computer. 



SIGNALS TO OPERATOR 

Two kinds of signals inform the terminal 
operator that his probe actions are 
correct. One is a visible indicator: the 
Online light. The second is an audible 
tone. The use of these signals differs for 
Automatic EOM, and Manual EOM mode. 



Automatic EOM Mode 

When the operator enters responses in this 
mode, the Online light comes on when he 
probes the response point. The audible 
tone sounds and the light goes out when the 
computer has returned a positive answer- 
back, indicating that it received the mes- 
sage without error. The positive answer- 
back may be a circle Y or an EOA (see Error 
Detection and Recovery) . 

In describing 2760 operations, the term 
answerback is used instead of response, to 
avoid confusion with responses entered by 
the terminal operator. ) 

Manual EOM Mode 

In this mode, the Online light comes on 
when the terminal operator probes the first 
response point and remains on throughout 
the remainder of the message. This should 
alert the operator that the terminal is in 
Manual EOM mode and accordingly is subject 
to the inter-character time-out imposed by 
the transmission control unit. That is, 
each subsequent response should be made 
within that time limit. It may be well to 
specifically inform the operator of the 
time limit by means of a suitable phrase on 
the image, for each frame for which the 
limit applies. The Online light goes off 
when the computer replies with a circle Y, 
EOA, or EOT. 

The audible tone sounds as each response 
point is probed, to inform the operator 
that the response has been sent to the com- 
puter and that he may probe again. The 
final probe action (End Entry) results in 
the tone only after the computer replies 
with a circle Y or EOA. This signifies to 
the operator that the complete message was 
received without error. 
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If a response point is incorrectly pro- 
bed, the tone does not sound and the Probe 
Check light appears. This indicates that 
the probe touched the screen at too small 
an angle from the vertical or that it 
touched outside the designated response 
point area. 



ERROR DETECTION AND RECOVERY 

Messages to and from the IBM 2760 are 
checked for errors by the Record Checking 
facility of the 2740 to which the 2760 is 
attached. In addition, the 2760 checks 
messages from the computer for proper 
length; all messages from the computer have 
the same length. 

If a text error or record length error 
is detected in a frame change message, the 
2760/2740 sends a circle N (negative ans- 
werback) character in response to the EOB 
that ends the frame change message. If the 
EROPT operand of the DCB macro for the line 
group specifies W (retry of write-text 
errors) , BTAM error recovery procedures 
cause the frame change message (without the 
EOA character) to be retransmitted up to 
two more times. If the error condition 
persists beyond the three attempts, or if 
EROPT does not specify W, the error condi- 
tion is posted in the data event control 
block (DECB) for the line. 

If the frame change message is received 
without error, the 2760/2740 sends a circle 
Y (positive answerback) character. BTAM 
responds to the circle Y with an EOT, which 
causes the 2760 to execute the instructions 
contained in the frame change message. 

If a text error is detected in a 
response message, and the EROPT operand of 
the DCB macro for the line group specifies 
R (retry of read-text errors), BTAM error 
recovery procedures send a circle N to the 
2760/2740, then reread the response mes- 
sage. If the Optical Image Unit is in 
Automatic EOM mode, it automatically 
resends the message; if it is in Manual EOM 
mode, the terminal operator must re-enter 
the entire response message. 

The error recovery procedures respond 
with circle N and reread the message up to 
two more times. If the error condition 
persists beyond the three attempts, or if 
EROPT does not specify R, the error condi- 
tion is posted in the DECB for the line. 

If the response message is received 
without error, the operation on which the 
message was received is posted complete. 
The EOA character that begins the next 
frame change message serves as a positive 
answerback to the 2760/2740. 



It is possible that the terminal opera- 
tor will probe the screen of the 2760 at a 
time when the probe is activated but there 
is no Read command in effect to receive the 
data. Should this occur, the next opera- 
tion executed for the line to which that 
2760 is connected will be posted complete- 
with-error, indicating that probe data was 
lost. In order to recover from an error of 
this kind, you may wish to take one of 
these suggested actions: 

• Issue a WRITE TCO macro that moves the 
filmstrip to an error- handling frame 
that will aid the terminal operator in 
recovering the lost data. 

• Issue a WRITE TV macro to write an 
error message on the printer of the 
2740 to which the 2760 is attached. 

• Issue a READ TI macro (nonswitched 
line) or READ TV macro (switched line) 
to read the next message from the ter- 
minal. The operator should be 
instructed to re-probe the previous 
response if he does not hear the aud- 
ible tone within a reasonable interval 
after probing. 

For information on error indicators at 
Optical Image Unit, see the IBM 2760 Optic- 
al Image Unit, Component Description . 



ONLINE TESTING 

Online tests for the IBM 2760 are initiated 
at the IBM 2740 terminal keyboard. The 
test request message can be keyed in 
whenever the user program issues a READ 
macro instruction (other than READ Skip) 
without the Reset option, or it may be 
keyed in after the filmstrip has been moved 
by a WRITE TCO macro. In order to use the 
online test facility, the EROPT field in 
the DCB for the line group must specify T. 

Two tests are available for the 2760: 
frame change test (type 10) and scan point 
test (type 11). They are designed to test 
the filmstrip transport mechanism and the 
probe response accuracy of the 2760. See 
Test Type Codes in the section "Online 
Testing" for descriptions of these tests. 

Online tests will generally be run by 
the IBM Customer Engineer during periods of 
inactivity or as a startup procedure. Once 
the testing is completed, the Customer 
Engineer will unload the filmstrip and the 
operator can continue operation. 

The terminal operator can also interrupt 
his data entry operation at any time to run 
a terminal test. However, some provision 
must be made to reposition the filmstrip to 
the frame being displayed when the test was 
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begun, and to reset the modes in effect at 
the time. A recommended way of doing this 
is for the user program to save (1) the 
image index value expected in the response 
message that would have been received had 
not the test request message been received 
instead, and (2) the F-character contained 
in the last previous frame change message. 

Then, upon conclusion of the test, the 
program would (1) calculate the difference 
between the values of the image index at 
the beginning and at the end of the test, 
and from this difference determine the A x 
and A a characters to be sent in the next 
frame change message; and (2) determine, 
from the modes at the beginning of the test 
and the sign of the difference in the image 
index values, the appropriate F-character 
for the frame change message. Sending that 
message to the 2760 would properly position 
the filmstrip and set the correct modes. 

As an example, assume that the filmstrip 
was positioned at frame 27 at the beginning 
of the test and that the modes in effect 
were Manual EOM, Manual Frame Advance dis- 
abled. If the previous filmstrip movement 
had been in the forward direction, the last 
F-character sent would be 3 (see Figure 
14). Then assume that at the end of the 
test the filmstrip was positioned at frame 
44. To reposition it to frame 27 would 
require a reverse movement of 17, hence the 
Aj., A a characters in the next frame change 
message would be Space U (see Figure 15) 
and the F-character would specify reverse 
direction. To restore the modes to their 
original settings (Manual EOM, Manual Frame 
Advance disabled) , the F-character should 
be 2. In computing the F-character, it is 
useful to know that the filmstrip direction 
is determined by bit 6 (0=reverse, 1= 
forward) , the Manual Frame Advance mode is 
determined by bit 4 (0=disabled, 1= 
enabled) , and the EOM mode is determined by 
bit 5 (0=automatic, l=manual). 

To request one of the 2760 tests, the 
following message must be keyed from the 
2740: 

99999xx4FA x Aa EOT 

xx = 10 for frame change test 
= 11 for scan point test 

4 specifies that the test 
is for the 2740 
terminal (of which the 2760 
is a component) 



F 
A x A a 



function control character 
amount of film movement 



If the operation in effect when a test 
request message is entered is a Write Invi- 



tational Optical (TCO) operation, the on- 
line test facility performs, at the conclu- 
sion of the test, a Read Initial (TI) 
operation (nonswitched line) or Read Con- 
versational (TV) operation, to receive the 
next regular message block. 



PROGRAMMING CONSIDERATIONS 

General Steps for Preparing the User 
Program 

1. Define the information the user pro- 
gram is to obtain from the terminal 
operator. 

2. Divide the required information into 
questions and statements that are 
meaningful to the terminal operators 
and that can be answered by probing 
response points on the Optical Image 
Unit screen. Responses may be Yes-No 
choices, multiple choices, alphabetic 
or numeric data, etc. 

3. Design the sequence of questions to 
request the information in the most 
efficient order. Make sure that the 
questions are coordinated so that each 
piece of information is obtained at 
the proper point in the data entry 
procedure. 

4. Make a preliminary design of all the 
filmstrip frames that request informa- 
tion. Decide on the wording of the 
questions and the wording and location 
of the response points. 

5. Design on the basis of the frame 
layouts, a system of tables that will 
enable the user program to recognize 
the valid and invalid responses to a 
question on a frame. 

6. Make a final design of all the frames 
that request information, and modify 
the tables as necessary to make them 
more efficient. 

7. Arrange the filmstrip layout to mini- 
mize film movement (for example, error 
frames and other frequently displayed 
frames should be in the middle of the 
filmstrip) . 

8. Design a method of initialization so 
that the program can locate the frame 
containing the first application image 
that requests information from the 
operator even if some of the leader 
frames have been cut off. The sec- 
tion. Initializing Images, suggests a 
means for doing this. 

9. Design the frames necessary for 
initialization. 
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10. Code the user program on the basis i of 
the tables and frames. The program 
must include the initialization rou- 
tine as well as the error routine for 
detecting and notifying the operator 
of invalid responses. 

Initializing Images 

Once the filmstrip cartridge is inserted in 
the Optical Image Unit, five steps of the 
filmstrip drive mechanism are required to 
advance the filmstrip out of the cartridge 
to the point where the first frame can be 
displayed. It is recommended that three 
blank frames be left at the beginning of 
the filmstrip to serve as a leader, to 
absorb the greater wear that the beginning 
of the strip receives. The first frame 
beyond the blank frames is called the 
initializing image. This image contains a 
probe response point whose position is 
unique for that filmstrip, thus serving to 
identify the filmstrip to the program so 
that the correct data entry procedure rou- 
tine can be determined. 

A further recommendation is that several 
initializing images be used, so that a new 
leading edge can be trimmed on the films- 
trip as the original edge becomes worn 
through use. Each of the initializing 
images would have response points whose 
meanings are the same, but whose position 
differs with each frame. Thus the program, 
when receiving a response message follo- 
wingthe first frame change message, can 
identify which of the initializing images 
is being displayed. This information can 
then be used to modify the Image Index 
values received in subsequent response mes- 
sages, thereby compensating for any change 
in position of the application images 
(relative to the leading edge of the films- 
trip) caused by removing worn frames. 

Assume, for example, that a new films- 
trip has three blank frames, followed by 
three initializing frames. The first frame 
change message would specify a film move- 
ment of eight frames. When the filmstrip 
is new, this message causes the first 
initializing image to be projected. When 
the first blank frame is cut off, to pro- 
vide a new leading edge, the same frame 
change message will cause the second 
initializing image to be displayed. Since 
all subsequent application images are now 
one frame closer to the leading edge of the 
filmstrip, it is necessary to subtract one 
from each image index value received in 
response messages, in order for the program 
to correctly identify the frame being dis- 
played for the response points received. 
By determining which initializing image is 
being displayed, the program can set the 
proper decrement value in an index register 
to modify the received image index values. 



Startup Procedure 

When the terminal operator is ready to 
begin a data entry operation, he inserts 
the appropriate filmstrip cartridge into 
the Optical Image Unit and probes the Load 
response point. (If the terminal is con- 
nected to the computer by a switched line, 
he must dial the computer before probing 
the Load response point.) For either a 
switched or a nonswitched line, the Standby 
light on the 2740 must be on and a Read 
Initial operation must be in progress at 
the computer. When the operator probes the 
load response point, a message containing 
the coordinates of that point is trans- 
mitted to the computer. The program should 
check the input area for the presence of 
the Load coordinates, s Space (X'2501*), 
and upon detecting them, issue a WRITE 
macro that sends the appropriate frame 
change message to the 2760. The A x and A a 
characters in the frame change message 
should specify sufficient frame movement to 
cause the initializing image to be dis- 
played. Assuming that the initializing 
image is the fourth frame from the begin- 
ning of the filmstrip, a forward movement 
of eight frames is required to position 
that image for projection. 

When the operator probes the response 
point for the initializing image, the pro- 
gram should issue a frame change message 
that positions the filmstrip to the first 
application image to be viewed by the 
operator. If more than one initializing 
image is used, as recommended under Initia- 
lizing Images, the particular frame being 
viewed by the operator when he enters his 
response determines the value of the h x , A a 
characters in the frame change message. 
For example, assume that the first applica- 
tion image to be viewed is ten frames from 
the first initializing image. A response 
entered for the first initializing image 
should cause the next frame change message 
to specify eight frames of filmstrip move- 
ment. If the response was entered for the 
second initializing image, however, the 
frame change message would have to specify 
a filmstrip movement of seven frames to 
reach the first application image. 

The values of A ± , A a in all subsequent 
frame change messages would be independent 
of which initializing image was displayed. 

Receiving Multiple Message Blocks 

Following receipt of a message block from a 
2760, the computer must reply with a posi- 
tive answerback. In the usual conversa- 
tional operation, in which a sequence of 
WRITE TCO macros alternates the sending of 
frame change messages and the receiving of 
response messages, the macro itself supp- 
lies as the positive answerback the EOA 
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character that begins the next frame change 
message. 

If r however, instead of alternating mes- 
sages in this manner you wish to receive a 
message from the 2760 and then receive a 
message block from the 2740 or the 2760, 
you should use the READ Continue with Lead- 
ing Acknowledgment (TTA) macro. This 
roacrosends a positive acknowledgment to the 
2760 and then receives another message 
block from the terminal. 

The recommended method for receiving 
multiple probes from the same filmstrip 
frame is to specify, in the frame change 
message that positions that frame, a func- 
tion character specifying Manual EOM mode. 
If more than one message block is required 
to accommodate the response data to be 
entered from that frame, you should specify 
Manual EOM mode and receive subsequent 
response messages by means of a READ TTA 
macro or a WRITE TCO macro that specifies 
no filmstrip movement. 

You should not issue a READ Continue 
(TT) macro following receipt of a response 
message from the 2760, for the following 



reason. READ TT sends a circle Y (positive 
answerback) to the 2760, which causes the 
2760 to return an EOT to the computer and 
to release the probe interlock, which 
allows the terminal operator to probe 
response points. When the Read Continue 
operation receives the EOT, the operation 
is posted complete; therefore, no Read 
operation is in effect to receive the next 
message from the terminal. (Both circle Y 
and EOA are recognized by the terminal as a 
positive answerback; however, the Y causes 
the terminal to reply with an EOT but the 
EOA does not.) 

Sending Message Blocks Alternately to the 
2760 and 2740 

If it is necessary to send message blocks 
alternately to the 2760 and the 2740, the 
message block to the 2760 should be sent 
first, followed by the message block to the 
2740. If the line is not put in control 
irode after sending to the 2760, the message 
block to the 2740 roust begin with text and 
roust end with an EOB. If the line is put 
in control mode after sending to the 2760, 
the message block to the 2740 must begin 
with an EOA and must end with an EOB. 



88 OS/VS BTAM SRL 



IBM 2740 WITH CHECKING FEATURE AND 2760 
OPTICAL IMAGE UNIT 

Read and Write operations for the 2710 with 
the checking feature and 2760 Optical Image 
Unit require no terminal lists. 

Once the line group data set has been 
opened, a READ Initial macro may be issued 
to establish contact with the 2740 to which 
the 2760 is attached. If the terminal 
operator wishes to send from the 2740 key- 
board, he presses the Bid key and enters 
the data. If he wishes to begin data entry 
with the Optical Image Unit, he inserts the 
appropriate cartridge into the front of the 
unit and touches the probe to the Load 
response point. Either action causes the 
data to be placed in main storage at the 
location specified by the area operand of 
the READ macro. 

The user program can determine whether 
the message came from the keyboard or the 
Optical Image Unit by testing for the pre- 
sence of the PRE o characters at the begin- 
ning of the input area. 

All data sent to the Optical Image Unit 
is in the form of the fixed- length message 
EOA PRE o F A x A 2 EOB, where F represents 
the function control character and h x and 
A 2 are characters designating the amount of 
filmstrip movement as explained under "IBM 
2760 Optical Image Unit — General 
Information. " 



READ MACRO INSTRUCTIONS 



READ Continue with Leading Acknowledgment 
(TTA) 

READ Continue with Leading Acknowledgment 
is for use when you wish to positively ack- 
nowledge a message, reset the terminal to 
standby status, and receive message text 
from either the 2760 or the 2740. 

READ TTA should be used specifically to 
receive message text from the 2740 or 2760 
following receipt of text from the 2760. 
The EOA is a positive acknowledgment (ans- 
werback) to the message block received from 
the 2760. The EOA sounds the audible tone 
and activates the 2760 probe by releasing 
the probe interlock. The EOT sequence 
resets the terminal to standby status so 
that either the 2760 or the 2740 may enter 
message text. 

1. Write EOA EOT EOT EOT 

2. Prepare 

3. Sense 

4. Read Text 

READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI), READ Continue (TT), or another READ 
Repeat, to receive the same message block 
read by the previous operation. 

1. Write Circle N 

2. Read Text 

3. Write EOA EOT EOT EOT (TPR only) 



READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial monitors the line for an EOA 
sent by the terminal and reads the message 
block that follows. 



WRITE MACRO INSTRUCTIONS 

Programming Note ; Each outgoing message 
block must end with EOB. 



1. 


Write 


EOT 


EOT 


EOT 








2. 


Prepare 














3. 


Sense 














4. 


Read 


Text 












5. 


Write 


EOA 


EOT 


EOT 


EOT 


(TIR 


only) 


READ 


Continue 


(TT) 












READ 


Continue 


and 


Reset (TTR) 







READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI) , READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 

1. Write Circle Y 

2. Read Text 

3. Write EOA EOT EOT EOT (TTR only) 



WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial writes an EOA to place the 
terminal in receive state and turn on the 
terminal motors, writes message text, and 
reads the response. 

1. Write EOA and 15 Idle characters 

2. Write Text 

3. Read Response 

4. Write EOT EOT EOT (TIR only) 

WRITE Continue (TT) 

WRITE Continue and Reset (TTR) 

WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 
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1 . Write Text 

2. Read Response 

3. Write EOT EOT EOT (TTR only) 



WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 

WRITE Conversational writes an EOA to place 
the terminal in receive state, writes mes- 
sage text, and reads the response. This 
macro is for use following a Read opera- 
tion, to change from receiving text to 
sending text. 

1 . Write EOA 

2 . Write Text 

3. Read Response 

4. Write EOT EOT EOT (TVR only) 



WRITE Initial Optical (TIP) 

This option is for use when you wish to 
send a frame change message, but do not 
require a response from the terminal opera- 
tor (as when retracting the filmstrip and 
ejecting the cartridge at the end of a data 
entry operation) , or when you wish to 
receive the response using a subsequent 
macro. The macro writes the sequence EOA 
PRE o, to indicate to the 2740 terminal 
that the message is intended for the 2760, 
writes the frame change characters and the 
EOB character, then reads the answerback 
(response to checking) . 

If the answerback is positive, the macro 
ends the operation by sending an EOT to the 
terminal. If the answerback is negative, 
the channel program is ended at this point 
and the error condition is posted in the 
DECB for the line, except that if Write 
retries are specified (ER0PT=W in DCB) , 
BTAM error recovery procedures resend the 
frame change characters up to two addition- 
al times before posting the error 
condition. 



You must specify in the entry operand of 
the WRITE TIO macro the address of the main 
storage location containing the three- 
character F A x A a sequence. 



1. Write EOA PRE o 

2. Write Frame Change Characters 

3. Write EOB 

4. Read Answerback 

5. Write EOT EOT EOT 



Programming Note : If input from the 2760 
is expected following execution of the 
Write Initial Optical operation, you should 
issue a READ Initial (TI) macro immediately 



after completion of the Write TIO 
operation. 



WRITE Invitational Optical (TCP) 

This option is for use when you wish to 
send a frame change message and read a 
response message from the terminal. The 
macro functions identically to the WRITE 
Initial Optical (TIO) macro, but in addi- 
tion receives message text from the Optical 
Image Unit or the 2740 keyboard. The Pre- 
pare command (see below) monitors the line 
for an EOA character; when it is received, 
the Read Text command reads into the input 
area that follows the EOA. 

You must specify in the entry operand of 
the WRITE TCO macro the address of the main 
storage location containing the F A A A a 
sequence; in the area operand you must 
specify the address of the input area into 
which the response message is to be 
received. If dynamic buffering is used to 
read the response message, you should spec- 
ify the length operand as *S*. 

The WRITE TCO macro is the principal 
macro used in a 2760 application, as it is 
a convenient means for alternately sending 
frame change messages and receiving 
responses from the operator. 



EOA PRE o 

Frame Change Characters 

EOB 

Answerback 

EOT EOT EOT 



Text 

Examples of WRITE TIO and WRITE TCO 

Figure 26 illustrates how WRITE TIO and 
WRITE TCO are coded. The WRITE TIO macro 
sends a frame change message to move the 
film forward six frames. The WRITE TCO 
macro sends a frame change message to move 
the filmstrip forward 37 frames and then 
reads a response message from the terminal. 
(The Aa. character, a, represents a film 
movement of 32 frames (see Figure 23) ; its 
hexadecimal equivalent is X^O*. The A 2 
character, /, represents a movement of five 
frames; its hexadecimal equivalent is 
X'OB*. Together, the two characters speci- 
fy a film movement of 37 frames.) 

In each case, the F character, 1 
(X'02 1 ), specifies (in addition to forward 
movement) that the response from the 2760 
is to be made in Automatic EOM mode with 
the Film switch (Manual Frame Advance) 
disabled. 



1. 


Write 


2. 


Write 


3. 


Write 


4. 


Read 


5. 


Write 


6. 


Prepare 


7. 


Sense 


8. 


Read 
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WRITE DECBNAME, TIO, DCBNAME, , , FRMSG1 , , MF=E 



WRITE 



DECBNAME,TCO, DCBNAME, INAREA, 20, FRMSG2,,MF=E 



FRMSG1 
FRMSG1 
INAREA 



DC X* 020113 
DC X f 02200B' 
DS 5F 



(1 SP J (LOWERCASE)) 
(1 a /) 



L .- 

Figure 26. Examples of WRITE TIO and WRITE TCO Macro Instructions (Nonswitched Line) 



WRITE Positive Acknowledgment (TA) 

WRITE Positive Acknowledgment writes a 
positive acknowledgment and an EOT sequence 
to indicate to the terminal that the com- 
puter received message text without error 
and to stop line activity. This macro is 
for use after a Read operation, when you 
wish to stop receiving from the terminal 
before the terminal has sent an EOT. 

1. Write EOA EOT EOT EOT 

WRITE Negative Acknowledgment (TN) 

WRITE Negative Acknowledgment writes an EOT 
sequence to indicate to the terminal that 



the computer received text with an error 
and to stop line activity. The terminal 
interprets the EOT sequence as a negative 
response. This macro is for use after a 
Read operation, when you wish to stop 
receiving from the terminal before the ter- 
minal has sent an EOT. 



This macro is also used to cause the 
2760 to execute the instructions it 
received in the preceding frame change 
message. 



Write EOT EOT EOT 
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IBM 2740 WITH DIAL-UP AND CHECKING FEATURES 
AND 2760 OPTICAL IMAGE UNIT 

Once the line group data set has been 
opened, either the terminal or the computer 
may establish the line connection. If the 
terminal is to establish the connection 
(that is, dial the computer), issue a READ 
Initial macro instruction that refers to an 
answering list. When the terminal operator 
is ready to enter data, he dials the tele- 
phone number of the computer. 

If he wishes to send from the 2740 key- 
board, he presses the Bid key and enters 
his data. If he wishes to begin data entry 
with the Optical Image Unit, he inserts the 
appropriate cartridge into the front of the 
unit and touches the probe to the Load 
response point. Either action causes the 
data to be placed in main storage at the 
location specified by the area operand of 
the READ macro. 

The user program can determine whether 
the message came from the keyboard or the 
Optical Image Unit by testing for the pre- 
sence of the PRE o characters at the begin- 
ning of the input area. 

If the computer is to establish the 
switched line connection, the WRITE TIO 
macro, explained below, may be used if you 
wish to send a frame change message immedi- 
ately following establishment of the line 
connection. (Alternatively, the connection 
can be made using a WRITE Initial macro, 
with the frame change message being sent by 
a subsequent WRITE TVO or WRITE TCO macro.) 

All data sent to the Optical Image Unit 
is in the form of the fixed-length message 
EOA PRE o F A ± A a EOB, where F represents 
the function control character and h ± and 
A 2 are characters designating the amount of 
filmstrip movement, as explained under "IBM 
2760 Optical Image Unit — General 
Information. " 



DIALST, dialcount, dial chars 

(See WRITE Initial Optical macro for call- 
ing list required for that macro.) 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial and Reset (TIR) 



READ Initial answers a call from a termi- 
nal, monitors the line for an EOA sent by 
the terminal, and reads the message block 
that follows. 



1. 


Disable 




2. 


Enable 




3. 


Prepare 




4. 


Sense 




5. 


Read 


Text 


6. 


Write 


EOA EOT EOT EOT (TIR only) 



7. Disable (TIR only) 



READ Continue (TT) 

READ Continue and Reset (TTR) 

READ Continue writes a positive response 
and reads a message block. This macro is 
for use following a successful READ Initial 
(TI), READ Repeat (TP) , or another READ 
Continue to receive another message block 
from the same terminal and component that 
sent the previous block. 

1. Write Circle Y 

3. Write EOA EOT EOT EOT (TTR only) 

4. Disable (TTR only) 



READ Continue with Leading Acknowledgment 
(TTA) 

READ Continue with Leading Acknowledgment 
is for use when you wish to positively ack- 
nowledge a message, reset the terminal to 
standby status, and receive message text 
from either the 2760 or the 2740. 



DEFINING TERMINAL LISTS 



Read Operations 

A Read Initial operation requires an an- 
swering list, which you define by coding 
the operand field of a DFTRMLST macro like 
this: 

DIALST, 

Write Operations 

A Write Initial operation requires a call- 
ing list, which you define by coding the 
DFTRMLST operand field like this: 



READ TTA should be used specifically to 
receive message text from the 2740 or 2760 
following receipt of text from the 2760. 
The EOA is a positive acknowledgment (ans- 
werback) to the message block received from 
the 2760, and causes the audible tone to 
sound and the 2760 probe to become acti- 
vated (that is, releases the probe inter- 
lock) . The EOT sequence resets the termi- 
nal to standby status so that either the 
2760 or the 2740 may enter message text. 



1. Write 

2. Prepare 

3. Sense 

4. Read 



EOA EOT EOT EOT 



Text 
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READ Repeat (TP) 

READ Repeat and Reset (TPR) 

READ Repeat writes a negative response and 
reads a message block. This macro is for 
use following an unsuccessful READ Initial 
(TI) , READ Continue (TT) , or another READ 
Repeat, to receive the same message block 
read by the previous operation. 



WRITE Conversational (TV) 

WRITE Conversational and Reset (TVR) 

WRITE Conversational writes an EOA to place 
the terminal in receive state, writes mes- 
sage text, and reads the response. This 
macro is for use following a Read opera- 
tion, to change from receiving text to 
sending text. 



1. Write Circle N 

2. Read Text 

3. Write EOA EOT EOT EOT (TPR only) 

4. Disable (TPR only) 

READ Conversational (TV) 

READ Conversational and Reset (TVR) 

READ Conversational monitors the line for 
an EOA sent by the terminal and reads the 
message block that follows. This macro is 
for use following a Write operation, to 
change from sending text to receiving text. 



1. 


Write 


EOT EOT EOT 


2. 


Prepare 




3. 


Sense 




4. 


Read 


Text 


5. 


Write 


EOA EOT EOT EOT (TVR only) 


6. 


Disable 


(TVR only) 



WRITE MACRO INSTRUCTIONS 



Programming Note : Each outgoing message 
block must end with BOB. 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial dials a terminal, writes an 
EOA to place the terminal in receive state, 
writes message text, and reads the response 
to text. 



1. Disable 




2 . Dial 


Dial digits 


3. Write 


Pad characters 


4. Write 


EOA 


5. Write 


Text 


6 . Read 


Response 


7. Write 


EOT EOT EOT (TIR only) 


8. Disable 


(TIR only) 


WRITE Continue (TT) 


WRITE Continue and Reset (TTR) 



WRITE Continue writes a message block and 
reads a response from the terminal. This 
macro is for use following a WRITE Initial 
(TI) or another WRITE Continue. 



1. Write 

2. Write 

3. Read 

4. Write 

5. Disable 

WRITE Initial 


EOA 

Text 

Response 

EOT EOT EOT (TVR only) 

(TV only) 

Optical (TIO) 



This option is for use when you wish to 
establish the line connection and send a 
frame change message to the Optical Image 
Unit. 

The macro issues a Disable command to 
disable the line in case this was not done 
previously, dials the terminal, and writes 
pad characters to provide time fill to 
allow the terminal motors to reach operat- 
ing speed. The macro then writes the 
sequence EOA PRE o, to indicate to the 2740 
terminal that the message is intended for 
the 2760, writes the frame change charac- 
ters (F, A x and A a ) and the EOB character, 
then reads the answerback (response to 
checking). 

If the answerback is positive, the macro 
ends the operation by sending an EOT to the 
terminal. If the answerback is negative, 
the channel program is ended at this point 
and the error condition is posted in the 
DECB for the line, except that if Write 
retries are specified (EROPT=W in DCB), 
BTAM error recovery procedures resend the 
frame change characters up to two addition- 
al times before posting the error 
condition. 

You must specify in the entry operand of 
the WRITE TIO macro the address of a termi- 
nal list defined by a DFTRMLST macro as 
follows : 



II ST DFTRMLST 



DI ALST , dial count , 
dialchars, f aaseq 



1. 


Write 


Text 


characters. 


2. 


Read 


Response 




3. 


Write 


EOT EOT EOT (TTR only) 


1. Disable 


4. 


Disable 


(TTR only) 


2. Dial 



DIALST specifies the type of list; dial- 
count and dialchars specify the number of 
digits in the telephone number and the 
digits themselves; and f aaseq specifies the 
three characters constituting the frame 
change message text, f aaseq must be coded 
as the hexadecimal equivalent of the trans- 
mission code bit pattern for the desired 



frame change charac- 
Dial digits 
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3. 


Write 


4. 


Write 


5. 


Write 


6. 


Write 


7. 


Read 


8. 


Write 



Pad characters 

EOA PRE o 

Frame change characters 

EOB 

Answerback 

EOT EOT EOT 



Programming Note : If input from the 2760 
is expected following execution of the 
Write Initial Optical operation, you should 
issue a READ Conversational (TV) macro 
immediately after completion of the Write 
TIO operation. 

WRITE Conversational Optical (TVO) 

This option is for use when you wish to 
send a frame change message after the 
switched line connection has been estab- 
lished, but do not require a response from 
the terminal operator (as when retracting 
the filmstrip and ejecting the cartridge at 
the end of a data entry operation) , or when 
you wish to receive the response using a 
subsequent macro. The macro writes the 
sequence EOA PRE o, to indicate to the 2740 
terminal that the message is intended for 
the 2760, writes the frame change charac- 
ters and the EOB character, then reads the 
answerback (response to checking). 

If the answerback is positive, the macro 
ends the operation by sending an EOT to the 
terminal. If the answerback is negative, 
the channel program is ended at this point 
and the error condition is posted in the 
DECB for the line, except that if Write 
retries are specified (EROPT=W in DCB), 
BTAM error recovery procedures resend the 
frame change characters up to two addition- 
al times before posting the error 
condition. 

You must specify in the entry operand of 
the WRITE TVO macro the address of the main 
storage location containing the three- 
character F A x A a sequence. 



EOA PRE o 

Frame Change Characters 

EOB 

Answerback 

EOT EOT EOT 



Programming Note : If input from the 2760 
is expected following execution of the 
Write Conversational Optical operation, you 
should issue a READ Conversational (TV) 
macro immediately after completion of the 
Write TVO operation. 

WRITE Invitational Optical (TCP) 

This option is for use after the line con- 
nection has been established, when you wish 
to send a frame change message and read a 
response message from the terminal. The 
macro functions identically to the WRITE 



1. 


Write 


2. 


Write 


3. 


Write 


4. 


Read 


5. 


Write 



Conversational Optical (TVO) macro, but in 
addition receives message text from the 
Optical Image Unit or the 2740 keyboard. 
The Prepare command (see below) monitors 
the line for an EOA character; when it is 
received, the Read Text command reads into 
the input area the data that follows the 
EOA. 

You must specify in the entry operand of 
the WRITE TCO macro the address of the main 
storage location containing the F A ± A a 
sequence; in the area operand you must 
specify the address of the input area into 
which the response message is to be 
received. If dynamic buffering is used to 
read the response message, you should spec- 
ify the length operand as 'S*. 

The WRITE TCO macro is the principal 
macro used in a 2760 application, as it is 
a convenient means for alternately sending 
frame change messages and receiving 
responses from the operator. 



1. 


Write 


EOA PRE O 


2. 


Write 


Frame Change Characters 


3. 


Write 


EOB 


4. 


Read 


Answerback 


5. 


Write 


EOT EOT EOT 


6. 


Prepare 




7. 


Sense 




8. 


Read 


Text 



Examples of WRITE TIO, WRITE TVO, and WRITE 
TCO 

Figure 27 illustrates how WRITE TIO, WRITE 
TVO, and WRITE TCO macros are coded. The 
WRITE TIO macro dials the telephone number 
of the 2740 terminal and sends a frame 
change message; the F A x A a sequence is 
coded in the DFTRMLST macro. In this 
example, the F character is a Space 
(X*01*), designating reverse movement, and 
A x and A a are both "c" (X*67*), represent- 
ing a filmstrip movement exceeding the 
length of the filmstrip. This message 
therefore causes the filmstrip to be 
retracted and the cartridge ejected. The 
A ± and A a characters could alternatively be 
coded as Space Space (X'OlOl*), represent- 
ing zero filmstrip movement, then a subse- 
quent WRITE TVO macro could be used to 
specify the filmstrip movement. This is 
useful where the amount of film movement 
may vary from one loading of the filmstrip 
to another, and so cannot be specified in a 
terminal list. The same WRITE TIO would be 
issued regardless of the film movement 
needed; the subsequent WRITE TVO would use 
register notation for the entry operand to 
provide the needed frame change characters. 

The WRITE TVO macro sends a frame change 
message to move the film forward three 
frames. The F character, 1 (X*02 a ) speci- 
fies Automatic EOM Mode with Film switch 
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WRITE 



WRITE 



DECBNAME , TIO , DCBNAME , , , LIST , , NF=E 
DECBNAME, TVO, DCBNAME, , ,FRMSG1, ,MF=E 



WRITE 



DECBNAME ( TCO , DCBNAME , INAREA ,20, FRMSG2 , , MF=E 



LIST 
FRMSG1 
FRMSG2 
INAREA 

Figure 27. 



DFTRMLST DIALST, 4 ,5003,016767 



DC 
DC 
DS 



X'020161' 
X , 0D2001 f 
5F 



(SP C C (LOWERCASE)) 
(1 SP 6) 
(6 a SP) 



J 

Examples of WRITE TIO, WRITE TVO, and WRITE TCO Macro Instructions (Switched 
Line) 



(Manual Frame Advance) disabled. The 1. Write 
response would be read by a different 2. Disable 
macro (a READ macro, for example), as the 
WRITE TVO macro does not read response 
messages. 

The WRITE TCO macro sends a frame change 
message to move the filmstrip backwards 32 
frames, sets; the 2760 in Manual EOM mode 
with the Film switch (Manual Frame Advance) 
enabled, and reads a response message from 
the 2760 (or the 2740). 

WRITE Positive Acknowledgment and 
Disconnect (TA) 

WRITE Positive Acknowledgment and Discon- 
nect writes a positive response to text (an 
EOA) and breaks the line connection. This 
macro is for use following a successful 1. Write 
READ operation when you wish to break the 2. Disable 
line connection instead of receiving the 
remaining blocks of a message. 



EOA EOT EOT EOT 



WRITE Negative Acknowledgment and 
Disconnect (TN) 

WRITE Negative Acknowledgment and Discon- 
nect writes a negative acknowledgment (the 
EOT character serves this purpose) and 
breaks the line connection. This roacro is 
for use following an unsuccessful Read 
operation when you wish to break the line 
connection instead of receiving the remain- 
ing blocks of a message. The macro may 
also be used after a Write operation when 
you wish to break the line connection. 



EOT EOT EOT 
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IBM 2741 COMMUNICATION TERMINAL 



GENERAL INFORMATION 

The line control scheme for the IBM 2741 
differs from that for some other start- stop 
terminals (for example, the IBM 1050), in 
that the terminal and line do not alternate 
between control mode and text mode, and the 
polling and addressing functions are 
absent. Instead the 2741, when in commun- 
icate mode (all subsequent discussion pre- 
supposes this), alternates between two 
states: receive and transmit. The 2741 is 
in a third state, control-receive, between 
the time it sends an EOT and the time it 
receives an EOA or EOT from the computer; 
this state is also entered momentarily when 
the terminal power switch is turned on or 
when the mode switch is switched from local 
to communicate mode. In transmit state, 
the keyboard is unlocked and the terminal 
operator can key in data for transmission 
to the computer. In receive state the key- 
board is locked and the terminal can only 
accept and print data received from the 
computer. The principal indicator of the 
state of the terminal is the keyboard. If 
it is unlocked, allowing the operator to 
enter data, the terminal is in transmit 
state; otherwise, it is in receive state. 



The terminal alternates between states 
whenever an end-of-transmission (EOT) char- 
acter is sent on the line. An EOT sent by 
the computer always places the terminal in 
transmit state, and an EOT sent by the ter- 
minal always places the terminal in receive 
state. 



Line control discipline for the 2741 
differs from that for other start- stop ter- 
minals in the following significant 
respect. With most terminals, control of 
the communication line remains vested in 
the program, except during the relatively 
small proportion of time that the terminal 
is in text mode and is actually sending 
data. If the terminal stops sending data 
for a period of about 25 seconds, a time- 
out function in the terminal returns it to 
control mode. When this happens, the pro- 
gram is again able to initiate activity on 
the communication line, and the terminal 
begins monitoring the line for control sig- 
nals from the computer. This control 
scheme prevents one terminal on a line from 
monopolizing use of the line so that the 
computer is unable to communicate with 
other terminals on the same line. 

The 2741, on the other hand, is intended 
for conversational use: there is only one 
terminal per line, and input by the termi- 
nal operator and response by the computer 
alternate, as in an ordinary telephone con- 
versation, until the terminal operator 
chooses to end the conversation. Each time 
the terminal is in transmit state, the ter- 
minal operator has control; that is, the 
program can initiate no new activity on the 
line until the terminal operator returns 
control to the program by sending an EOT 
character. The 2741 has no time-out func- 
tion by which control can be returned to 
the computer. 

Only the terminal operator can end a 
conversation, either by switching the ter- 
minal mode switch to Local or by turning 
off the terminal power switch. 



The terminal sends an EOT whenever the 
operator presses the Attention key or the 
Carrier Return key. These two keys accord- 
ingly are the means by which the terminal 
operator tells the computer that he has 
finished entering a line of data. The com- 
puter sends an EOT whenever it executes a 
channel program that is to receive data 
from the terminal, that is, any Read chan- 
nel program. 

Communication between terminal and com- 
puter is always initiated by the terminal 
operator, and can occur anytime after the 
program sets up the first Read operation, 
which must be a Read Initial. Conversation 
begins when the terminal operator sets the 
mode switch to Communicate (this action 
sends an end-of -address (EOA) character to 
the computer) . For switched lines, the 
operator follows this by manually dialing 
the telephone number of the computer and 
switching the common-carrier data set to 
data mode. (See the IBM 2740/2741 Opera- 
tor's Guide , for detailed dial-up 
procedures . ) 



The sequence of operations between the 
time the terminal operator begins and ends 
the conversation with the computer depends 
upon the logical structure of the program 
and upon the communications conventions es- 
tablished between terminal operator and the 
program. These in turn depend on the sys- 
tem application. 

Although the differences between line 
control for the 2741 and for other start- 
stop terminals result in dissimilar channel 
programs, you code your READ and WRITE 
macro instructions in the same way as for 
other terminals, with the exception of the 
"entry" operand. Because 2741s use no ter- 
minal lists, "entry" is not used, and if 
coded, it is ignored. 



Channel Commands for the IBM 2741 

The functions of the commands comprising 
the channel programs for the 2741 are given 
below. (The commands are described as they 
apply to Read and Write operations for the 
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2741; no inferences should be drawn as to 
their applicability for other terminals.) 

Write EOT Sets the terminal to transmit 

state. 
Write EOA Sets the terminal to receive 

state. 
Inhibit (1) Receives text from termi- 
nal into input area. 
(2) Receives text from termi- 
nal but does not place it 
in input area. Used for 
purging the communication 
line of unneeded text 
data (used in Read Skip 
channel program) . 
Enable For switched lines, condi- 
tions the TCU to accept calls 
from terminals. 
Disable When Disable is the first 
command of Read Initial or 
Write Disconnect (switched 
line) , it disables the line 
if, through program logic 
error, the line is in the 
enabled condition when the 
current channel program is 
started. If the line is 
already in the disabled con- 
dition, which is the normal 
case, the Disable command nas 
no effect. 
Prepare For switched lines, causes 
the TCU to monitor the line 
for incoming data. 

The function of an Inhibit command, like 
that of a Read command, is to receive data 
from a terminal. The difference is that a 
Read command is terminated by expiration of 
a timeout interval (if not terminated soon- 
er by receipt of data), while an Inhibit is 
not ended in this way. Channel programs 
for the IBM 2741 use Inhibit commands, 
rather than Read commands, because in 2741 
operation under BTAM, an indefinite period 
may elapse between initiation of a channel 
program and receipt of data from a 
terminal. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 
(Nonswitched Line) 

Read Initial receives message text (begin- 
ning with EOA) from the terminal. 



1. 
2. 



Prepare 
Inhibit 



(receives EOA) 
(receives text) 



READ Initial (TI) 
(Switched Line) 

READ Initial disables the line (in case 
this was not done previously), enables it. 



then receives message text (beginning with 
EOA) from the terminal. 

1. Disable 

2 . Enable 

3. Prepare (receives EOA) 

4. Inhibit (receives text) 

READ Continue (TT) 



READ Conversational (TV) 



READ Continue and READ Conversational are 
identical operations. Each sets the termi- 
nal to transmit state, then receives mes- 
sage text (beginning with EOA) from the 
terminal. 



1. Write 

2. Prepare 

3. Inhibit 

READ Skip (TS) 



EOT 

(receives EOA) 

(receives text) 



READ Skip receives message text from the 
terminal but does not place it in main 
storage. 

1. Inhibit (received text is discarded) 



WRITE MACRO INSTRUCTIONS 

WRITE Continue (TT) 

WRITE Continue sends a message segment to 
the terminal. It is for use after a WRITE 
Conversational has set the terminal to 
receive state. 

1. Write Text 

WRITE Conversational (TV) 

WRITE Conversational sets the terminal to 
receive state and sends it a message seg- 
ment. It is for use after a Read operation 
to reverse the direction of transmission. 



1. Write 

2. Write 



EOA 
Text 



WRITE Continue Conversational (TTV) 

WRITE Continue Conversational sends the 
terminal a message segment followed by EOT, 
which sets the terminal to transmit state, 
then receives message text (beginning with 
EOA) from the terminal. WRITE TTV is for 
use following a WRITE Continue or WRITE 
Conversational, to reverse the direction of 
t ransmiss ion . 

1. Write Text 

2. Write EOT 

3. Prepare (receives EOA) 

4. Inhibit (receives text) 
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WRITE Disconnect (TN) 
( Switched Line ) 

WRITE Disconnect disables the line to break 
off communication with the terminal. 

1. Disable 



DESIGNING A MESSAGE CONTROL ROUTINE 

This section explains how Read and Write 
operations may be combined to permit con- 
versational communication between terminal 
and computer. 

The first operation, once the line group 
has been opened, must be a Read Initial. 

When the terminal operator establishes 
communication, the first line of text he 
types is read into the input area. The 
Read Initial ends with receipt of the EOT 
character sent when the terminal operator 
presses the Return key or the Attention 
key. 

The program should then determine wheth- 
er it should receive more text from the 
terminal. This decision might be based on 
analysis of the data just received. For 
example, an operating convention might be 
established by which the terminal operator 
presses the Return key to signify that he 
has further input and the Attention key to 
indicate that he has finished sending. The 
Return key causes transmission of the new 
line (NL) character followed by EOT. The 
Attention key causes transmission of the 
EOT character only. The program can check 
the last two characters received from the 
terminal to determine the action to take: 
NL EOT indicating that a Read operation 
should be executed to receive the next text 
segment from the terminal operator; EOT 
alone indicating that the program should 
reply. 

If the program is to reply, it should 
execute a Write Conversational operation. 
If desired, you can send the reply in sev- 
eral segments by using Write Continue 
operations. After the last Write, you 
should execute a Read Initial (nonswitched) 
or Read conversational (switched) operation 
to permit the terminal operator (1) to 
resume sending input (in which case the 
sequence just described is repeated) or (2) 
to signify to the program that he has 
finished by turning the mode switch to 
Local or by turning off the terminal power 
switch. You may substitute a Write Con- 
tinue Conversational (TTV) for the last of 
a sequence of Write Continues, to avoid 
executing a separate Read Initial or Read 
Conversational; the WRITE TTV performs the 
functions of the Write Continue and the 
subsequent Read. 



PROGRAMMING CONSIDERATIONS 

Operations on Switched Lines 

When the terminal operator switches the 
terminal to Local mode or turns off the 
power, the operation in progress at that 
moment is terminated with an indication of 
Channel End, Device End, and Unit Check in 
the CSW status byte, and Intervention 
Required in the sense byte. These indica- 
tions will be posted in the DECB for the 
line as DECSDECB=X* 41* and DECFLAGS=X* OH* . 
You should check for the presence of these 
indicators after each Read and Write opera- 
tion and take appropriate action; ordinari- 
ly, the Read Initial should be reissued. 

For some applications it will be appro- 
priate for the terminal operator to end the 
conversation only when the terminal is in 
transmit state, that is, not to turn off 
power while receiving text from the comput- 
er. It might then be appropriate for the 
program to record whether the operation in 
effect when the terminal went off-line was 
a Read or a Write. 

Operations on Nonswitched Lines 

• In a conversational environment, it is 
usually sufficient that the data is 
made available to the terminal opera- 
tor, without the necessity that he 
actually receives it. If it is impera- 
tive that the message be received by 
the operator, he may be required to 
acknowledge receipt. The acknowledging 
message is received via the Read opera- 
tion that follows the sequence of Write 
operations . 

If during transmission from computer to 
terminal, the terminal operator chooses 
to break off reception of the message, 
the data set (modem) that connects the 
terminal to the line cannot signal this 
fact to the transmission control unit 
(TCU) . When the operator breaks off 
reception, the sequence of Write opera- 
tions then in progress proceeds to con- 
clusion just as though the terminal 
were still receiving. All Write opera- 
tions are posted complete without 
error; that is, completion code is 
X'7F f and DECFLAGS equals zero. 

• For half -duplex nonswitched lines, a 
Read operation is not posted complete 
until a message has been received. 
This may mean that your program must 
accept "sign-on" messages in any Read 
operation. If it is desirable to reco- 
gnize the end of a conversation, the 
program may wait ^n appropriate amount 
of time and, if no message has been 
received yet, assume that the terminal 
operator has ended the conversation. 
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If necessary to purge the Read opera- 
tion you may issue an IOHALT macro for 
the line. This will halt the operation 
and cause; posting of the Read. You may 
then issue another Read Initial opera- 
tion, with changes to the area and/or 
length operands. For example, the new 
Read operation may be intended to 
receive a "sign-on" message into a dif- 
ferent area than regular messages. 

Using the Attention Key and 2741 Receive 
Interrupt Facility 

When the terminal is in transmit state, the 
operator may press the Attention key to 
signal the computer that he has finished 
entering data. Pressing this key sends an 
EOT to the computer and returns the termi- 
nal to receive state. The keyboard locks, 
and the operator can resume entering data 
only after the program returns the terminal 
to transmit state by means of a Read opera- 
tion or Write Continue Conversational 
operation. 

If the 2741 is equipped with the Receive 
Interrupt feature, the Attention key can be 
pressed while the terminal is in receive 
state to interrupt data transmission from 
the computer, when, for example, the operator 
has a high-priority message to enter. Pre- 
ssing the Attention key causes the Write 
operation then in progress to terminate, 
and the Channel End, Device End, and Unit 
Check indications to be set in the CSW sta- 
tus byte and the Intervention Required 
indication in the sense byte. These indi- 
cators will be posted in the DECB for the 
line as DECSDECB=X' 41' and DECFLAGS=X* 02* . 
You should check after each Write operation 
for the presence of these indicators. When 
present, it is generally appropriate to 
issue a Write Continue that sends a NL 
character to return the terminal's print 
element carrier to the beginning of the 
next printing line. 

General Considerations 

• Dynamic buffering cannot be used for 
the 2741. 

• The usual considerations regarding use 
of the WAIT and TWAIT macro instruc- 
tions should be observed. Before issu- 
ing any of these macros, you must 
always check the return code resulting 
from a Read or Write operation to 
ensure that the operation was started 
successfully. 



Messages sent to a terminal must not 
contain any EOT characters, as these 
cause the program to lose control. 



IBM 2741 terminals do not perform an 
automatic carrier return when the print 
element reaches the end of the print 
line. To avoid character pile-up at 
the end of the line, the text sent to 
the terminal must contain NL (new line) 
characters at intervals not exceeding 
the length (in characters) of the line. 

Any printable characters received by 
the terminal during the time the termi- 
nal is executing a carrier return, 
horizontal tab, or index (line feed) 
function will be printed erratically. 
To avoid this occurrence, each New Line 
(NL) , Horizontal Tab (HT) , and Line 
Feed (LF) character must be followed by 
one or more nonprinting characters, 
such as the Idle character. 

For the line feed function, you should 
place one Idle character after each LF 
character in text to be sent to the 
terminal. For the new line and tab 
functions, the number of Idle charac- 
ters needed equals 1.5 plus the number 
of inches of carrier travel caused by 
the function, rounded off to the next 
higher integer. In addition, you may 
need to place Idle characters at the 
beginning of each block of text the 
program sends to the terminal following 
receipt of an EOT character from the 
terminal. 

The number of Idles required depends on 
several factors, such as line turn- 
around time and model of data set used. 
A recommended practice is to use the 
same number of characters as are used 
following a NL character that results 
in the longest carrier travel . 

Example : Assume the length of a print 
line for a particular application is 
7-3/4 inches and tab settings are at 2 
and 6 inches. Each HT character should 
be followed by 1.5 ♦ 4=5.5, or 6 Idles 
(the 4 derives from the maximum dis- 
tance of carrier travel [4 inches], 
caused by an HT character) . Each NL 
character should be followed by 1.5 ♦ 
7.75=9.25, or 10 Idles. Also, each 
block of text sent to a 2741 following 
receipt of EOT from the terminal should 
begin with 10 Idles. 
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AT&T 8 3B3 SELECTIVE CALLING STATIONS 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a two-character polling sequence 
(which for the 83B3 is called a Transmitter 
Start Code) . 

To define a polling list, code the 
operand field of a DFTRMLST macro like 
this: 



IjOPENLST), (xxyy,. ..) 
| ( WRAPLST 



Write Operations 

A Write Initial operation requires an ad- 
dressing list having one or more terminal 
entries, each containing a two-character 
addressing sequence (which for the 83B3 is 
termed a Call Directing Code). 

To define an addressing list, code the 
DFTRMLST macro like this: 



| OPENLST, (xxyy, . . .) 

L 



A single V or M character constitutes a 
positive response; a negative response is 
indicated by no response at all. A nega- 
tive response for any terminal in the list 
is an abnormal condition. The operation 
ends and is posted complete-with-error. 



1. Write 


FIGS H LTRS 


2. Write 


CDC 


3. Write 


LTRS 


4. Read 


Response 


5. Write 


Text 


6. Write 


FIGS H LTRS (TIR only) 


WRITE Break 





READ MACRO INSTRUCTIONS 



PEAD Initial (TI) 



This macro instruction causes a series 
of space characters to be sent, the number 
is determined by the length operand. 

Programming Notes : 

1. Each output message must begin with 
the sequence CR LF LTRS (this serves 
as the end-of -addressing indicator) . 



2. You must specify in the WRITE macro 
the exact length of the message. 

3. If you are sending a message with a 
WRITE TI macro, code FIGS H LTRS at 
the end of the message (this is the 
end-of-transmission sequence) . If you 
are sending a message with a WRITE TIR 
macro, the macro supplies the FIGS H 
LTRS sequence. 



READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a message block. 

A single V or M character constitutes a 
negative response; the message text itself 
signifies a positive response. 



1. Write 

2. Write 

3. Read 
U. Read 

READ Skip 



FIGS H LTRS 
TSC 

Response 
Text 



READ Skip reads data from the line to 
clear it. There is no data transferred 
to storage. 

WRITE MACRO INSTRUCTIONS 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial addresses a terminal, and if 
the response to addressing is positive, 
writes message text to the terminal. 



TERMINAL-TO-TERMINAL OPERATION 

ETAM does not provide control for terminal- 
to-terminal traffic on a line on which BTAM 
provides control of traffic between comput- 
er and terminal; however, BTAM does not 
interfere with terminal-to-terminal traf- 
fic. In a system in which such traffic can 
occur, the operation is as follows. 

A READ Initial macro polls the terminal 
that will become the sending terminal. The 
sending terminal responds with the address- 
ing code of the terminal with which it 
wishes to communicate. This code appears 
to the Read Response command like data, and 
is therefore received in the input area. 
The next character is a V or M sent by the 
receiving terminal as a positive response. 
It, too, is read into the input area. The 
sending terminal recognizes the V or M as a 
positive response and sends a message to 
the receiving terminal; this message text, 
too, is read into the input area. Thus, 
while BTAM does not influence the terminal- 
to-terminal operation, it does receive into 
irain storage any message sent between the 
terminals. 
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WESTERN UNION MODEL 33/35 TWX TERMINALS 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initicil operation requires an an- 
swering list containing a sequence of con- 
trol and identification characters to be 
sent to a terminal that calls the computer. 
The sequence has from 7 to 18 characters. 
A recommended sequence is: 

Null CR LF DEL (1 to 12 graphic 
characters) CR LF XON 



sequences start the tape transmitter of the 
terminal. If you wish to read from the 
keyboard, an appropriate sequence is G Bell 
A Bell; GA means go ahead, and the bell 
alerts the terminal operator. 

Write Operations 

A Write Initial operation requires a call- 
ing list containing the same sequence of 
characters as the called terminal sends 
when it answers the call from the computer. 

To define a calling list, code the operand 
field of a DFTRMLST macro like this: 



To code an answering list, code the operand 
field of a DFTRMLST macro like this: 



| IDLST r O,nurasent,sentchar 

L 1 

Example : To define an answering list con- 
taining the foregoing character sequence 
(using RALEIGH as the graphic sequence) , 
you would code: 



r 1 

| IDLST, dialcount, dialchars, numrec, tidseq | 

Example : To define a calling list for a 
terminal whose telephone number is 887-4444 
and which will answer with the sequence 



CRLFIBM 35ASR 
you would code: 



# 1 CR LF XON 



r — . ., 

| IDLST, 0, 14, 01B150FF4B8233A393E212B15088 j 

I J 

The characters following the third comma 
are the hexadecimal representations of the 
transmission code bit patterns for the 
recommended sequence: 



01B150FF — 
4B8233A393E212 — 
B15088 — 



Null CR LF DEL 
RALEIGH 
CR LF XON 



This sequence prints the computer identifi- 
cation, RALEIGH, at the beginning of the 
next line, and turns on the tape 
transmitter. 

Read Conversational Operation 

A Read Conversational operation requires a 
list containing a sequence of control 
characters to be sent to the terminal to 
prepare it to transmit. For this purpose 
you define am answering list containing the 
desired characters; the list is not used 
for the answering function. Define the 
list by coding the DFTRMLST operand like 
this: 



j IDLST, , numcnsent, cntrlseq 



If the Read Conversational operation is 
preceded by a Write Initial operation, a 
recommended sequence is XON (1 to 1 charac- 
ters of your choice) XOFF; if the preceding 
operation was a Read Initial, the single 
character, XON, may be used. These 



j IDLST, 7, 8874444, 17, B1509342B205CCAD82CA j 
| 4B05C58DB15088 | 

t 1 



READ MACRO INSTRUCTIONS 

Programming Note : Each message sent from 
the terminal (that is, an incoming message) 
must end with either the WRU, XON, or XOFF 
character, or with the EOT sequence. If it 
ends with the EOT sequence, the next opera- 
tion must be a Read Initial or Write Ini- 
tial (EOT resets the terminals to control 
nrode) . If the message ends with WRU, XON, 
or XOFF, the next operation can be a Read 
Conversational or Write Conversational. 

READ Initial (TI) 

READ Initial and Reset (TIR) 

READ Initial answers a call from a termi- 
nal, writes the identification and control 
sequence, and reads a message block from 
the terminal. 



1. 


Disable 




2. 


Enable 




3. 


Write 


Pad characters 


4. 


Write 


ID-control sequence 


5. 


Read 


Text 


6. 


Write 


EOT (TIR only) 


7. 


Disable 


(TIR only) 


READ 


Conversational (TV) 


READ 


Conversational and Reset (TVR) 



READ Conversational writes a control 
sequence to the terminal and reads message 
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text from the terminal. This macro is for 
use following a READ Initial or a WRITE 
Conversational when the line connection is 
already established. 



1. Write 

2. Read 

3. Write 

4. Disable 



Control sequence 

Text 

EOT (TVR only) 

(TVR only) 



WRITE MACRO INSTRUCTIONS 

Programming Note : Outgoing messages should 
not end with a control character or a 
sequence of control characters (e.g., XON, 
or XON (user- selected characters) XOFF. 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial calls a terminal and reads 
the identification sequence of the termi- 
nal. If the received ID matches the 
expected ID that is contained in the termi- 
nal list, the macro writes message text to 
the terminal. If the two ID'S do not 
match, the operation is posted complete- 
with-error; the message text is not sent. 



1. Disable 

2. Dial Dial Digits 

3. Read Terminal ID sequence 

4. Write Text 

5. Write EOT (TIR only) 

6. Disable (TIR only) 

WRITE conversational (TV) 

WRITE Conversational and Reset (TVR) 

WRITE Conversational writes message text to 
the terminal. This macro may be used fol- 
lowing a Read operation, to change from 
receiving text to sending text, and may be 
issued as many times in succession as 
necessary to send a message. 

1. Write Text 

2. Write EOT (TVR only) 

3. Disable (TVR only) 



WRITE Disconnect (TN) 

WRITE Disconnect breaks the line 
connection. 



1. Write 

2. Disable 



EOT 
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WESTERN UNION PLAN 115A OUTSTATIONS 

DEFINING TERMINAL LISTS 

Read Operations 

A Read Initial operation requires an open 
or wraparound polling list. The list may 
have one or more terminal entries, each 
containing a two-character polling 
sequence. The first character is always an 
X (X'17* is the transmission code bit pat- 
tern) ; the second identifies the terminal. 

To define a polling list, code the 
operand field of a DFTRMLST macro like 
this: 



| ( OPENLST ) , (xxyy , . . . ) 

| { WRAPLST J 

L 



Write Operations 

A Write Initial operation requires an ad- 
dressing list having one or more terminal 
entries, each containing a two-character 
addressing sequence. The first character 
is the circuit call code; the second iden- 
tifies the terminal that is to receive the 
output message. 

To define an addressing list, code the 
DFTRMLST operand field like this: 



j OPENLST, (xxyy,...) | 

L . - J 

READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial successively polls the ter- 
minals in the polling list, and upon 
receiving a positive response to polling, 
reads a messcige block. 

A single V or M character constitutes a 
negative response; the message text itself 
signifies a positive response. 



1. Write 

2. Write 

3 . Read 

4 . Read 



FIGS H LTRS 
Polling sequence 
Response 
Text 



READ Skip 

READ Skip reads data from the line to 
clear it. There is no data transferred 
to storage. 

WRITE MACRO INSTRUCTIONS 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 



1. 


Write 


2. 


Write 


3. 


Read 


4. 


Write 


5. 


Write 


WRITE Break 



WRITE Initial addresses a terminal, and if 
the response to addressing is positive, 
writes message text to the terminal. 

A single V or M character constitutes a 
positive response; a negative response is 
indicated by no response at all. A nega- 
tive response for any terminal is an 
abnormal condition; the operation ends and 
is posted complete-with-error. 



FIGS H LTRS 

Addressing sequence 

Response 

Text 

FIGS H LTRS (TIR only) 



This macro instruction causes a series 
of space characters to be sent, the number 
is determined by the length operand. 

Programming Notes : 

1. Each output message must begin with a 
Space character (this serves as the 
end-of-addressing character) . 

2. You must specify in the WRITE macro 
the exact length of the message. 

3. If you are sending a message with a 
WRITE TI macro, code FIGS H LTRS at 
the end of the message (this is the 
end-of-transmission sequence) . If you 
are sending a message with a WRITE TIR 
macro, the macro supplies the FIGS H 
LTRS sequence. 

TERMINAL-TO- TERMINAL OPERATION 

BTAM does not provide control for terminal- 
to-terminal traffic on a line on which BTAM 
provides control of traffic between comput- 
er and terminal; however, BTAM does not 
interfere with terminal-to-terminal traf- 
fic. In a system in which such traffic can 
occur, the operation is as follows. 

A READ Initial macro polls the terminal 
that will become the sending terminal. The 
sending terminal responds with the address- 
ing code of the terminal with which it 
wishes to communicate. This code appears 
to the Read Response command like data, and 
is therefore received in the input area. 
The next character is a V or M sent by the 
receiving terminal as a positive response. 
It, too, is read into the input area. The 
sending terminal recognizes the V or M as a 
positive response and sends a message to 
the receiving terminal; this message text, 
too, is read into the input area. Thus, 
while BTAM does not influence the terminal- 
to-terminal operation, it does receive into 
nrain storage any message sent between the 
terminals. 
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WORLD TRADE TELEGRAPH TERMINALS 

GENERAL INFORMATION 

The name World Trade (WT) telegraph ter- 
minals refers to various European teletype- 
writers using a start-stop 5-level code 
with two shifts (lettershift and figure- 
shift) to transfer data over point-to-point 
telegraph lines. 

WT terminals use either the Internation- 
al Telegraph Alphabet No. 2 or the Figure 
Protected Code ZSC3. World Trade telegraph 
terminals employ the contention system of 
line control. When a terminal and the com- 
puter each try to send a message, simul- 
taneously, both transmissions are immedi- 
ately stopped; this is called contention. 



A terminal is always ready to receive or 
to send a message. Normally, the motor of 
the terminal is off and the first letter- 
shift character (LTRS) sent or received by 
the terminal starts the motor, which 
requires 1.5 seconds to reach operating 
speeo. During this period, the terminal 
cannot' correctly send or receive charac- 
ters. The motor stops when no character 
has been transmitted during a period of 
from 10 to 30 seconds. When the terminal 
is operating in this manner, it is said to 
be in Motor-Off mode. Optionally, the ter- 
minal can be equipped with a heavy-duty 
motor which is never switched off; in this 
case, the terminal is said to be operating 
in Motor-On mode. 



When a terminal is operating in Motor- 
Off mode, the MONDLY parameter of the DCB 
macro instruction enables you to specify 
the number of Mark (Idle) characters corre- 
sponding to the 1.5 second period. When 
you issue a WRITE macro instruction, BTAM 
recognizes the motor mode of the terminal 
(motor-off or motor-on) and generates a 
LTRS character (this can be followed by a 
user-specified number of Mark characters) 
that precedes the data to be sent over the 
line. 



Most terminals can be equipped with 
another optional feature called the Auto- 
matic Answerback Unit. This feature 
enables a sequence of up to 20 identifica- 
tion characters, generated by a mechanical 
drum, to be sent over the line by either 
pressing the IAM key or receiving code com- 
bination 4 in figures shift. 



FIGS x and FIGS y LTRS. These are estab- 
lished when the IBM 2701, 2702 or 2703 to 
which the WT terminal is connected is 
installed: x and y are assigned by the 
customer on a per-system basis, as follows. 

When a terminal is equipped with the 
Automatic Answerback Unit, FIGS x must be 
code combination *» (FIGS D) sent by the 
terminal WRU key. This character is 
referred to as the WRU signal. If the ter- 
minal is not equipped with the Automatic 
Answerback Unit, FIGS x may be any other 
code combination. 

The two characters, x and y, cannot be 
the same. FIGS y immediately followed by a 
LTRS character causes a Read operation to 
end. Therefore, FIGS y can be sent by a 
terminal as data only if it is not followed 
by LTRS. 



The above terminations of a Read opera- 
tion can be used as end-of-message (EOM) 
signals. The FIGS y LTRS termination (if 
not yet used as an EOM signal) or two con- 
secutive EOM signals can represent the end- 
of-transmission (EOT) signal. 



The transmission control unit deletes 
all incoming LTRS and FIGS characters and 
updates a shift bit (S) which is added to 
each character transferred to main storage. 
Conversely, each change in shift bit set- 
ting along a character sequence causes the 
TCU to send a LTRS or FIGS character ahead 
of the first message character for which 
the shift bit was reversed. 



Figure 28 shows the relationship of a 
System/370 byte and a telegraph character 
configuration. 



Contention Resolution 

When contention occurs, BTAM sets a comple- 
tion code of X*7F* in the ECB and turns on 
bit 3 of DECFLAGS. Contention is resolved 
by the user program coding and the local 
operator's action, according to one of the 
following procedures: 



If priority is to be given to the com- 
puter, the terminal operator must wait; the 
program should repeat the Write (or Read 
TE) operation. 



Telegraph Adapter Description 

The World Trade Telegraph Adapter in the 
TCU recognizes two message end conditions: 



If priority is to be given to the termi- 
nal, the program must follow with a READ 
Continue macro the operation during which 
contention occurred. The terminal operator 
continues sending his message. 
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01234567 

( System/37 0--byte configuration) 

j. \ 

--S12345 
(Telegraph-character configuration) 

L . J 

Figure 28. WT Telegraph Code 



DEFINING TERMINAL LISTS 

In World Trade telegraph operation terminal 
lists are used only for the READ Continue 
with Identification Exchange (TE) macro. 
(They are not used for READ Initial 
operations.) 

If The Terminal's Identification Sequence 
is to be Requested 

To define a terminal list, code the operand 
field of a DFTRMLST macro like this: 



r 1 

| WTTALST,0,numrec, ridseg,numsent, tidseq | 
t J 



If The Computer Identification is to be 
sent to the Terminal 



occurred. The operation ends when an EOM, 
EOT, or wru is received. 



| WTTALST,0,0,0,numsent, tidseq 

L 



Programming Note : tidseq may specify from 
7 to 20 characters (computer identification 
sequence) . 



READ MACRO INSTRUCTIONS 



1. Read 



Text 



READ Continue with Identification Exchange 
(TE) 

READ Continue with Identification Exchange 
writes to the remote terminal the compu- 
ter's identification sequence (defined in 
the terminal list) and a WRU character. 
The operation also reads the identification 
sequence of the terminal (and optionally, 
message text) into the input area, only if 
you code WRU=YES in the DCB macro for the 
line group. 

1. Write Mark characters Note 1 

2. Write Computer identification seq. 

3. Write WRU (or LTRS) Note 2 

4. Read Terminal identification Note 3 

5. Read Text 

Note 1 ; One LTRS character plus n Mark 
characters are sent, where n represents the 
number of Mark characters, as follows: 

a. When the terminal is equipped with the 
Motor-On optional feature, n is always 
zero. 

b. When the terminal is not equipped with 
the Motor-On optional feature, n can 
take one of the following values: 

n=0 

if the previous operation was a 
Write, or if a Read operation ended 
with EOM or WRU signal. 

n=the value given to the MONDLY key- 
word operand of the DCB macro 
instruction. 



Read Initial (TI) 

READ Initial monitors the line for a mes- 
sage from a terminal, and reads it into the 
input area. The Read operation ends when 
an EOM, EOT, or WRU character is received. 

1. Prepare 

2. Sense 

3. Read Text 

Programming Note : A RESETPL macro is ef- 
fective only if issued when message trans- 
mission is not in progress. 



READ Continue (TT) 



READ Continue reads message text from a 
terminal following receipt of an EOM char- 
acter, or when the terminal is given the 
right to transmit when contention has 



Note 2 : The computer sends the WRU signal 
to ask for the terminal identification, 
provided that WRU=YES is coded in the DCB 
macro instruction. Otherwise, the computer 
sends a LTRS character. 

Note 3 : The terminal sends its own identi- 
fication. If the received ID and the 
expected ID do not match, the operation is 
posted as complete; no message text is 
read. Bit 3 of DECFLAGS is set to 1. 

Programming Note : The value of the length 
parameter of the READ macro instruction 
irust equal or exceed the length of the 
identification sequence generated by the 
Automatic Answerback Unit. If equal, only 
the terminal identification sequence is 
sent to the computer. If the length param- 
eter exceeds the identification sequence 
length, message text can also be read. 
This is applicable when WRU=YES is speci- 
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fied in the DCB macro instruction; other- Note ; (See Note 1 under READ TE above.) 
wise, command (4) is not generated. 

WRITE Continue (TT) 
WRITE MACRO INSTRUCTIONS 

WRITE Continue sends an output message. 
WRITE Initial (TI) 

Write Initial sends an output message, pre- 1. Write Mark character Note 
ceded by 12 LTRS characters. 2. Write Message 

1. Write Mark characters Note 

2. Write Pad characters Note : (See Note 1 under READ TE above.) 

3. Write Message 



106 OS/VS BTAM SRL 



PROGRAMMING CONSIDERATIONS FOR USE OF 
AUTOPOLL (START- STOP) 

Read Initial operations on lines for which 
the Autopoll feature is used require poll- 
ing lists different from those used in pro- 
grammed polling. They are referred to as 
Start- Stop Autopoll lists. The list may be 
of the open type (SSALST) or wraparound 
type (SSAWLST) , and may have one or more 
terminal entries, each containing a single 
polling character (IBM 1030) or a two- 
character polling sequence (other terminal 
types). They are specified in the same way 
as in lists for programmed polling, with 
the exception of the 2740. The second 
polling character in a list for the 2740 
must be Space. 

To define; an Autopoll polling list, code 
the operand field of a DFTRMLST macro like 
this: 

r _ _ ., 

| (SSALST 1 J 

| (SSAWLST ), Kxx,...) (for 1030) j 

i J 

i : 1 

I (SSALST j j 

| 1 SSAWLST j, (xxyy,...) (for 1050,1060 , 2740) | 
l ; i 



CHANNEL PROGRAMS 

Read Initial operations (and Read Continue 
and Read Repeat operations, on the 1030 and 
1060) using Autopoll require channel pro- 
grams different from those used in pro- 
grammed polling. They are explained below 
by referring to the use of the specific 
commands that form the program. 



If some terminal in the list returns a 
positive response, command (3) is skipped; 
command (4) reads into the first two bytes 
of the input area the index byte indicating 
which terminal responded, and the first 
message character. Command (5) reads the 
remaining message text into the input area. 

Programming Notes ; 

1. To determine which terminal responded, 
examine the index byte. You should 
obtain this index byte not from the 
input area but from the DECPOLPT field 
of the DECB for the line. DECPOLPT 
always contains the index byte, while 
an I/O error during transmission may 
prevent the index byte from being 
placed in the input area. 

2. In specifying the length in the READ 
macro, be sure it is at least one 
greater than the expected text length, 
in order to accommodate the index 
byte. 

READ Initial (TI) 

READ Initial and Reset (TIR) 

(Wraparound Auto Poll List) 

The channel program is: 

1. Write EOT EOT EOT 

2. Poll (Beginning with entry specified 

in macro) 

3. TIC (to command 5) 

4. TIC (to command 7) 

5. Poll (beginning with first entry in 

list) 

6. TIC (to command 5) 

7. Read Index 

8. Read Text 

9. Write EOA EOT EOT EOT (TIR only) 



READ Initial (TI) 


READ Initial and Reset (TIR) 


(Open Auto 


Poll List) 


The channel 


program is: 


1. Write 


EOT EOT EOT 


2. Poll 




3. NOP 




4 . Read 


Index 


5. Read 


Text 


6. Write 


EOA EOT EOT EOT (TIR only) 



Command (1) sets the terminals on the line 
to control mode, as with programmed poll- 
ing. Command (2) initiates the polling 
operation. Command (3) is executed only if 
no response is received from a terminal in 
the list, or if no terminal in the list 
returns a positive response to polling, 
that is, all terminals send negative 
responses. Execution of command (3) ends 
the Read operation, which is posted com- 
plete in the event control block. 



Command (1) sets the terminals on the 
line to control mode. Command (2) 
initiates the polling operation, beginning 
with the terminal specified by the "entry" 
operand in the READ macro. If before the 
end of the list is reached a positive 
response is returned, the status modifier 
is set, causing the next command, (3), to 
be skipped; command (4) transfers to com- 
mand (7) , followed by (8) , which functions 
like commands (4) and (5) in the "open- 
type" Autopoll operation. 

If, however, the end of the list is 
reached and no positive response has been 
received, command (3) is executed, giving 
control to command (5), which restarts the 
polling operation at the beginning of the 
polling list. Polling proceeds automati- 
cally, and each time the end of the list is 
reached, command (6) gives control to (5), 
and the polling starts again. If during a 
pass through the list, a positive response 
is received, command (6) is skipped (just 
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as command (3) is skipped above), and com- 
mands (7) and (8) are executed as before. 

Programming Notes ; The same programming 
notes given above apply to Autopoll opera- 
tions with a wraparound list. 

Other Types of READ and WRITE 

With two exceptions, all other types of 
READ macro (such as READ Continue) and all 
types of WRITE macro generate the same 
channel programs as are shown under the 
corresponding type in the appropriate sec- 
tions for the type of terminal concerned: 
"IBM 1030 Data Collection System," "IBM 
1050 Data Communication System," "IBM 2740 
with Station Control Feature," and "IBM 
2740 with Station Control and Checking Fea- 
tures." The exceptions are READ Continue 
and READ Repeat for the IBM 1030 and 1060, 
as shown below. (READ Continue and READ 
Repeat for the 1050 and for the 2740 with 
Station Control and Checking are the same 
as for the non-Autopoll operations for 
these terminals; READ Continue and READ 
Repeat are not provided for 2740 with Sta- 
tion Control and without Checking.) 



READ Continue (TT) (1030,1060) 

The channel program for READ Continue is 
identical to the program for READ Initial 
(using either SSALST or SSAWLST) , except 
that the first command is: 

1. Write Circle Y EOT EOT EOT 

This channel program sends a positive 
response, then repolls the terminal and 
receives message text, as in a Read Initial 
operation. 



READ Repeat (TP) (1030,1060) 

The channel program for READ Repeat is 
identical to the program for READ Initial 
(using either SSALST or SSAWLST) , except 
that the first command is: 

1. Write Circle N EOT EOT EOT 

This channel program sends a negative 
response, then repolls the terminal and 
receives message text, as in a Read Initial 
operation. 
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BSC READ AND WRITE OPERATIONS 



GENERAL INFORMATION 



TRANSMISSION CODES 



Binary synchronous communications under 
BTAM control uses one of three transmission 
codes, as follows: 



System/370 to System/370, 
System/3, 1800, 2770, ■ EBCDI c 
System/360 (including ( or 
Model 20) , or remote f usASCII 
327 (not Write 



Structured Field devices) 
System/370 to 1130: 
System/370 to 2715: 

System/370 to 2780: 

System/370 to 2972: 



EBCDIC 

EBCDIC 
(transparent) 

EBCDIC, USASCII 
or Transcode 

EBCDIC 



Only EBCDIC may be used between a 
System/370 and a 2770, 2780 or a remote 
3270 with Write Structured Field capabil- 
ity when messages are sent in transparent 
mode. Only EBCDIC may be used if the cen- 
tral System/370 is communicating with a 
remote System/370 that is running under 
BOS (Basic Operating System) or BPS (Basic 
Programming System) . These codes are 
shown in Appendix E. 

You must sometimes enter into message 
output areas certain line control charac- 
ters in their USASCII or Transcode form; 
they must appear in main storage according 
to the following rules. 

• In main storage, bits 1-7 in a System/ 
370 byte correspond to bits 7-1 , respe- 
ctively, of the USASCII character. The 
zero-bit is always zero (off). When 
the control unit receives a byte, a 
parity bit is sent over the line along 
with bits 1-7 of the byte. Conversely, 
when seven bits plus a parity bit are 
received by the transmission control 
unit from the line, the seven (data) 
bits are read into main storage right- 
justified in a byte and the zero-bit is 
set to zero. 

• For Transcode, a similar rule holds. 
The hexadecimal equivalent is right- 
justified in a System/370 byte (bits 
2-7) and the 0-bit and 1-bit are always 
set to zero (off). Only bits 2-7 are 
sent over the line. 



REMOTE STATION COMPATIBILITY AND 
INTERMIXING 

Unlike start-stop terminals, BSC stations 
of different types are compatible in use of 
line control procedures, so that it is 
unnecessary to specify at system generation 
time what specific type or types of remote 
station are connected to a given communica- 
tion line. Instead, one of the three types 
of line supported by BTAM is coded in the 
UNIT operand of the system generation IODE- 
VICE macro: 

• BSC1 indicates that the line is a non- 
switched point-to-point line. 

• ESC2 indicates that the line is a 
switched point-to-point line. 

• BSC3 indicates that the line is a non- 
switched multipoint line. 



USER PROGRAM ANALYSIS 

As discussed under "Message Transmission" 
in the section "Line Control and Message 
Transmission," the user program must ana- 
lyze the results of each Read or Write 
operation to determine whether it completed 
successfully or unsuccessfully, and what if 
any exceptional condition occurred. "User 
Program Analysis Procedure" in the section 
"Error Recovery Procedures and Error Reco- 
rding" describes a procedure to follow. In 
addition, the "Suggested Retry Options for 
BSC Read and Write Operations," recoirmends 
appropriate READ and WRITE macro instruc- 
tions to issue following various error and 
exceptional conditions. 



LINE AND MESSAGE CONTROL FUNCTIONS 

ID Verification 

Identification sequences may be exchanged 
between the central computer and some kinds 
of remote BSC stations with which communi- 
cation has been established over a switched 
line. This facility affords either or both 
stations (that is, central computer and 
remote station) the opportunity to verify 
the identity of the other before message 
text is transmitted. The terminal list 
associated with the READ or WRITE macro in- 
struction that established the contact con- 
tains the ID sequence to be sent to the 
remote station, and one or more ID 
sequences that will be accepted from the 
remote station. 
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ID verification is available at either 
of two levels, which may be termed "regu- 
lar" and "expanded". In regular ID verifi- 
cation, only one unique ID sequence can be 
accepted from the remote station, regard- 
less of which of many stations has called 
(or been called by) the central computer. 
Further, BTAM makes only one decision 
regarding continuance of the Read or Write 
operation. That is, if the received 
sequence matches the expected sequence (the 
terminal list contains only one expected 
sequence), the operation continues, result- 
ing in transfer of text between the sta- 
tions. If the received sequence does not 
match the expected sequence, the operation 
is halted, and text transfer does not 
occur. 

In the expanded ID verification, the 
user can designate, in the terminal list, 
many different ID sequences, any of which 
will be accepted from the remote station; 
this allows each station to send a unique 
sequence. Also, contact can be established 
with stations that do not send ID sequences 
as well as with those that do. For 
expanded ID verification, a terminal list 
having multiple entries is used; this type 
of list is designated as SWLST. Each entry 
has a field containing a valid ID sequence 
that will be accepted from a remote sta- 
tion, and is a control byte. (Each entry 
may also have a user-data area, at the 
user's option. This is discussed below.) 

After the line connection has been es- 
tablished and an ID sequence (or other 
data) has been received from the remote 
station, BTAM scans the terminal list for a 
matching ID sequence. If one is found, 
BTAM places the address of the entry con- 
taining the sequence in the first fullword 
of the terminal list, for possible use by 
the user program. Typically, the program 
would use this address to determine which 
remote station called or answered the 
central computer. 

The control byte of an entry contains a 
user-specified indicator specifying what 
action BTAM is to take after the ID 
sequence (or other data) has been received. 
Examples of actions following a Read Con- 
nect operation are: continue with the 
remainder of the Read Connect operation to 
read a message block; disconnect the line; 
or post the operation as complete, without 
reading a message block. 

By setting up the control byte prior to 
the Read or Write operation, and by check- 
ing completion codes and indicators in the 
DECB following receipt of an ID sequence 
(or other data) from a remote station, the 
user program can both determine the status 
of the operation and influence subsequent 
BTAM actions. 



Each terminal list entry may contain a 
four-byte user-data field. In this field 
may be placed a relocatable expression as 
an address that is to be associated with 
the ID sequence (or ENQ character) con- 
tained in that entry. Typically, the user- 
data field would contain the address of a 
subroutine to be called when the remote 
station represented by the ID establishes 
contact with the central computer. 



For more detailed information on use of 
expanded ID verification, see the descrip- 
tions of the READ Connect, WRITE Connect, 
DFTRMLST, and CHGNTRY macro instructions. 

Error Information Byte (EIB) Mode 

BTAM provides the option of specifying, in 
the DCB macro, whether the TCU is to oper- 
ate in EIB mode or non-EIB mode. The dis- 
tinction is as follows: In EIB mode, the 
TCU, during a receive operation, sends an 
error information byte into main storage 
following each IUS (US), ETB, and ETX char- 
acter received from the communication line. 
In non-EIB mode, the TCU does not send the 
EIB into main storage following these 
characters. 

The EIB indicates the presence of either 
a data check or an overrun error (or no 
error at all) in the sub-block that immedi- 
ately preceded the IUS (US), ETB, or ETX 
character. BTAM does not analyze EIBs. 
The user program may check them and, where 
an error is found, take appropriate action, 
such as issuing a READ Repeat with Leading 
Graphics macro instruction to request 
retransmission of that part of the message 
block that is in error. 

Whether or not the TCU is operating in 
EIB mode, it recognizes the IUS (EBCDIC) or 
US (USASCII) character as signifying the 
end of an intermediate block. (IUS is 
Interchange Unit Separator [an EBCDIC 
character], and US is Unit Separator [a 
USASCII character] ; the two are equivalent 
characters.) 

Double Addressing (Multipoint Lines) 

Transient conditions such as lightning 
impulses or switching pulses can introduce 
errors in data transmitted over a communi- 
cation line. Often, such errors consist of 
inverted bit settings within the bit pat- 
tern representing a character. While 
errors of this kind occurring in message 
data are normally detected through checking 
techniques, they are undetected when they 
occur in polling and addressing (selection) 
sequences, which are unchecked. An error 
wherein one valid polling or addressing 
character is changed to another can result 
in polling or addressing the wrong station. 
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To avoid such an occurrence, double ad- 
dressing may be employed for certain BSC 
stations. In this technique, a remote sta- 
tion is represented by two identical chara- 
cters, rather than one character as in 
single addressing. 

When polled or addressed, the remote 
station that recognizes the first character 
compares it with the second. If the two 
are identical, the station address is pre- 
sumed to be correct, and the station 
returns a positive response. If they diff- 
er, a transmission error is presumed to 
have altered one or both of the characters, 
and the station does not return a response. 

The increased polling and addressing 
reliability this technique affords stems 
from the improbability that both of the 
characters would be changed in precisely 
the same way by a transmission error. For 
example, the characters BB are far less 
likely to be converted by an error to CC 
than they are to be converted to BC, or KB, 
or FC. (Each of these conversions could 
result from a single-bit error in each 
character, where the transmission code is 
EBCDIC. For example, the letter B, the bit 
pattern for which is X*C2' (1100 0010), 
becomes a C (X'CS', 1100 0011) or a K 
(X , D2 i , 1101 0010) through a single-bit 
error. ) If a station whose address is K 
was attached to the line, that station 
would recognize the first character of the 
erroneous address KB, but would not respond 
because the two characters did not match. 
Thus, a message intended for station B 
would not be sent to station K instead. 

For System/360 Model 20, System/3, 1800, 
2715, 2770, 2972, and remote 3270 stations 
in a multipoint network, double-addressing 
must be used. 

As is always the case in terminal lists, 
all list entries must have the same length. 
Therefore, if addresses of different 
lengths are to be contained in a list (as 
when single-addressing is used for some 
stations, double-addressing for others) , 
the shorter addresses must be padded with 
leading SYN characters so that they are the 
same length as the longer addresses. 



MESSAGE FORMATS 

In nontrans parent mode, messages appear on 
the line in the format: 

I T /' T T 

| STX| (text) JETB (or ETX) | 
l x — // X j 

The STX (Start of Text) character is 
required at the beginning of each message 



block. (SOH may appear at the beginning of 
the first message block, however.) ETB 
denotes the end of a message block and ETX 
denotes the end of the last block of a mes- 
sage. You must supply in the output area 
the SOH, STX, ETB and ETX characters. In 
calculating the length to be specified in a 
WRITE macro, include the STX and ETX in the 
number of message characters. 



Messages in nontrans pa rent mode may not 
contain line control characters. 

In transparent mode, messages appear on 
the line in the format: 

r t t _// — -t — —r- 1 

| DLE | STX j (text) j DLEJ ETX | 
I X x_// X X J 

Transparent mode allows you to include 
any bit pattern in the message, regardless 
of whether the bit pattern represents a 
line control character. 

The DLE STX must appear at the beginning 
of each message block. DLE ETX denotes the 
end of the message. You must supply the 
ELE STX in the beginning of the output 
area. You do not provide the DLE ETX, as 
each Write operation of the transparent 
type automatically sends these characters 
following your text. 

When coding a WRITE macro for sending 
text in transparent mode, the length must 
include the DLE STX; the length should not 
include the ending characters, DLE ETX, as 
these are sent by a separate command. 

When you receive a transparent message 
from a remote station, it has the format: 

DLE STX (text) ETB (or) 
DLE STX (text) ETX 

The DLE preceding the ETB or ETX is 
removed fcy the TCU before the message 
enters main storage. 

If you issue any WRITE macro that speci- 
fies both conversational operation and use 
of dynamic buffering, the BUFL operand of 
the DCB macro for the line group must spec- 
ify at least 24 bytes. 

Use of Line Control Characters 

Successful transmission of data between 
central computer and remote station demands 
thorough familiarity with line control 
(data link control) procedures. See the 
general discussion of this subject under 
"Use of Line Control Characters" in the 
section "Line Control and Message 
Transmission. 
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Use of SOH and STX Characters 

Since either an SOH or an STX character 
appearing at the beginning block of a mes- 
sage resets, but is not included in, the 
block check character that follows the 
block, the following practice is recom- 
mended. Include as the first character of 
a heading, following the SOH character, 
some specific noncontrol character that is 
never used as the first character following 
STX in a nontrans parent text transmission. 
You may use any character other than a data 
link control character or the percent sign 
(%). Consistent observance of this rule 
will prevent the processing of text data as 
a heading or of a heading as text data 
owing to a transmission error that changes 
STX to SOH or vice versa. When a message 
block is received without error, presence 
of the specific character identifies the 
block as heading, while absence of that 
character identifies it as text. 

Coordinating BSC Central and Remote 
Programs 

In order to achieve message transmission 
between two computers using BSC communica- 
tion, you must be careful to coordinate the 
central and remote programs so they remain 
in step. This requires that you be aware 
of the responses that are valid for message 
text and for each control character that 
may be sent over the line. These are as 
follows. 



RESPONSES 



Responses to Message Text 



ACK-0 or ACK-1 
(Pos. response) 



NAK 

(Neg. response)' 



The remote station 
received the text 
correctly. 

The remote station wishes 
to have the text 
retransmitted. 



leading graphics 



EOT 



DLE EOT 



RVI 



Responses to ENQ 
ACK-0 



ACK-1 



WACK 



EOT 



Note : When a remote 3270 
printer has been started, 
WACK is a positive 
response. 

The remote station is 
transmitting user- 
supplied, noncontrol 
characters. 

The remote station is 
aborting reception of the 
message because of equip- 
ment malfunction or (if 
the remote station is a 
computer) program error. 

The remote station is 
aborting reception of the 
message and is discon- 
necting the line because 
of equipment malfunction 
or (if the remote station 
is a computer) program 
error. 

The remote station wishes 
temporarily to stop 
receiving text. The user 
program may continue 
sending text, however, or 
may send an EOT, to end 
the transmission. 



1 . The remote station is 
ready to receive text. 

2. Positive response to 
text. 

Positive response to 
text. 

The remote station wishes 
to delay transmission. 

The remote station does 
not wish to receive text. 



WACK 

(Wait-before- 

transmit) 



The remote station wishes 
to delay transmission. 
(The only valid response 
to WACK is ENQ (or EOT) ; 
the central computer can- 
not continue sending mes- 
sage text, but must send 
ENQ until the remote sta- 
tion responds with the 
positive acknowledgment 
for the last message 
block it received. The 
central computer may, 
however, respond to WACK 
with an EOT, to end the 
transmission. ) 



NAK 



Message text 



The remote station did 
not acknowledge the last 
t r an smi s s ion . 

Last receipt was text. 



Responses to EOT (Switched Line Only) 



EOT 



ENQ 



The remote station does 
not wish to transmit but 
does not wish to discon- 
nect the line. 

The remote station wishes 
to transmit text. 
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DLE EOT 



The remote station is 
going to disconnect the 
line. 



You should pay close attention to the 
commands within channel programs. Figure 
29 is an example of how central and remote 



channel programs should be matched. This 
example is for System/3 7 O-to-Syst em/370 
communication on a nonswitched point-to- 
point line. It shows only the sequence of 
Read and Write operations; it omits check- 
ing of return and completion codes and 
omits WAIT or TWAIT macros. 



READ TI 
READ TT 
WRITE TT 
WRITE TQ 
WRITE TQ 
WRITE TQ 



WRITE TTV 
(Note 2) 



WRITE TTR 



Prepare 
Read EN 



Write respons 
Read text- 



Write response 
Read text 

Write text 
Read response 




Write ENQ 

Read response ■* 

Write ENQ 
Read response 



Write ENQ 

Read response- 

Write text- 
Read response^ 
Read text J 

Write text- 
Read response-- 
Write EOT 



Write ENQ 
ead response 
rite text 
ead response 



■Write text 
(Read response 
\Read text 



Write WACK sequence 
•Read ENQ 

-Write WACK sequence 
-Read ENQ 

-Write WACK sequence 
Read ENQ 

■Write response 
'Read text 

/Write graphics 
(Write response 
^.Read text 



—Write response 
•-Read text 



WRITE TI 



WRITE TTV 



WRITE TW 
(Note 1) 

WRITE TW 
(Note 1) 

WRITE TW 
(Note 1) 

READ TT 



READ TTL 



READ TT 



|. ) 

Notes: 



1. The number of times the WRITE TW is executed depends on how long you wish to 
delay transmission. The WRITE TW must be followed by WRITE TW, READ TT, READ 
TP, READ TTL, READ TPL, or READ TRV. 



2. On a WRITE TTV the response is read into an input area or user-created buffer. 
Figure 29 . Example of a BSC Message Control Routine 



L 
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BSC NONSWITCHED POINT-TO-POINT OPERATION 

The macro instructions contained in this 
section may be issued for any of the types 
of remote BSC stations that can be con- 
nected to a nonswitched point-to-point 
line, except as noted in individual macro 
instruction descriptions. 

Since BSC operations on nonswitched 
point-to-point lines use contention-type 
line control, no terminal lists are used. 

The channel programs in this section 
correspond to an IODEVICE macro UNIT 
operand of BSC1. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial monitors the line for an ENQ 
sent by the remote station, writes a posi- 
tive response, and reads the message block 
that follows . 

1. Prepare 

2 . Read ENQ 

3. Write Response 

4. Read Text 

READ Initial Inquiry (TIP) 

READ Initial Inquiry monitors the line for 
an ENQ sent by the remote station. 



1. 

2. 



Prepare 
Read 



ENO 



READ Continue (TT) 

READ Continue writes a positive response to 
the remote station and reads a message 
block. 



1. 
2. 



Write 
Read 



ACK-0 or ACK-1 
Text 



Note : The text received is either message 
text or an EOT. 

READ Continue with Leading Graphics (TTL) 

READ Continue with leading graphics func- 
tions the same as a Read Continue, but pre- 
cedes the positive response with leading 
graphics . 



1. Write 

2. Write 

3. Read 



Leading Graphics 
ACK-0 or ACK-1 
Text 



This macro instruction may be issued for 
any type of remote BSC station except an 
IBM 2780 using Transcode; however, the IBM 
System/3, 1800, 2715, and 2770 ignore the 
leading graphics characters that precede 



the response. That is, these characters 
are neither received into core storage 
(2715) or terminal buffer, nor passed to 
any output device attached to the station. 

READ Repeat (TP) 

READ Repeat writes a negative response to 
the remote station and reads a message 
block. 



1. Write 

2 . Read 



NAK 
Text 



READ Repeat with Leading Graphics (TPL) 

READ Repeat with Leading Graphics functions 
the same as a Read Repeat, but precedes the 
negative response with leading graphics. 

1. Write Leading Graphics 

2. Write NAK 

3 . Read Text 

This macro instruction may be issued for 
any type of remote BSC station except an 
IBM 2780 using Transcode; however, the IBM 
System/3, 1800, 2715, and 2770 ignore the 
leading graphics characters that precede 
the response. That is, these characters 
are neither received into core storage 
(2715) or terminal buffer, nor passed to 
any output device attached to the station. 

READ Inquiry (TQ) 

READ Inquiry reads an ENQ from the remote 
station. 

1 . Read ENQ 

READ Interrupt (TRV) 

READ Interrupt writes a Reverse Interrupt 
(RVI) sequence to indicate to the remote 
station that the central computer wishes 
temporarily to stop receiving message text; 
then issues a Read Text command, which will 
receive from the remote station either an 
EOT, signifying end Of text transmission, 
or further text. The RVI sequence is 
equivalent to, and is recognized by the 
remote station as, the proper alternating 
positive acknowledgment (ACK-0 or ACK-1). 

READ Interrupt is for use in lieu of a 
READ Continue. 

1. Write RVI sequence 

2 . Read Text 

Programming Notes : 

1. Receipt of the RVI sequence does not 
force the remote station to break off 
message transmission. It is only an 
indication that the central computer 
wishes to stop receiving. The remote 
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station may continue sending message 
text until such time as it wishes to 
yield to the central computer by send- 
ing EOT. The program in the central 
computer should therefore be arranged 
to issue READ Continue macros until 
the remote station does respond with 
EOT instead of text. 



If both component selection and trans- 
parent message text transmission are 
desired, the component selection characters 
should be sent in a separate message by a 
Write Initial operation, followed by a 
Write TTX (or TTE) or Write TTVX operation 
to send the transparent text. 



2. The READ Interrupt macro must not be 
issued more than once during a trans- 
mission, as incorrect alternating 
acknowledgments may result. 



WRITE MACRO INSTRUCTIONS 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial writes an ENQ to gain use of 
the line, and if the response to the ENQ is 
positive (ACK-0), writes message text and 
reads the response to text. If the 
response to ENQ is other than ACK-0, the 
operation is posted complete, with appro- 
priate indicators set in DECFLAGS. 

1. Write ENQ 

2. Read Response 

3. Write Text 

4. Read Response 

5. Write EOT (TIR only) 

Programming Note ; This macro instruction 
cannot be used to send message text to an 
IBM 2715, because text transmission to this 
type of station must always be in trans- 
parent mode. 

WRITE initial Transparent (TIX) 

WRITE Initial Transparent and Reset (TIXR) 

WRITE Initial Transparent functions the 
same as the Write Initial, except that 
after writing message text it writes the 
ending characters that must follow the 
transparent data. 

1. Write ENQ 

2. Read Response 

3. Write Text 

4. Write DLE ETX 

5. Read Response 

6. Write EOT (TIXR only) 

Programming Note ; This macro instruction 
should not be issued for an IBM 2770 or 
2780 on a point-to-point line if the 2770 
or 2780 requires component selection chara- 
cters in the message text. (Component 
selection characters are required unless 
the Job Select switch (2770) or Mode switch 
(2780) is set for printing or punching (or 
some other output device, for 2770), in 
which case the message is printed or 
punched, regardless of the component speci- 
fied by these characters.) 



WRITE Initial Transparent Block (TIE) 

WRITE Initial Transparent Block functions 
the same as WRITE Initial Transparent (TIX) 
except that it writes DLE ETB instead of 
CLE ETX following message text. 

1. Write ENQ 

2. Read Response 

3. Write Text 

4. Write DLE ETB 

5. Read Response 

Programming Note : This macro instruction 
should not be issued for an IBM 2770 or 
2780 on a point-to-point line if the 2770 
or 2780 requires component selection chara- 
cters in the message text. (See program- 
ming note above.) 

If both component selection and trans- 
parent message text transmission are 
desired, the component selection characters 
should be sent in a separate message by a 
Write Initial operation, followed by a 
Write Continue (TT) or Write Continue Tran- 
sparent (TTX) operation to send the trans- 
parent text. 

WRITE Initial Conversational (TIV) 

WRITE Initial Conversational writes an ENQ 
to gain use of the line, and if the 
response to ENQ is ACK-0, writes message 
text and reads a response, which may be the 
first two characters of a message block, an 
alternating acknowledgement, or NAK. If 
the response is message text, the remaining 
text is read; if not, the operation is 
posted complete. 

1. Write ENQ 

2. Read ACK-0 

3. Write Text 

4. Read Response 

5. Read Text 

Programming Notes ; 

1. This macro instruction cannot be used 
to send message text to an IBM 2715, 
because text transmission to this type 
of station must always be in trans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions; however, the IBM 1800 and 2770 
do not transmit text as a response to 
text received from the central comput- 
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er; they return the usual alternating 
acknowledgment (ACK-0 or ACK-1). 

WRITE Initial Conversational 
Transparent (TIVX) 

WRITE Initial Conversational Transparent 
writes an ENQ to gain use of the line, and 
if the response to ENQ is ACK-0, writes 
message text and the ending characters, DLE 
ETX, that must follow the transparent data. 
The macro then reads a response, which may 
be either the first two characters of a 
message block or NAK. If the response is 
message text, the remaining text is read, 
if not, the operation is posted complete. 



ETB that must follow transparent data, and 
reads a response from the remote station. 



1. Write 


ENQ 


2. Read 


ACK-0 


3. Write 


Text 


4. Write 


DLE ETX 


5. Read 


Response 


6. Read 


Text 


Proqramminq 


Notes : 



1. This macro instruction may be used for 
all types of BSC stations (except as 
noted in 2, below). However, the IBM 
1800, 2715, and 2770 do not transmit 
text as a response to text received 
from the central computer; they return 
the usual alternating acknowledgment 
(ACK-0 or ACK-1). 

2. This macro instruction should not be 
issued for an IBM 2770 or 2780 on a 
point-to-point line if the 2770 or 
2780 requires component selection 
characters in the message text. 1 

WRITE Continue (TT) 

WRITE Continue and Reset (TTR) 

WRITE Continue writes message text and 
reads a response from the remote station. 

1. Write Text 

2. Read Response 

3. Write EOT (TTR only) 

WRITE Continue Transparent (TTX) 

WRITE Continue Transparent and Reset (TTXR) 

WRITE Contine Transparent writes message 
text and the ending characters, DLE ETX, 
that must follow transparent data, and 
reads a response from the remote station. 

1. Write Text 

2. Write DLE ETX 

3. Read Response 

4. Write EOT (TTXR only) 

WRITE Continue Transparent Block (TTE) 

WRITE Continue Transparent Block writes 
message text and the ending characters, DLE 



1. Write 

2. Write 

3. Read 



Text 
DLE ETB 
Response 



WRITE Continue Conversational (TTV) 

WRITE Continue Conversational writes mes- 
sage text and reads a response, which may 
be the first two characters of a message 
block, an alternating acknowledgment, or 
NAK. If the response is message text, the 
remaining text is read; if not, the opera- 
tion is posted complete. 

1 . Write Text 

2. Read Response 

3 . Read Text 

Proqramminq Notes ; 

1. This macro instruction cannot be used 
to send message text to an IBM 2715, 
because text transmission to this type 
of station must always be in trans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions; however, the IBM 1800 and 2770 
do not transmit text as a response to 
text received from the central comput- 
er; they return the usual alternating 
acknowledgment (ACK-0 or ACK-1). 

WRITE Continue Conversational 
Transparent (TTVX) 

WRITE Continue Conversational Transparent 
writes message text and the ending charac- 
ter, DLE ETX, and reads a response, which 
may be the first two characters of a mes- 
sage block, an alternating acknowledgment, 
or NAK. If the response is message text, 
the remaining text is read; if not, the 
operation is posted complete. 

1. Write Text 

2. Write DLE ETX 

3. Read Response 

4. Read Text 

Proqramminq Note : This macro instruction 
may be used for all types of remote BSC 
stations. However, the IBM 1800, 2715, and 
2770 do not transmit text as a response to 
text received from the central computer; 
they return the usual alternating acknowle- 
dgment (ACK-0 or ACK-1) . 



WRITE Inquiry (TQ) 

WRITE Inquiry writes an ENQ and reads a 
response. This macro is for requesting the 
remote station to transmit its last 
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response (ACK-0, ACK-1, NAK, or a conversa- 
tional text reply) . 



1. 


Write 


ENQ 


2. 


Read 


Response 


3. 


Read 


Text 



WRITE Wait- Bef ore-Transmit (TW) 



WRITE Reset (TR) 

WRITE Reset writes an EOT to relinquish use 
of the line. After sending the EOT, the 
next operation must be an initial-type Read 
or Write operation, to aqain gain use of 
the line. 



WRITE Wait-bef ore-transmit writes a WACK 
sequence to a remote station and reads an 
ENQ. The purpose of this macro is to tem- 
porarily stop the remote computer from 
sending. You may issue it in place of READ 
Continue or READ Repeat, or in response to 
a conversational-type Write operation 
executed by the remote station (if a com- 
puter) . The only valid responses to WACK 
are ENQ and EOT. You may issue Write TW 
repeatedly for as long as necessary to 
delay your regular response. 

1. Write WACK 

2 . Prepare 

3. Read ENQ 
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BSC NONSWITCHED MULTIPOINT OPERATION 

The macro instructions contained in this 
section may be issued for any of the types 
of remote BSC stations that can be con- 
nected to a nonswitched multipoint line, 
except as noted in individual macro in- 
struction descriptions. 

The channel programs shown in this sec- 
tion correspond to an IODEVICE macro UNIT 
operand of BSC3. 



DEFINING TERMINAL LISTS 

In order to achieve Read and Write opera- 
tions over multipoint lines, you must 
define appropriate terminal lists (that is, 
polling or addressing lists) and refer to 
these lists in your initial- type READ and 
WRITE macro instructions. 

See the explanation of the DFTRMLST 
macro instruction for general information 
on defining those lists. Given below are 
the specific coding requirements for multi- 
point operations. 

Each Read Initial operation requires an 
open or wraparound polling list, and each 
initial-type Write operation (Write Ini- 
tial, Write Initial Transparent, etc.) 
requires an open addressing list. 

Polling List 

To define a polling list for any type of 
BSC station or combination of stations on a 
multipoint line, code the operand field of 
a DFTRMLST macro like this: 



j ( AUTOLST j | 

| (AUTOWLST), (tidseq,...) | 

i j 

tidseq defines an entry in the polling 
list, and consists of between one and seven 
polling characters, followed by an ENQ 
character, all of which must be coded as 
the hexadecimal equivalents of their trans- 
mission code bit patterns. 

All polling list entries must be the 
same length. Therefore, if polling 
sequences of different lengths are to be 
contained in a list, the shorter sequences 
must be padded with leading SYN characters 
so that they are the same length as the 
longer sequences. 

In defining a polling list of either the 
open (AUTOLST) or wraparound (AUTOWLST) 
kind, you must code, following the entries 
for the stations to be polled, an entry of 
length equal to the others, and containing 
EOT characters (in hexadecimal equivalent 



of the transmission code bit patterns). 
For example, if the entries for the sta- 
tions each contain five polling characters 
plus ENQ, the last entry must be coded as 
six EOT characters. 

Addressing List 

To define an addressing list for any type 
of BSC station or combination of stations 
on a multipoint line, code the DFTRMLST 
operand field like this: 

r t 

j OP ENLST, (tidseq, ...) j 

t J 

tidseq consists of between one and seven 
addressing characters, followed by an ENQ 
character, all of which must be coded as 
the hexadecimal equivalents of their trans- 
mission code bit patterns. 

All addressing list entries must be the 
same length. Therefore, if addresses of 
different lengths are to be contained in a 
list, the shorter addresses must be padded 
with leading SYN characters so that they 
are the same length as the longer 
addresses. 

Note : See the discussion of double ad- 
dressing in the General Information section 
at the beginning of this chapter. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

(Using Open Polling List [AUTOLST]) 

READ Initial initiates an Autopoll opera- 
tion to cause the TCU automatically to poll 
each of the stations in the polling list. 
If a positive response to polling is 
received from any station, the macro reads 
into the input area the index byte indicat- 
ing which station is sending the message, 
followed by the message block. The first 
byte of the input area contains the index. 

1. Write EOT 

2. Poll (at list entry specified in 

READ macro) 

3. NOP (terminates instruction sequence) 

4. Read Index 

5. Read Text 

Command (1) sets the stations on the line 
to control mode. Command (2) initiates the 
polling operation. Command (3) is executed 
if no station in the Auto Poll list returns 
a positive response to polling, that is, 
all stations send negative responses. Com- 
mand (3) is skipped if no response is re- 
ceived from a station in the Auto Poll 
list. Execution of command (3) ends the 
Read operation, which is posted complete 
in the event control block. 
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If some station in the list returns a 
positive response, command (3) is skipped; 
command CO reads into the first two bytes 
of the input area the index byte indicating 
which station responded, and the first mes- 
sage charact€»r. Command (5) reads the 
remaining message text into the input area. 

Programming Notes ; 

1. To determine which station responded, 
examine the index byte. You should 
obtain this index byte not from the 
input area but from the DECPOLPT field 
of the DECB for the line. DECPOLPT 
always contains the index byte, while 
an I/O error during transmission may 
prevent the index byte from being 
placed in the input area. 

2. In specifying the length in the READ 
macro, be sure it is at least one 
greater than the expected text length, 
in order to accommodate the index 
byte. 

READ Initial (TI) 

(Using Wraparound Polling List [AUT0WLST3) 

READ Initial initiates an Auto Poll opera- 
tion to cause the TCU automatically to poll 
each of the stations in the polling list. 
If a positive response is received from any 
station, the macro reads into the input 
area the index byte indicating which sta- 
tion is sending the message, followed by 
the message block. The first byte of the 
input area contains the index. 

1. Write EOT 



2. 


Poll 


(at list entry specified in 
READ macro) 


3. 


TIC 


(to command (5)) 


H. 


TIC 


(to command (7)) 


5. 


Poll 


(at beginning of list) 


6. 


TIC 


(to command (5)) 


7. 


Read 


Index 


8. 


Read 


Text 



Command (1) 
to control m 
polling oper 
tion specifi 
the READ mac 
returned bef 
reached, the 
ing the next 
command (4) 
lowed by (8) 
(4) and (5) 
operation. 



sets the stations on the line 
ode. Command (2) initiates the 
ation, beginning with the sta- 
ed by the "entry" operand in 
ro. If a positive response is 
ore the end of the list is 
status modifier is set, caus- 
command, (3), to be skipped; 
transfers to command (7), fol- 
, which functions like commands 
in the "open- type" Auto Poll 



If, however, the end of the list is 
reached and no positive response has been 
received, command (3) is executed, giving 
control to command (5), which restarts the 
polling operation at the beginning of the 
polling list. Polling proceeds automati- 



cally, and each time the end of the list is 
reached, command (6) gives control to (5), 
and the polling starts again. If a posi- 
tive response is received during a pass 
through the line, command (6) is skipped 
(just as command (3) is skipped above), and 
commands (7) and (8) are executed as 
before. 

Programming Notes ; The same programming 
notes given above apply to Auto Poll opera- 
tions with a wraparound list. 

READ Continue (TT) 

READ Continue writes a positive response to 
the remote station and reads a message 
block. 

1. Write ACK-0 or ACK-1 

2. Read Text 

Note : The text received is either message 
text or an EOT. 

READ Continue" with Leading Graphics (TTL) 

READ Continue with leading graphics func- 
tions the same as a Read Continue, but pre- 
cedes the positive response with leading 
graphics. 

1. Write Leading Graphics 

2. Write ACK-0 or ACK-1 

3 . Read Text 

This macro instruction may be issued for 
any type of remote BSC station except an 
IBM 2780 using Transcode or a remote IBM 
3270; however, the IBM System/3, 1800, 
2715, and 2770 ignore the leading graphics 
characters that precede the response. That 
is, these characters are neither received 
into core storage (2715) or terminal buf- 
fer, nor passed to any output device 
attached to the station. 

READ Repeat (TP) 

READ Repeat writes a negative response to 
the remote station and reads a message 
block. 

1. Write NAK 

2. Read Text 

READ Repeat with Leading Graphics (TPL) 

READ Repeat with Leading Graphics functions 
the same as a Read Repeat, but precedes the 
negative response with leading graphics. 

1. Write Leading Graphics 

2. Write NAK 

3. Read Text 

This macro instruction may be issued for 
any type of remote BSC station except an 
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IBM 2780 using Transcode or a remote IBM 
3270; however, the IBM System/3, 1800, 
2715, and 2770 ignore the leading graphics 
characters that precede the response. That 
is, these characters are neither received 
into core storage (2715) or terminal buf- 
fer, nor passed to any output device 
attached to the station. 



READ Inquiry (TQ) 

READ Inquiry reads an ENQ from the remote 
station. 

1. Read ENQ 

READ Interrupt (TRV) 

READ Interrupt writes a Reverse Interrupt 
(RVI) sequence to indicate to the remote 
station that the central computer wishes 
temporarily to stop receiving message text; 
then issues a Read Text command, which will 
receive from the remote station either an 
EOT, signifying end of text transmission, 
or further text. The RVI sequence is 
equivalent to, and is recognized by the 
remote station as, the proper alternating 
positive acknowledgment (ACK-0 or ACK-1.) 

READ Interrupt is for use in lieu of a 
READ Continue. 



1. 
2. 



Write 
Read 



RVI sequence 
Text 



Programming Notes : 

1. Receipt of the RVI sequence does not 
force the remote station to break off 
message transmission. It is only an 
indication that the central computer 
wishes to stop receiving. The remote 
station may continue sending message 
text until such time as it wishes to 
yield to the central computer by send- 
ing EOT. The program in the central 
computer should therefore be arranged 
to issue READ Continue macros until 
the remote station does respond with 
EOT instead of text. 

2. The READ Interrupt macro must not be 
issued more than once during a trans- 
mission, as incorrect alternating ack- 
nowledgments may result. 

3. The remote 3270 always responds to the 
READ Interrupt macro with an EOT. The 
problem program must determine whether 
all data was received by checking for 
an ETX at the end of the previous mes- 
sage block. If an ETB is present 
instead, all data was not received 

If the rest of the data is wanted, the 
problem program can reread the 
message. 



WRITE MACRO INSTRUCTIONS 

WRITE Initial (TI) 

WRITE Initial and Reset (TIR) 

WRITE Initial addresses a remote station 
and if the response to addressing is posi- 
tive, writes message text, then reads the 
response. 

1. Write EOT 

2. Write Addressing sequence 

3. Read Response 

4. Write Text 

5. Read Response 

6. Write EOT (TIR only) 



Programming Note : This macro instruction 
cannot be used to send message text to an 
IBM 2715, because text transmission to this 
type of station must always be in trans- 
parent mode. 

WRITE Initial Transparent (TIX) 

WRITE Initial Transparent and Reset (TIXR) 

WRITE Initial Transparent addresses a 
remote station, and if the response to ad- 
dressing is positive, writes message text 
and ending characters DLE ETX, then reads 
the response. 

1. Write EOT 

2. Write Addressing sequence 

3. Read Response 

4. Write Text 

5. Write DLE ETX 

6. Read Response 

7. Write EOT (TIXR only) 

Programming Note : This macro instruction 
cannot be used to send message text to an 

IBM 2972, because text transmission to this 
station must always be in nontransparent 
mode. 

For a remote IBM 3270, this macro instruc- 
tion can only be used when sending message 
text to a device with Write Structured Field 
capability. For all other remote 3270 de- 
vices, text transmission must always be in 
nontransparent mode. 

WRITE Initial Transparent Block (TIE) 

WRITE Initial Transparent Block addresses a 
remote station, and if the response to ad- 
dressing is positive, writes message text 
and ending characters DLE ETB, then reads 
the response. 



1. 


Write 


EOT 


2. 


Write 


Addressing sequence 


3. 


Read 


Response 


4. 


Write 


Text 


5. 


Write 


DLE ETB 


6. 


Read 


Response 
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Programming Note : This macro instruction 
cannot be used to send message text to an . 
IBM 2972, because text transmission to this 
station must always be in nontransparent 
mode. 

For a remote IEiM 3270, this macro instruc- 
tion can only be used when sending message 
text to a device with Write Structured Field 
capability. For all other remote 3270 de- 
vices, text transmission must always be in 
nontransparent mode. 
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WRITE Initial Conversational (TIV) 

WRITE Initial Conversational addresses a 
remote station and if the response to ad- 
dressing is positive, writes message text 
and reads a response, which may be the 
first two characters of a message block, an 
alternating acknowledgment, or NAK. If the 
response is message text, the remaining 
text is read; if not, the operation is 
posted complete. 

1. Write EOT 

2. Write Addressing Sequence 

3. Read Response 

4 . Write Text 

5. Read Response 

6. Read Text 



Programming Notes : 

1. This macro instruction cannot be used 
to send message text to an IBM 2715, 
because text transmission to this type 
of station must always be in trans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions. However, the IBM 1800, 2770, 
and 2972 do not transmit text as a 
response to text received from the 
central computer; they return the 
usual alternating acknowledgment 
(ACK-0 or ACK-1). 

WRITE Initial Conversational 
Transparent (TIVX) 

WRITE Initial Conversational Transparent 
addresses a rcjmote station, and if the 
response to addressing is positive, writes 
message text eind the ending characters, DLE 
ETX, that must follow the transparent data. 
The macro then reads a response, which may 
be the first two characters of a message 
block, an alternating acknowledgment, or 
NAK. If the response is message text, the 
remaining text is read; if not, the opera- 
tion is posted complete. 



1. Write 


EOT 


2. Write 


Addressing sequence 


3. Read 


Response 


4. Write 


Text 


5. Write 


DLE ETX 


6 . Read 


Response 


7. Read 


Text 


Programming 


Notes : 


1. This macro instruction can 



to send message text to an IBM 2972, 
because text transmission to this 
station must always be in nontrans- 
parent mode. 



For a remote IBM 3270, this macro 
instruction can only be used when 
sending message text, to a device 
with Write Structured Field capa- 
bility. For all other remote 3270 
device, text transmission must 
always be in nontransparent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions. However, the IBM 1800, 2715, 
and 2770 do not transmit text as a 
response to text received from the 
central computer; they return the 
usual alternating acknowledgment 
(ACK-0 or ACK-1) . 

WRITE Continue (TT) 

WRITE Continue and Reset (TTR) 

WRITE Continue writes message text and 
reads a response from the remote station. 

1. Write Text 

2. Read Response 

3. Write EOT (TTR only) 

Programming Note ; This macro instruction 
cannot be used to send message text to an 

IBM 2972, because text transmission to this 
station must always be in nontransparent 
mode. 

For a remote IBM 3270, this macro instruc- 
tion can only be used when sending message 
text to a device with Write Structured Field 
capability. For all other remote 3270 de- 
vices, text transmission must always be in 
nontransparent mode. 

WRITE Continue Transparent (TTX) 
WRITE Continue Transparent 
and Reset (TTXR) 

WRITE Continue Transparent writes message 
text and the ending characters, DLE ETX, 
that must follow transparent data, and 
reads a response from the remote station. 

1. Write Text 

2. Write DLE ETX 

3. Read Response 

4. Write EOT (TTXR only) 

Programming Note : This macro instruction 
cannot be used to send message text to an 
IBM 2972 or a remote IBM 3270, because 
transmission to these types of stations 
must always be in nontransparent mode. 

WRITE Continue Transparent Block (TTE) 

WRITE Continue Transparent Block writes 
message text and the ending characters, DLE 
ETB, that must follow transparent data, and 
reads a response from the remote station. 
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1. Write Text 

2. Write DLE ETB 

3. Read Response 

Programming Note ; This macro instruction 
cannot be used to send message text to an 

IBM 2972, because text transmission to this 
station must always be in nontransparent 
mode. 

For a remote IBM 3270, this macro instruc- 
tion can only be used when sending message 
text to a device with Write Structured Field 
capability. For all other remote 3270 de- 
vices, text transmission must always be in 
nontransparent mode. 

WRITE Continue Conversational (TTV) 

WRITE Continue Conversational writes mes- 
sage text and reads a response, which may 
be the first two characters of a message 
block, an alternating acknowledgment, or 

NAK. If the response is message text, the 
remaining text is read; if not, the opera- 
tion is posted complete. 

1. Write Text 

2. Read Response 

3. Read Text 



Programming Notes ; 

1. This macro instruction cannot be used 
to send message text to an IBM 2715, 
because text transmission to this type 
of station must always be in trans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions. However, the IBM 1800, 2770, 
and 2972 do not transmit text as a 
response to text received from the 
central computer; they return the 
usual alternating acknowledgment 
(ACK-0 or ACK-1). 

WRITE Continue Conversational Transparent 
(TTVX) 



Programming Notes ; 

1. This macro instruction cannot be used 
to send message text to an IBM 2972, be- 
cause text transmission to this station 
must always be in nontransparent mode. 

For a remote IBM 3270, this macro in- 
struction can only be used when sending 
message text to a device with Write 
Structured Field capability. For all 
other remote 3270 devices, text trans- 
mission must always be in nontrans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions. However, the IBM 1800, 2715, 
and 2770 do not transmit text as a 
response to text received from the 
central computer; they return the 
usual alternating acknowledgment 
(ACK-0 or ACK-1). 



WRITE Inguiry (TQ) 

WRITE Inquiry writes an ENQ and reads a 
response. This macro is for requesting the 
remote station to transmit its last 
response (ACK-0, ACK1, NAK or a conversa- 
tional text reply) . 

1. Write ENQ 

2. Read Response 

3. Read Text 



WRITE Wait-Bef ore-Transmit (TW) 

WRITE Wait-before-transmit writes a WACK 
sequence to a remote station and reads an 
ENQ. The purpose of this macro is to tem- 
porarily stop the remote computer from 
sending. You may issue it in place of READ 
Continue or Read Repeat, or in response to 
a conversational-type Write operation 
executed by the remote computer. The only 
valid responses to WACK are ENQ and EOT. 
You may issue Write TW repeatedly for as 
long as necessary to delay your regular 
response. 



WRITE Continu 
writes messag 
ter, DLE ETX, 
may be the fi 
sage block, a 
or NAK. If t 
the remaining 
operation is 



e Conversational Transparent 
e text and the ending charac- 

and reads a response, which 
rst two characters of a mes- 
n alternating acknowledgment, 
he response is message text, 

text is read; if not, the 
posted complete. 



1. Write Text 

2. Write DLE ETX 

3. Read Response 

4. Read Text 



1. 
2. 



Write WACK 
Read ENQ 



WRITE Reset (TR) 

WRITE Reset writes an EOT to relinquish use 
of the line. After sending the EOT, the 
next operation must be an initial-type Read 
or Write operation, to again gain use of 
the line. 

1. Write EOT 



124 OS/VS BTAM SRL 



BSC SWITCHED POINT-TO-POINT OPERATION 

The macro instructions contained in this 
section may be issued for any of the types 
of remote BSC stations that can communicate 
with the central computer over a switched 
line, except as noted in individual macro 
instruction descriptions. 

Contact between central computer and a 
remote station over a switched line can be 
established in numerous ways, representing 
the various combinations of these 
alternatives: 

• Is the central computer to call a 
remote station or answer a call from a 
remote station? 

• Is the calling or answering function to 
be automatic or manual? That is, are 
the TCU and the common carrier equip- 
ment at the central computer equipped 
to perform the calling (dialing) or an- 
swering function under program control, 
or must the operator at the central 
computer perform these functions? 

• Is the data set (modem) at the central 
computer capable of generating and 
transmitting a "data tone" to signify 
to a calling station that data transfer 
can proceed, or must the user program 
supply the data tone? 

• Once contact has been established, is 
the central computer to send an ID 
sequence to the remote station, is the 
central computer to receive an ID 
sequence from the remote station, or 
both (or neither)? If ID sequences are 
to be received from remote stations, do 
all stations with which contact may be 
established have to send the same ID 
sequence? Or can each send a unique 
sequence? 

• Once contact has been established, is 
the direction of the first message 
transmission to be toward the remote 
station (that is, a Write Text opera- 
tion) , or toward the central computer 
(that is, a Read Text operation)? 

Each of the various available combinations 
of the foregoing alternatives is repre- 
sented by a combination of a specific READ 
or WRITE macro instruction option and a 
terminal list having a specific format and 
content. These are shown in Figure 30. 



DEFINING TERMINAL LISTS 

See the explanation of the DFTRMLST macro 
instruction for general information on 
defining these lists. Given below are the 



specific coding requirements for switched 
point-to-point operations. 



Automatic Calling and Answering - With 
Expanded ID Verification 

To define a calling list, code the operand 
field of a DFTRMLST macro instruction like 
this: 



r 1 

| SWLST, AD, dialcount,dialchars, entry length, | 
| [userlength] , idcount, idsent | 

| [{, (authsequence] ,controlvalue] j 

| [ ,userdata] ) }. . .] j 

l J 

This type of list is for use with a 
WRITE Connect (TC) macro instruction. 

To define an answering list, code the 
operand field of a DFTRMLST macro like 
this: 



| SWLST, AN, entry length, | 

| [userlength] , idcount, idsent j 

| [ { , (authsequence [ ,controlvalue] j 

| [ ,userdata] ) }. . .] j 

i j 

This type of terminal list is for use 
with a READ Connect (TC) or Read Connect 
with Tone (TCW) macro instruction. 

See the section DFTRMLST Macro — SWLST 
Form, for detailed information on coding 
DFTRMLST macros of the SWLST form. 

Automatic Calling and Answering - Without 
Expanded ID Verification 

To define a calling list, code the operand 
field of a DFTRMLST macro like this: 



r n 

|BSCLST, dialcount, dialchars,numrec,ridseq, | 
jnumsent, tidseq j 

L J 

The ridseq operand must end with ACK-0; 
the tidseq operand must end with ENQ. This 
type of list is for use with a READ Initial 
or WRITE Initial macro instruction. 

To define an answering list, code the 
DFTRMLST operand field like this: 



| BSCLST , , numrec , ridseq , numsent , t ids eq 

L - 

The ridseq operand must end with ENQ; 
the tidseq operand must end with ACK-0. 
This type of list is for use with a READ 
Initial macro instruction. 
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TO: 



and to. 



and if Expanded 
ID Verification... 



to be used, 
issue a... 



+~ 



macro that refers 
to a terminal list 
defined like this: 



CALL a remote 
station, using... 



Automatic Calling 



Read text 



is not 3 



READ TI 



BSCLST , dia lcount , 
dialchars, numr ec, 
ridseq , numsent , tidseq 
(See Note 1) 



is 



Write text 



WRITE TC 
(followed 
WRITE TT) 



by 



SWLST,AD,dialcount, 
dialchars, entrylength, 
[user length] ,idcount 
idsent({, (auth- 
sequence [ , control- 
value] (, user- 
data] )}...] 



is not 



WRITE TI« 



BSCLST, dialcount, 
dialchars, numr ec, 
ridseq, numsent, tidseq 



is 



WRITE TC 
(followed 

WRITE TT) 



by 



Manual Calling 



Write text* 



SWLST,MD, entry- 
length, [userlength] , 
idcount , idsent 
({, (authsequence 
( ,controlvalue] 
[, user data] )}...] 



is not 



WRITE TC 
(followed 
WRITE TT) 



by 



WTLIST , , numrec , 
ridseq, numsent, 
tidseq 



I— 



ANSWER a remote 
station, using. . . 



Automatic Answering 



is 



Read text 



READ TC or 
TCW 



l~ 



SWLST, AN, entrylength, 
[userlength] , 
idcount, idsent 
[ { , (authsequence 
[, control value] 
[,userdata] )}...] 



is not 



READ TI 



BSCLST, 0, numrec, 
ridseq , numsent , 
tidseq (see Note 2) 



Manual Answering 



Read text 5 



is not 3 



READ TI 



(if data set [modem] 
automatically gen- 
erates tone) 
BSCLST , , numrec , 
ridseq , numsent , tidseq 

(if data set [modem] 
does not auto- 
matically generate 
tone) WTLIST, 
, numrec , ridseq , 
numsent, tidseq , 
length, area 



| x x 

*- Alternatively, if no ID sequences are required, 

DIALST, dialcount, dialchars 
Alternatively, if no ID sequences are required, 
3 Expanded ID verification not available. 
*»Text cannot be read from the remote station. 
'Text cannot be written to the remote station. 
•Or WRITE TIX, TIV, or TIVX. 



the list may be coded as: 

the list may be coded as: DIALST, 



Figure 30. Summary of BSC Switched Line READ and WRITE Macro and Terminal List Options 
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Omitting ID Sequence : If no ID sequences 
are desired, omit, in the ridseq and tidseq 
operands, all but the ENQ and ACK-0 charac- 
ters. When no ID characters are specified, 
the numrec, ridseq, numsent, and tidseq 
operands are as follows: 

Calling List Answering List 

numrec 2 1 



ridseq* 
numsent 
tidseq* 



ACK-0 

1 

ENO 



ENQ 

2 

ACK-0 



(Alternatively, if ID sequences are not 
desired, you may define a calling list 
using a DFTPilLST in which the operand field 
is coded DIALST,dialcount,dialchars; an an- 
swering list using a DFTRMLST in which the 
operand field is coded DIALST, 0. ) 



Manual Calling 3 - with Expanded ID 
Verification 

To define a calling list, code the operand 
field of a DFTRMLST macro like this: 



SWLST,MD, en try length, 
(userlengthl ,idcount, idsent 
[ {, (authsequencet , con tro lvalue] 
( ,userdata] )}...] 



This type of list is for use with a 
WRITE Connect (TO macro instruction. 



Manual Calling and Answering - Without 
Expanded ID Verification 

To define a calling list, code the operand 
field of a DFTRMLST macro like this: 



An answering list may be coded in one of 
two ways, depending on whether the data set 
(modem) at the answering station (the 
central computer) is designed to automati- 
cally generate a data tone upon receiving a 
call. 

Cata Sets without Tone : If the data set 
does not generate a tone, BTAM sends a 
user-specified character sequence that the 
operator at the calling station hears as an 
audible tone. 

To define an answering list for a line 
equipped with a data set that does net gen- 
erate a tone, code the operand field of a 
DFTRKLST macro like this: 



| WTLIST , , numrec , ridseq , numsent , tidseq , 
| length, area 

L . «. -««..— 



The ridseq operand must end with an ENQ; 
the tidseq operand must end with ACK-0. 
The sequence specified by tidseq may con- 
tain up to 15 characters (excluding the 
two-character sequence, ACK-0). 

The length and area operands specify the 
length of the character sequence used as a 
data tone and the address of that sequence. 

The data tone should be about three 
seconds long. To obtain a tone of this 
duration requires a length of about 255 
characters, for a 600 bits-per- second com- 
nrunication line, or about 450 characters, 
for a 1200 bps line. A sequence of X'FF* 
is recommended for the data tone. This 
type of list is for use with a READ Initial 
iracro. 

Data Sets With Tone : To define an answer- 
ing list for a list for a line equipped 
with a data set that generates a tone, code 
the DFTRKLST operand field like this: 



r t 

| WTLIST, 0, numrec, ridseq, numsent, tidseq | 

u - - „ J 



r t 

| BSCLST,0 , numrec, ridseq, numsent, tidseq | 



The ridseq operand must end with ACK-0; 
the tidseq operand must end with ENQ. The 
sequence specified by tidseq may contain up 
to 15 characters (excluding the ENQ). This 
type of list is for use with a WRITE Con- 
nect macro instruction. 



The ridseq and tidseq operands are as 
explained above (under Data Sets Without 
Tone) . This type of list is for use with a 
READ Initial macro. 



*The ridseq and tidseq operands must be 
coded in hexadecimal representation of the 
appropriate transmission code bit patterns 
of the ENQ and ACK-0 characters. 

a Manual answering with expanded ID verifi- 
cation is not available. 



If no ID sequences are desired, omit in 
the ridseq and tidseq operands all but the 
ENQ and ACK-0 characters. When no ID 
characters are specified, the numrec, rid- 
seq, numsent, and tidseq operands are as 
shown above under Automatic calling and An- 
swering (Without Expanded ID Verification) . 
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DEFINING TERMINAL LIST (SWLST) FOR EXPANDED 
ID VERIFICATION 

Answering List 

A READ Connect macro for Automatic Answer- 
ing, with Expanded ID Verification, 
requires an answering list defined as 
follows: 



i t t 1 

| Name | Operation | Operands | 

^ + + + 

symbol | DFTRMLST | SWLST , AN , entry length , 
| | (userlengthl ,idcount, 

I | idsent [ { , (authsequence 

| | t, controlvalue] 

| | [,userdata] )}...] 

j. x - . 



SWLST 



specifies a list structure for 
expanded BSC ID verification. 



AN 



specifies that an answering list (to 
be used by the READ Connect or Read 
Connect with Tone macro) is to be 
defined. 

entrylength 

specifies the number of bytes to be 
allocated for each list entry contain- 
ing a user-defined authorized ID ENQ 
sequence. The integer specified 
should equal the number of bytes 
required to accommodate the authorized 
ID ENQ sequence of maximum length, 
plus the userdata field, if present (4 
or 0), plus one (for the entry's con- 
trol byte) . Authorized ID ENQ 
sequences of less than the maximum 
length are assembled left- justified 
within the fixed-length ID field allo- 
cated for each entry. Each userdata 
field (if any) and control byte have 
the same offset within all entries. 
(The value specified may be zero if no 
other sequence than ENQ, alone, is 
expected and ENQ is not put in the 
list.) 

userlength 

specifies whether a four-byte userdata 
field is to be allocated for each list 
entry containing an authorized ID ENQ 
sequence. A code of 4 means to alloc- 
ate; means not to allocate. The 
default option is 0. 

idcount 

specifies the length (in bytes) of the 
field required to accommodate the ID 
characters (if any) and ACK-0 defined 
by tne idsent operand. The range per- 
mitted is 2 (ACK-0 alone) through 17; 
up to 15 ID characters may te 
specified. 



idsent 

specifies the hexadecimal representa- 
tion of the ID ACK-0 sequence to be 
sent to the remote station. While the 
ID characters (if any) are of your 
choosing, the ACK-0 sequence is 
required. Upon receiving an ID ENQ 
sequence during execution of a READ 
Connect, BTAM checks the control byte 
value of the corresponding list entry, 
and transmits the ID ACK-0 sequence if 
the checked value is 0. (See the dis- 
cussion of the controlvalue sub- 
operand, or the discussion of the Read 
Connect channel proqram, for the 
explanation of the BTAM actions per- 
formed for the various control byte 
values. ) 

authsequence 

specifies the hexadecimal representa- 
tion of an authorized ID ENQ sequence. 
Each ID ENQ sequence is defined in a 
separate sublist along with its 
corresponding control byte value and 
user data (if any). You should code a 
separate ID ENQ sequence for each 
authorized sequence that can be 
received on a Read Connect operation 
using the particular answering list 
being defined. ID ENQ sequences of 
varying lengths can be defined within 
the same DFTRKLST macro. Each 
sequence specified must include the 
ENQ character at the end. You may 
define ENQ alone as an authsequence 
operand to service remote stations not 
employing ID verification. 

controlvalue 

each list entry assembled for an auth- 
sequence sequence has an associated 
control byte, the value of which 
determines the automatic BTAM action 
to be performed when the sequence is 
received on a Read Connect operation 
using the list. The values and corre- 
sponding BTAM actions are: 



specifies that ETAM is to send the 
idsent sequence and read a message 
block (if any) from the calling sta- 
tion. If you omit the controlvalue 
suboperand within a sublist, this 
value is assumed. (If the controlva- 
lue operand is omitted, two conrmas 
must precede a coded userdata operand 
in the same sublist, because they are 
positional operands within the sub- 
list. ) You may specify this value for 
a list entry containing an ID ENQ 
sequence or the sinqle ENQ character. 



specifies that BTAM is to break the 
line connection and restart the chan- 
nel program at the Enable command (to 
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await a new call) . You may specify 
this action if BTAM is not to service 
a particular calling station at the 
time of the call. Typically, this 
action would be specified for reasons 
of priority (time-of-day scheduling). 
You may specify this value for a list 
entry containing an ID ENQ sequence or 
the single ENQ character. 



specifies that BTAM is to post normal 
completion of the Read Connect immedi- 
ately, with the address of the 
received ENQ character in the first 
word of the answering list. This per- 
mits control to be returned to the 
user program so that it can specify 
the subsequent actions to be per- 
formed. You may specify this value 
only for a list entry containing a 
single ENQ character (i.e., not con- 
taining an ID sequence). This permits 
the user program to issue a subsequent 
READ Continue or READ Repeat macro to 
send ACK-0 or NAK to a calling station 
that is not prepared to receive an ID 
sequence. 



userdata 

specifies the relocatable expression 
to be assembled right-justified in the 
userdata field of the associated list 
entry. If you omit this suboperand 
and userlength specifies 4, four non- 
initialized bytes are allocated for 
the corresponding list entry. (No 
boundary alignment can be assumed for 
the user data field.) 



Notes ; 

1. A maximum of 194 sublists can be coded 
for an answering list of the SWLST 
form. 

2. The CHGNTRY macro can be used to 
change the control byte of an answer- 
ing list of the SWLST form during pro- 
gram execution. 

The first fullword of the list is the 
area in which BTAM stores the address of 
the entry containing the ID ENQ sequence 
corresponding to the received sequence. 
See Appendix A for the format of the 
assembled answering list. 



Calling List 

For Automatic or Manual Calling, with 
Expanded ID Verification, A WRITE Connect 
macro requires a calling list defined as 
follows : 



r t t i 

| Name | Operation (Operands | 

f + + 1 

| symbol JDFTRMLST | SWLST, (AD \, 
I IMDJ 

| (dialcount,dialchars, ] 
| entry length, [user- 
| length] , idcount, idsent 
| ( { , (authsequence 
I [, control value) 
| [ , userdata] )}...] 

i i j. J 



SWLST 



AD 



specifies a list structure for 
expanded BSC ID verification. 



specifies that an auto-dial calling 
list is to be defined. In this case, 
the dialcount and dialchard operands 
are required so that program-initiated 
dialing can occur. The corresponding 
Write Connect channel program begins 
with a Dial command. 



MD 



specifies that a manual-dial calling 
list is to be defined. In this case, 
omit the dialcount and dialchars 
operands, because the dialing opera- 
tion is initiated by the central com- 
puter operator. The Write Connect 
channel program with which a manual- 
dial calling list is used begins with 
an Enable command. 

dialcount 

specifies the number of dial charac- 
ters (bytes) used in the dialing 
operation. Code this operand only if 
you code AD as the preceding operand. 

dialchars 

specifies the decimal digits of the 
telephone number to be dialed. Code 
this operand only if you also code AD. 

entrylength 

specifies the number of bytes to be 
allocated for each list entry contain- 
ing a user-defined authorized ID ACK-0 
sequence. The integer specified 
should equal the number of bytes 
required to accommodate the authorized 
ID ACK-0 sequence of maximum length, 
plus the userdata field, if present (4 
or 0), plus one (for the entry's con- 
trol byte). Authorized ID ACK-0 
sequences of less than the maximum 
length are assembled left- justified 
within the fixed-length ID field allo- 
cated for each entry. Each userdata 
field (if any) and control byte have 
the same offset within all entries. 

userlength 

specifies whether a four-byte userdata 
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field is to be allocated for each list 
entry containing an authorized ID 
ACK-0 sequence. A code of 4 means to 
allocate; means not to allocate. 
The default option is 0. 

idcount 

specifies the length (in bytes) of the 
field required to accommodate the ID 
characters (if any) and ENQ defined by 
the idsent operand. The range per- 
mitted is 1 (ENQ alone) through 16; up 
to 15 ID characters may be specified. 

idsent 

specifies the hexadecimal representa- 
tion of the ID characters (if any) and 
ENQ to be sent to the remote station. 
Typically, the ID characters to be 
sent will convey station identifica- 
tion. The ID characters, if any, are 
of your choosing; the ENQ character is 
required. 

authsequence 

specifies the hexadecimal representa- 
tion of an authorized ID ACK-0 
sequence. Each ID ACK-0 sequence is 
defined in a separate sublist along 
with its corresponding control byte 
value and user data (if any). You 
should code a separate ID ACK-0 
sequence for each authorized sequence 
that can be received from remote (an- 
swering) stations. ACK-0 must be 
coded following each ID sequence; it 
must not be coded where no ID sequence 
is used. BTAM checks for reception of 
ACK-0 or NAK, alone, on a Write Con- 
nect operation without requiring that 
they appear in the list. 

controlvalue 

each list entry assembled for an auth- 
sequence sequence has an associated 
control byte. For any received ID 
sequence terminated by ACK-0, BTAM 
ignores the control byte. When a 
valid ID sequence terminated by NAK is 
received during a Write Connect opera- 
tion, BTAM examines the control byte 
of the entry whose ID matches the 
received ID. The control byte value 
determines the BTAM action to be per- 
formed. The values and BTAM actions 
are: 



specifies that upon receipt of the 
sequence, BTAM is to post completion 
of the operation immediately. 



specifies that upon receipt of the 
sequence, BTAM is to resend the ID ENQ 
sequence. This option has meaning 
only when the ID NAK sequence has been 
sent, indicating that the remote sta- 



tion is not ready to receive, and you 
wish to retry, expecting that the 
remote station will shortly become 
ready to receive. The maximum number 
of retries performed for this control 
byte value is seven. If more retries 
than this are desired, you can reissue 
the WRITE Connect macro; BTAM bypasses 
the initial Enable or Dial command if 
the line connection is already 
established. 

userdata 

specifies the relocatable expression 
to be assembled right- justified in the 
userdata field of the associated list 
entry. If you omit this suboperand 
and userlength specifies 4, four non- 
initialized bytes are allocated for 
the corresponding list entry. (No 
boundary alignment can be assumed for 
the user data field. ) 

Notes ; 

A maximum of 192 sublists can be coded 



1. 



for a calling list of the SWLST form. 



2. The control byte values for a calling 
list cannot be changed by use of the 
CHGNTRY macro. 

The first fullword of the list is the area 
in which BTAM stores (prior to completion 
posting) the address of the list entry 
associated with the received ID sequence. 
See Appendix A for the format of the 
assembled calling list. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

(Using Automatic Calling List — BSCLST 

DIALST) 

READ Initial calls a remote station, writes 
the central computer's identification 
sequence and ENQ to the station, and reads 
the identification sequence of the remote 
station and a response. If the identifica- 
tion matches the identification contained 
in the terminal list, and the response is 
positive (ACK-0), the operation continues 
by writing EOT (indicating that the central 
computer does not wish to send), reading 
ENQ and responding with ACK-0, then reading 
a message block from the remote station. 
If the identifications do not match, the 
Read operation ends with command (3) and is 
posted as complete. 



1. 


Dial 


Dial Digits 


2. 


Write 


ID ENQ 


3. 


Read 


ID ACK-0 


<». 


Write 


EOT 


5. 


Read 


ENQ 


6. 


Write 


ACK-0 


7. 


Read 


Text 



130 OS/VS BTAM SRL 



READ Initial (TI) 

(Using Automatic Answering List — BSCLST, 

DIALST) 

READ Initial answers a call from a remote 
station, reads the identification sequence 
of the remote station and an ENQ, writes 
ACK-0 to indicate that the central computer 
is ready to receive, and reads a message 
block from the remote station. 



Programming Note ; It may be desirable, 
after issuing the READ Initial, to send a 
message to the console operator (using the 
WTO macro) , instructing him to answer calls 
received by the computer. 



READ Connect (TO (Expanded ID 
Verification) (Using Automatic Answering 
List - SWLST) 



1. Enable 

2. Read ID ENQ 

3. Write ID ACK-0 

4. Read Text 

READ Initial (TI) 
(Using Manual Answering List — 
BSCLST, WT LIST) 

A READ Initial macro using a manual answer- 
ing list is for use where the central com- 
puter is not capable of automatically an- 
swering calls from remote stations; the 
operator at the central computer must answ- 
er them manually. Operation is as follows. 



The channe 
line so that 
the telephone 
answers it, a 
the calling s 
initiated by 
rather than a 
then places t 
mode. (This 
command. ) 



1 program first enables the 
calls can be received. When 

rings, the computer operator 
nd may verify the identity of 
tation (if that call was 
the remote station operator 
utomatically) . The operator 
he data set (modem) in data 
terminates the Enable 



If the manual answering list is of the 
WTLIST format (used where the data set 
(modem) does not automatically generate a 
data tone) , the channel program then sends 
a user- specified character sequence that 
the operator at the remote station hears as 
a tone. If the list is of the BSCLST for- 
mat (used where the data set does generate 
a tone), the channel program does not send 
the character sequence. 

The channel program then reads an iden- 
tification sequence, ending in ENQ, from 
the remote station. If the sequence does 
not match the expected sequence, the Read 
Initial operation ends at this point, and 
is posted complete- with- error in the event 
control block. If the two sequences do 
match, the channel program sends the iden- 
tification sesquence of the central comput- 
er, then reads a message block from the 
remote station. 



1. 


Enable 




2. 


Write 


Data Tone Characters (for 
WTLIST only) 


3. 


Read 


ID ENQ 


4. 


Write 


ID ACK-0 


5. 


Read 


Text 



READ Connect is used to allow initial con- 
tact to be established with a remote BSC 
station and to perform a specific action 
based on the ID sequence, if any, received 
from the remote station. The possible 
actions include reading message blocks, 
disconnecting the line, and immediately 
returning control to the user program. 

After the sequence is received, BTAM 
analyzes it. If the sequence matches one 
of the authorized sequences in the answer- 
ing list, BTAM places the address of the 
entry containing the matching ID- ENQ 
sequence (or ENQ alone) in the first full- 
word of the list. BTAM then examines the 
control byte of that list entry to deter- 
mine which action to take. 

If the control byte value is 0, BTAM 
restarts the channel program to send the ID 
ACK-0 sequence (or ACK-0 alone) given in 
the list, and then reads a message block, 
if any. If the control byte value is 1, 
BTAM restarts the channel program to break 
the line connection, and then restarts the 
channel program from the beginning Enable 
command. If the control byte value is 2, 
BTAM immediately posts normal completion 
(X*7F*). (A control byte value of 2 is for 
use when no ID sequence is employed, and 
you wish to follow normal completion 
(X*7F') of the Read Connect operation with 
a READ Continue macro.) 

If the received sequence does not match 
any of the authorized ID-ENQ sequences (or 
ENQ alone), BTAM determines whether ENQ 
alone, an invalid sequence, or DLE EOT was 
received. If ENQ alone was received, BTAM 
posts normal completion (X*7F'). 

If an invalid sequence was received, 
BTAM retries the Read ID ENQ command up to. 
seven times. If all retries are unsuccess- 
ful, BTAM disconnects the line, turns on 
bit 3 of DECFLAGS, and posts a completion 
code of X*7F' (normal completion). If DLE 
EOT was received, BTAM turns on bit 1 of 
DECFLAGS and posts normal completion 
(X'7F'). 

If a timeout occurs on the Read ID ENQ 
command, BTAM disconnects the line and 
restarts the channel program at the Enable 
command. 
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This macro is used only when the 
expanded ID verification facility is to be 
employed. The entry operand of the READ 
Connect macro must specify the name of an 
answering list of the SWLST format, as 
defined by a DFTRMLST macro. The channel 
program generated for the READ Connect 
macro is: 



READ Continue (TT) 

READ Continue writes a positive response to 
the remote station and reads a message 
block. 

1. Write ACK-0 or ACK-1 

2. Read Text 



1. Enable 

2. Read ID ENQ (or ENQ alone) 

3. Write ID ACK-0 (or ACK-0 alone) 

4 . Read Text 

5. Write DLE EOT 

6. Disable 

7. TIC to Enable command 



READ Connect with Tone (TCW) (Expanded ID 
Verification) (Using Automatic Answering 
List — SWLST) 



Note : The text received is either message 
text or an EOT. 

READ Continue with Leading Graphics (TTL) 

READ Continue with leading graphics func- 
tions the same as a Read Continue, but pre- 
cedes the positive response with leading 
graphics . 

1. Write leading Graphics 

2. Write ACK-0 or ACK-1 

3. Read Text 



READ Connect with Tone functions the same 
as READ Connect (TO , as described above, 
except that the channel program contains an 
added command. Write Data Tone Characters. 
This macro is for use on a line equipped 
with an automatic answering unit that does 
not automatically send a data tone upon 
receiving a call. Upon completion of the 
Enable command, which occurs when a call is 
received, the channel program sends a user- 
specified character sequence that the 
operator at the calling station hears as an 
audible tone. 

The character sequence that constitutes 
the tone must be coded in the user program. 
The address and the length of the tone 
character sequence must be specified in the 
outarea and outlength operands of the READ 
TCW macro instruction. 

The data tone should be about three 
seconds long. To obtain a tone of this 
duration requires a length of about 255 
characters, for a 600 bits-per-second com- 
munications line, or about 450 characters 
for a 1200 bps line. A sequence of X'FF' 
is recommended for the data tone. (Notice 
that the address and length of the tone 
sequence are specified in the READ macro, 
not in the DFTRMLST macro, as is the case 
for manual answering, without expanded ID 
verification. ) 

The channel program generated for the 
READ Connect with Tone macro is: 

1. Enable 



2. 


Write 


Data Tone Characters 


3. 


Read 


ID ENQ (or ENQ alone) 


4. 


Write 


ID ACK-0 (or ACK-0 alone) 


5. 


Read 


Text 


6. 


Write 


DLE EOT 



This macro instruction may be issued for 
any type of remote BSC station except an 
IBM 2780 using Transcode; however, the IBM 
System/3, 1800, 2715, and 2770 ignore the 
leading graphics characters that precede 
the response. That is, these characters 
are neither received into core storage 
(2715) or terminal buffer, nor passed to 
any output device attached to the station. 

READ Repeat (TP) 

READ Repeat writes a negative response to 
the remote station and reads a message 
block. 

1. Write NAK 

2. Read Text 

READ Repeat with Leading Graphics (TPL) 

READ Repeat with Leading Graphics functions 
the same as a Read Repeat, but precedes the 
negative response with leading graphics. 

1. Write Leading Graphics 

2. Write NAK 

3. Read Text 

This macro instruction may be issued for 
any type of remote BSC station except an 
IBM 2780 using Transcode; however, the IBM 
System/3, 1800, 2715, and 2770 ignore the 
leading graphics characters that precede 
the response. That is, these characters 
are neither received into core storage 
(2715) or terminal buffer, nor passed to 
any output device attached to the station. 

READ Inquiry (TQ) 

READ Inquiry reads an ENQ from the remote 
station. 



7. Disable 

8. TIC to Enable command 



Read 



ENQ 
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READ Inquiry Monitor (TQM) 



WRITE MACRO INSTRUCTIONS 



Read Inquiry Monitor reads an ENQ (or other 
response) from a 327 5 display station 
equipped with the Dial feature and does not 
time out. It is an alternative to READ 
Inquiry and prevents a timeout when the 
3275 has nothing to send within the 
allotted time. 



1 . Prepare 

2. Read 



ENQ 



This macro instruction does not prevent 
disconnect if the CPU calls the 3275 and 
the 20- second interval timer feature is 
installed and enabled, and the operator 
does not respond within 20 seconds. 



Programming Note : If the application pro- 
gram has a write operation to perform or 
does not wish to wait indefinitely for the 
3275 to send in a response, the application 
program can issue a RESETPL macro to ter- 
minate the Prepare. 



READ Interrupt (TRV) 

READ Interrupt writes a Reverse Interrupt 
(RVI) sequence to indicate to the remote 
station that the central computer wishes 
temporarily to stop receiving message text; 
then issues a Read Text command, which will 
receive from the remote station either an 
EOT, signifying end of text transmission, 
or further text. The RVI sequence is 
equivalent to, and is recognized by the 
remote station as, the proper alternating 
positive acknowledgment (ACK-0 or ACK-1) . 

READ Interrupt is for use in lieu of a 
READ Continue. 

1. Write RVI sequence 

2. Read Text 

Programming Notes ; 

1. Receipt of the RVI sequence does not 
force the remote station to break off 
message transmission. It is only an 
indication that the central computer 
wishes to stop receiving. The remote 
station may continue sending message 
text until such time as it wishes to 
yield to the central computer by send- 
ing EOT. The program in the central 
computer should therefore be arranged 
to issue READ Continue macros until 
the remote station does respond with 
EOT instead of text. 

2. The READ Interrupt macro roust not be 
issued more than once during a trans- 
mission, as incorrect alternating ack- 
nowledgments may result. 



WRITE Initial (TI) 
(Using Automatic Calling List — BSCLST) 

WRITE Initial calls a remote station, 
writes the central computer's identifica- 
tion sequence and ENQ, and reads the iden- 
tification sequence of the remote station 
and a response. If the identification 
matches the identification contained in the 
terminal list, and the response is positive 
(ACK-0), the operation writes message text 
to the remote station and reads a response. 
If the identifications do not match, the 
Write operation ends with command (3) and 
is posted as complete. 

1. Dial Dial digits 

2. Write ID ENQ 

3. Read ID ACK-0 

4. Write Text 

5 . Read Response 

Programming Note : This macro instruction 
cannot be used to send message text to an 
IBM 2715, because text transmission to this 
type of station must always be in trans- 
parent mode. 

WRITE Initial Transparent (TIX) 

(Using Automatic Calling List — BSCLST) 

WRITE Initial Transparent calls a remote 
station, writes the central computer's 
identification sequence and ENQ, and reads 
the identification sequence of the remote 
station and a response. If the identifica- 
tion matches the identification contained 
in the terminal list, and the response is 
positive (ACK-0), the operation writes mes- 
sage text and the ending characters DLE ETX 
to the remote station, and reads a 
response. If the identifications do not 
match, the Write operation ends with com- 
mand (3) and is posted as complete. 



1. Dial 


Dial digits 


2. Write 


ID ENQ 


3 . Read 


ID ACK-0 


4. Write 


Text 


5. Write 


DLE ETX 


6. Read 


Response 


Programming 


Note: This 



This macro instruction 
should not be issued for an IBM 2770 or 
2780 on a point-to-point line if the 2770 
or 2780 requires component selection chara- 
cters in the message text. (Component 
selection characters are required unless 
the Jot Select switch (2770) or Mode switch 
(2780) is set for printing or punching (or 
some other output device, for 2770), in 
which case the message is printed or 
punched, regardless of the component speci- 
fied by these characters.) The reason is 
that when operating in transparent mode, 
the 2770 and 2780 do not recognize com- 
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ponent selection characters within message 
text. 

If both component selection and trans- 
parent message text transmission are 
desired, the component selection characters 
should be sent in a separate message by a 
Write Initial operation, followed by a 
Write TTVX or Write TTX (or TTE) operation 
to send the transparent text. 



WRITE Initial Transparent Block (TIE) 

WRITE Initial Transparent Block calls a 
remote station, writes the central compu- 
ter's identification sequence and ENQ, and 
reads the identification sequence of the 
remote station and a response. If the 
identification matches the identification 
contained in the terminal list, and the 
response is positive (ACK-0) , the operation 
writes message text, and the ending charac- 
ters DLE ETB to the remote station, and 
reads a response. If the identifications 
do not match, the Write operation ends with 
command (3) and is posted as complete. 



1. Dial 


Dial digits 


2. Write 


ID ENQ 


3. Read 


ID ACK-0 


4. Write 


Text 


5. Write 


DLE ETB 


6 . Read 


Response 


Programming 


Note: See p 



See programming note 
under Write TIX macro instruction. 



WRITE Initial Conversational (TIV) 
(Using Automatic Calling List — BSCLST) 

WRITE Initial Conversation calls a remote 
station, writes the central computer's 
identification sequence and ENQ, and reads 
the identification sequence of the remote 
station and a response. If the identifica- 
tion matches the identification contained 
in the terminal list, and the response is 
positive (ACK-0) , the operation writes mes- 
sage text to the remote station and reads a 
response, which may be the first two chara- 
cters of a message block, an alternating 
acknowledgment, or NAK. If the response is 
message text, the remaining text is read; 
if not, the operation is posted complete. 

If the identifications do not match, the 
Write operation ends with command (3) and 
is posted as complete. 



1. 
2. 
3. 
4. 
5. 
6 . Read 



Dial Dial digits 
Write ID ENQ 
Read ID ACK-0 
Write Text 
Read Response 
Text 



Programming Notes ; 

1. This macro instruction cannot be used 
to send message text to an IBM 2715, 
because text transmission to this type 
of station must always be in trans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions; however, the IBM 1800 and 2770 
do not transmit text as a response to 
text received from the central comput- 
er; they return the usual alternating 
acknowledgment (ACK-0 or ACK-1). 

WRITE Initial Conversational Transparent 
(TIVX) 
(Using Automatic Calling List — BSCLST) 

WRITE Initial Conversational Transparent 
calls a remote station, writes the central 
computer's identification sequence and ENQ, 
and reads the identification sequence of 
the remote station and a response. If the 
identification matches the identification 
contained in the terminal list, and the 
response is positive (ACK-0) , the operation 
writes message text and the ending charac- 
ters DLE ETX to the remote station and 
reads a response, which may be the first 
two characters of a message block, an 
alternating acknowledgment, or NAK. If the 
response is message text, the remaining 
text is read; if not, the operation is 
posted complete. 

If the identifications do not match, the 
Write operation ends with command (3) and 
is posted as complete. 

1. Dial Dial digits 

2. Write ID ENQ 

3. Read ID ACK-0 

4. Write Text 

5. Write DLE ETX 

6. Read Response 

7. Read Text 

Programming Notes : 

1. This macro instruction may be used for 
all types of remote BSC stations. 
However, the IBM 1800, 2715, and 2770 
do not transmit text as a response to 
text received from the central comput- 
er; they return the usual alternating 
acknowledgment (ACK-0 or ACK-1). 

2. This macro instruction should not be 
issued for an IBM 2770 or 2780 on a 
point-to-point line if the 2770 or 
2780 requires component selection 
characters in the message text. (Com- 
ponent selection characters are 
required unless the JOB Select switch 
(2770) or Mode switch (2780) is set 
for printing or punching (or some 
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other output device, for 2770), in 
which case the message is printed or 
punched, regardless of the component 
specified by these characters.) 

If both component selection and trans- 
parent message text transmission are 
desired, the component selection characters 
should be sent in a separate message by a 
Write Initial operation, followed by a 
Write Continue (TT) or Write Continue Tran- 
sparent (TTX) operation to send the trans- 
parent text. 

WRITE Connect (TO 

(Using Manual Calling List — WTLIST) 

A WRITE Connect macro is for use where 
calls to remote stations must be initiated 
manually by the console operator rather 
than by program control. Operation is as 
follows. 

The channel program first enables the 
line so that calls may be initiated. After 
issuing the WRITE Connect macro, the pro- 
gram must inform the console operator (as 
by a WTO macro) to dial the remote station. 
The operator dials the call, and upon hear- 
ing a data tone from the remote station, 
places the data set (modem) in data mode. 
(This terminates the Enable command.) 

The channel program then writes to the 
remote station the identification sequence 
of the central computer, then reads the 
identification sequence of the remote 
station. 

If the received sequence matches the 
expected sequence, the operation is posted 
complete (without error) in the event con- 
trol block. If the sequences do not match, 
the operation is posted complete-with-error 

This macro does not write message text 
to the remote station; one or more WRITE 
Continue macros should be issued for this 
purpose following the WRITE Connect macro. 

1. Enable 

2. Write ID ENQ 

3. Read ID ACK-0 

WRITE Connect (TO (Expanded ID 
Verification) (Using Automatic or Manual 
Calling List — SWLST) 

WRITE Connect is used to originate a call 
to a remote BSC station, either through 
program-initieiited (automatic) dialing or 
through manual dialing, and to cause 
exchange of identification sequences (or 
ENQ and ACK-0) between the central computer 
and the remote station. 

The entry operand of the WRITE Connect 
macro must specify the name of a calling 



list of the SWLST format, as defined by a 
DFTRMLST macro. If the DFTRMLST macro spe- 
cifies the AD operand, the automatic- 
dialing channel program is generated; if 
DFTRMLST specifies the MD operand, the 
manual dialing channel program is 
generated. 



If the response from the called remote 
station is an ID ACK-0 sequence that 
matches one of the authorized ID ACK-0 
sequences in the calling list, BTAM places 
the address of the entry containing the 
matching ID in the first fullword of the 
list and posts normal completion (X'7F'). 

If the response from the remote station 
is an ID NAK sequence, the ID portion of 
which matches the ID portion of one of the 
authorized ID ACK-0 sequences, BTAM places 
the address of the entry containing the 
matching ID in the first fullword of the 
list, then examines the control byte of 
that entry. If the control byte is 0, BTAM 
turns on bit 1 of DECFLAGS and posts normal 
completion (X*7F*). If the control byte is 
1, BTAM retries the Write ID ENQ (or ENQ 
alone) command. 

If the response from the remote station 
is an invalid ID sequence (that is, one 
that does not match any of the authorized 
ID sequences in the calling list), BTAM 
retries the Write ID ENQ (or ENQ alone) 
command. 

In the two foregoing situations in which 
BTAM retries the Write ID ENQ (or ENQ 
alone) command, the maximum number of 
retries is seven. 

If all retries are unsuccessful, and a 
valid ID NAK sequence was received on the 
last retry, BTAM turns on bit 1 of DECFLAGS 
and posts normal completion (X*7F*). If 
all retries are unsuccessful, and an inval- 
id ID sequence was received on the last 
retry, BTAM breaks the line connection, 
turns on bit 3 of DECFLAGS, and posts norm- 
al completion (X f 7F'). 

If the response from the remote station 
is ACK-0 (with no preceding ID) , BTAM posts 
normal completion (X*7F*). If the response 
is NAK (with no preceding ID) , BTAM turns 
on bit 1 of DECFLAGS and posts normal com- 
pletion (X*7F*). If the response is WACK, 
BTAM turns on bits and 1 of DECFLAGS and 
posts normal completion (X'7F*). 

If no response at all is received from 
the remote station, BTAM retries the Write 
ID ENQ (or ENQ alone) command up to seven 
times; if all retries are unsuccessful, 
BTAM breaks the line connection, sets X'Ol* 
in DECSENSO, and posts a completion code of 
X'Ul'. 
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The channel program for automatic dialing 
is: 

1. Dial 

2. Write ID ENQ (or ENQ alone) 

3. Read ID ACK-0 or ID NAK response 

The channel program for manual dialing is: 

1. Enable 

2. Write ID ENQ (or ENQ alone) 

3. Read ID ACK-0 or ID NAK response: 

Programming Note : If the Write Connect 
operation ends with ID NAK, NAK, or WACK 
and you reissue the WRITE Connect macro, 
BTAM starts the channel program at the 
second command (Write ID ENQ) if the line 
connection is still established at the time 
the macro is issued. Otherwise, BTAM 
starts the channel program at the first 
command (Enable or Dial) . 

WRITE Continue (TT) 

WRITE Continue writes message text and 
reads a response from the remote station. 

1. Write Text 

2. Read Response 

Programming Notes : This macro instruction 
cannot be used to send message text to an 
IBM 2715, because text transmission to this 
type of station must always be in trans- 
parent mode. 

WRITE Continue Transparent (TTX) 

WRITE Continue Transparent writes message 
text and the ending characters, DLE ETX, 
that must follow transparent data, and 
reads a response from the remote station. 

1. Write Text 

2. Write DLE ETX 

3. Read Response 

WRITE Continue Transparent Block (TTE) 

WRITE Continue Transparent Block writes 
message text and the ending characters, DLE 
ETB, that must follow transparent data, and 
reads a response from the remote station. 



1. Write 

2. Write 

3. Read 



Text 
DLE ETB 
Response 



WRITE Continue Conversational (TTV) 

WRITE Continue Conversational writes mes- 
sage text and reads a response, which may 
be the first two characters of a message 
block, an alternating acknowledgment, or 
NAK. If the response is message text, the 
remaining text is read; if not, the opera- 
tion is posted complete. 



1. Write Text 

2. Read Response 

3. Read Text 

Programming Notes : 

1. This macro instruction cannot be used 
to send message text to an IBM 2715, 
because text transmission to this type 
of station must always be in trans- 
parent mode. 

2. This macro instruction may be used for 
all other types of remote BSC sta- 
tions; however, the IBM 1800 and 2770 
do not transmit text as a response to 
text received from the central comput- 
er; they return the usual alternating 
acknowledgment (ACK-0 or ACK-1) . 

WRITE Continue Conversational Transparent 
(TTVX) 

WRITE Continue Conversational Transparent 
writes message text and the ending charac- 
ters, DLE ETX, and reads a response, which 
may be the first two characters of a mes- 
sage block, an alternating acknowledgment, 
or NAK. If the response is message text, 
the remaining text is read; if not, the 
operation is posted complete. 

1. Write Text 

2. Write DLE ETX 

3. Read Response 

4. Read Text 

Programming Note : This macro instruction 
may be used for all types of remote BSC 
stations. However, the IBM 1800, 2715, and 
2770 do not transmit text as a response to 
text received from the central computer; 
they return the usual alternating acknowle- 
dgement (ACK-0 or ACK-1). 

WRITE Inguiry (TQ) 

WRITE Inquiry writes an ENQ and reads a 
response. This macro is for requesting the 
remote station to transmit its last 
response (ACK-0, ACK-1, NAK, or a conversa- 
tional text reply) . 

1. Write ENQ 

2. Read Response 

3. Read Text 

WRITE Wait-before-Transmit (TW) 

WRITE Wait-before-Transmit writes a WACK 
sequence to a remote station and reads an 
ENQ. The purpose of this macro is to tem- 
porarily stop the remote computer from 
sending. You may issue it in place of READ 
Continue or READ Repeat, or in response to 
a conversational-type Write operation 
executed by the remote computer. The only 
valid responses to WACK are ENQ and EOT. 
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You may issue Write TW repeatedly for as 
long as necessary to delay your regular 
response. 



1. 
2. 



Write WACK 
Read ENQ 



WRITE Reset (TR) 

WRITE Reset writes an EOT to indicate to 
the remote station that the central comput- 
er has no more message text to send, and 
reads a response. This macro is for giving 
the remote station the opportunity to 
transmit. 



This macro instruction does not prevent 
disconnect if the CPU calls the 3275 and 
the 20-second interval timer feature is 
installed and enabled, and the operator 
does not respond within 20 seconds. 

Programming Note ; If the application pro- 
gram has a write operation to perform or 
does not wish to wait indefinitely for the 
3275 to send in a response, the application 
program can issue a RESETPL macro to ter- 
minate the Prepare. 



WRITE Break (TB) 



1. Write EOT 

2. Read Response 



WRITE Reset Monitor (TRM) 



WRITE Break sends a Disable command to the 
TCU, causing the TCU to break the switched 
line connection. This macro does not 
inform the remote station that the connec- 
tion is to be broken. 



WRITE Reset Monitor writes an EOT to a 3275 
equipped with the Dial feature to indicate 
to the 3275 that the central computer has 
no more message text to send, and awaits a 
response without timing out. It is an 
alternative to write Reset and prevents a 
timeout occurring when the 3275 has nothing 
to send within the allotted tiire. 



1. Write 

2. Prepare 

3 . Read 



EOT 



ENQ 



1. Disable 

WRITE Disconnect (TD) 

WRITE Disconnect writes DLE EOT, indicating 
to the remote station that the line connec- 
tion is to be broken, then sends a Disable 
coirmand to the TCU, causing the TCU to 
break the switched line connection. 

1. Write DLE EOT 

2. Disable 
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LOCAL READ AND WRITE OPERATIONS 



LOCAL IBM 3270 DISPLAY SYSTEM 

For information about using READ and WRITE 
macro instructions for the local 3270 dis- 
play system, see the section "IBM 3270 
Information Display System — Programming 
Considerations . " 



WRITE MACRO INSTRUCTIONS 



WRITE Initial (TI) 



WRITE Initial writes a message to a local 
3270 device. 



READ MACRO INSTRUCTIONS 

READ Initial (TI) 

READ Initial reads modified fields from a 
local 3270 display station after an atten- 
tion interruption has been generated by the 
display station operator. 

1. Select command 

2. Read modified command 

READ Modified (TM) 

READ Modified reads modified fields from a 
local 3270 device independently of action 
by the display station operator. 

1. Select command 

2. Read modified command 

READ Modified from Position (TMP) 

READ Modified from Position reads modified 
fields from a local 3270 device beginning 
at a specified location in the buffer. 

1. Select command* 

2. Write command (to set buffer address) 

3. Read modified command 

READ Buffer (TB) 



READ Buffer reads the entire buffer of a 
local 3270 device. 



1. Select command* 

2. Read buffer coir.mand 



1. 


Select 


command* 


2. 


Write command 


WRITE Erase 


(TS) 



READ Buffer from Position (TBP) 

READ Buffer from Position reads the entire 
buffer of a local 3270 device beginning at 
a specified location. 

1. Select command* 

2. Write command (to set buffer address) 

3. Read buffer command 

*For more information concerning the Prepare to Read Operations 
see, IBM 3270 (Local) Information Display System -- Programming 
Considerations; Prepare to Read Operations , in this book.- 
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WRITE Erase clears the buffer of a local 
3270 device to nulls (binary zeros) and 
then writes a message to the device. 

1. Erase/write command 

WRITE Erase Alternate (TSA) 

WRITE Erase Alternate places the specified 
display or printer into a mode of using 
the alternate buffer size for a device, 
clears the buffer to nulls (binary zeros) 
and then writes a message to the device. 
This macro instruction does not apply to 
the 3272 Control Unit. 

1. Erase/write alternate command 

WRITE Structured Field (TSF) 

WRITE Structured Field transfers a data 
stream containing a structured field (s) 
to a specified device. The Write Struc- 
tured Field macro instruction applies 
only to those devices with structured 
field capability. Devices unable to 
support structured fields, will reject 
this macro with a command reject error. 
This instruction will not cause any 
specific device action; however, the 
structured field contains a type field 
which will cause a device action. For 
more information on structured fields 
see, IBM 3270 Information Display System, 

Library Users Guide, GA23-0058 for the 
manuals applicable to the configuration. 



1. Write structured field command 



WRITE Unprotected Erase (TDS) 

WRITE Unprotected Erase clears all unpro- 
tected fields in the buffer of a local 3270 
device to nulls (binary zeros) . 

1. Erase all unprotected command 

2. NOP 
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PROGRAMMING CONSIDERATIONS FOR REMOTE COMPUTERS 



This chapter contains miscellaneous pro- 
gramming considerations for communicating 
between a central computer and any of the 
remote comput€>rs supported by OS/VS BTAM as 
remote stations: IBM System/370, IBM 
System/360 (including Model 20) , IBM 
System/3, IBM System/7, IBM 1130, and IBM 
1800. These considerations are in addition 
to those shown under "General Information" 
in the section "BSC Read and Write Opera- 
tions" and under the major sections within 
that section covering the three types of 
line configuration (nonswitched point-to- 
point, nonswitched multipoint, and switched 
point-to-point) . 

Except where noted, these considerations 
apply equally to all of the foregoing types 
of remote computers. 

Transmission over Nonswitched 
Point-to-Point Line 



command (or equivalent) in order to listen 
for the ENQ sent by the computer retaining 
control. Transmission begins when one com- 
puter successfully sends the ENQ character 
to the other; that is, receives an ACK-0 
(positive acknowledgment). Thus, the 
direction of transmission is established by 
which computer sends the ENQ. 

When the deferring computer is running 
under BTAM, and contention occurs, BTAM 
immediately ends the operation that sent 
the ENQ character and posts the operation 
complete-with-error (X'Ul* in the DECSDECB 
field of the DECB) . When the computer 
retaining control is running under BTAM, 
and contention occurs, BTAM automatically 
restarts the operation to resend the ENQ 
character up to seven times. 

Transmission over Nonswitched Multipoint 
Line 



Initial contact between the central comput- 
er and the remote computer over a non- 
switched point-to-point line is on a con- 
tention basis. That is, the line remains 
idle until either of the computers sends an 
ENQ character to the other computer, signi- 
fying its intent to begin a transmission. 
Sending the ENQ character is called bidding 
for the line. 

Ordinarily, both computers will not 
simultaneously bid for the line. On rare 
occasions, however, bidding will be simul- 
taneous. When this happens, one computer 
must defer to the other. The control pro- 
grams in the two computers must be coor- 
dinated so that this deferral takes place. 

In BTAM, you accomplish this by coding 
MODE=CNTRL in the DCB macro for the line, 
if you wish the central computer (or the 
remote computer, if it also is running 
under BTAM) to retain control. Conversely, 
you omit MODE=CNTRL if you wish to defer to 
the other computer. The opposite choice 
must then be made for the other computer. 
Assume that both computers are running 
under BTAM. In one BTAM program, MCDE= 
CNTRL would be specified; in the other it 
would be omitted. If the remote computer 
is running under a control program other 
than BTAM, the equivalent action roust be 
taken to assure coordination between the 
two computers. 

When this coordination is done, the com- 
puter that is to retain control automati- 
cally resends the ENQ character, and the 
computer that is to defer executes a Read 



(Applicable only to System/360 Model 20 as 
a remote station. ) 

Communication between the central computer 
and a remote computer over a nonswitched 
multipoint line begins when the central 
computer places the line in control mode by 
sending an EOT character, then initiates 
contact with the desired computer by send- 
ing that computer's polling or addressing 
sequence. 

Transmission from remote computer to 
central computer is initiated when BTAM, in 
the central computer, executes an initial- 
type READ macro instruction. This causes 
the polling sequences for each of the 
remote computers to be sent automatically, 
in turn, until either the last computer 
represented in the polling list is polled 
(for an open-type list) or until the last 
computer represented in the polling list is 
polled following execution of a RESETPL 
rracrc for the line (for a wraparound-type 
list). 

Transmission from central computer to 
remote computer is initiated when BTAM, in 
the central computer, executes an initial- 
type WRITE macro instruction. This causes 
the addressing sequence for the desired 
remote computer to be sent; the WRITE macro 
specifies the addressing list entry repre- 
senting the desired remote computer. 

The details of the polling and address- 
ing functions are discussed under BSC Non- 
switched Multipoint Operation in the BSC 
Read and Write Operations chapter. 
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The polling and addressing sequences are 
specified identically for all types of 
remote computers. That is, up to seven 
polling or addressing characters may be 
sent. There is, however, a distinction in 
the handling of these characters by the 
1800 as opposed to the System/3 and the 
1130. The 1800 hardware itself responds to 
the first two characters of the polling 
sequence. Any further characters, if any, 
in the sequence are merely received by the 
user program; the hardware does not reco- 
gnize them as polling characters. For the 
System/3 and the 1130, however, there is no 
hardware-generated response to the polling 
or addressing sequence; all of the charac- 
ters are received by the program, which 
decides what response to return to the 
central computer. 

As explained under the General Informa- 
tion section of the BSC Read and Write 
Operations chapter, double addressing must 
be used for the System/360 Model 20, 
System/3, and 1800; that is, the first two 
polling or addressing characters must be 
identical. Double addressing, though not 
required for the 1130, is advisable for the 
reasons mentioned in the General Informa- 
tion section. For the Model 20 and the 
1800, the first two polling characters are 
set in the hardware at installation time; 
for the System/3 and the 1130, polling 
characters are specified in the program. 

Transmission over Switched Point- to- Point 
Line 

Communication between the central computer 
and a remote computer via the switched 
telephone network begins when either com- 
puter calls the other. The call may be 
made manually by the computer operator or 
it may be made automatically, where the 
transmission control unit at the computer 
is equipped with an automatic calling unit. 
Similarly, the operator at the called com- 
puter may answer manually or the TCU may 
answer automatically if it is equipped with 
an automatic answering unit. 

BTAM provides the choice of calling a 
distant computer automatically or manually, 
and of answering calls from a distant com- 
puter automatically or manually. 

Once the line connection is established, 
the calling computer sends an ENQ character 
to bid for use of the line, as is done in a 
nonswitched point-to-point (contention) 
system. The called computer, upon answer- 
ing and successfully receiving the ENQ, 
returns an ACK-0 sequence (positive acknow- 
ledgment) . Unlike a contention system, 
however, you may arrange for either the ENQ 
or the ACK-0, or both, to be preceded by 
from one to 15 identification characters. 
This allows the control program at the com- 



puter receiving the ID characters to verify 
that the computer sending those characters 
is authorized to communicate with it. In 
BTAM, these ID characters are user-defined 
in the terminal list referred to by the 
macro instruction that initiates the trans- 
mission. The action BTAM is to take if an 
invalid ID sequence or a negative 
acknowledgment is received may also be 
user-specified. 

The various alternatives to be used are 
determined by which type of READ or WRITE 
iracro instruction you issue to initiate the 
transmission and by which type of terminal 
list you provide for use by that macro. 
See the explanations in the BSC Switched 
Point-to-Point Operation section of the BSC 
Read and Write Operations chapter. Figure 
30 summarizes the choices. 



System/3 Notes 



Data Formats ; IBM System/3 RPG II support 
uses the following formats for transmission 
of data. These formats must be followed 
when sending data to Systero/3 from a CPU. 

• Non- transparent, non-ITB (End of Inter- 
mediate Transmission Character): 

STX-data-ETX or ETB 

• Non-transparent, ITB: 
STX-data-ITB-data-ITB-data-ETX or ETB 

• Transparent, non-ITB: 

DLE- STX-data-ETX or ETB 

Data can be either blocked or unblocked but 
must be of fixed length. Fixed record 
length and unblocked implies non-ITB mode 
and requires that all data between ITBs be 
of the same length. 

Conversational Mode : Only one response to 
conversational data is allowed by System/3. 
To maintain proper line discipline. System/ 
3 will send or accept a NULL message (STX- 
ETX sequence), in lieu of a data transfer 
following a conversational response. 

Examples of situations in which this is 
necessary follow: 

I. System/ 370 Point-to-Point Contention 
BTAM Program (Initiate a Read) 

READ TI 

1. Prepare 

2. Read ENQ 

3. Write ACK-0 

4. Read text 
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WRITE TT 

5. Write text 

6. Reeid response 

WRITE TV 



7. 



8. 



Write NULL message (STX-ETX 

sequence) 

Recid text 



After the conversational transfer of 
data (items 4 and 5), the BTAM pro- 
grammer must write a null message 
before continuing. If item 7 were a 
Write text, the System/3 would reply 
with an EOT. 

II. System/370 Point-to-Point Contention 
BTAM Program (Initiate a Write) 

WRITE TIV 

1. Write ENQ 

2. Read response 

3. Write text 

4. Read text 

READ TT 

5. Write ACK-1 

6. Read NULL message (STX-ETX) 

WRITE TV 



7. 
8. 



Write text 
Read text 



After the conversational transfer of 
data (items 3 and 4) , the BTAM pro- 
grammer must realize that the System/ 
3 will be sending a null message 
(item 6) instead of normal data. 

WACK and TTD Responses ; System/3 will 
transmit WACK or TTD at two second inter- 
vals during a wait time specified by an RPG 
programmer (default of 180 seconds) . An 
EOT (Disc) sequence is sent after the 
elapsed time. 



System/7 Notes 

Programming Support : A System/7 with the 
BSCA feature (feature #2074) is supported 
by BTAM as a standard BSC processor sta- 
tion, similar to a System/3. The applica- 
tion program in the System/7 can communi- 
cate with the central computer using any of 
the following BSC programming support: 



Assembler Language READ/WRITE macro 

instructions 
Assembler Language GET/PUT macro 

instructions 
FORTRAN IV READ/WRITE statements 



With the BSCA feature, the System/7 is 
loaded from the central computer over a 
switched or multipoint BSC line. For a 
switched line, initial program load (IPL) 
is signalled in the ID exchange of the BSC 
station. For a multipoint line, IPL is 
transmitted in the selection sequence of 
the tributary station. 



Switched- line IPL: 



Multipoint IPL: 



DC1 [EBCDIC] 
DC1 [EBCDIC] 
ENQ 

Station selection 

sequence 
DC1 [EBCDIC] 
DC1 [EBCDIC] 
ENQ 



BSC Service Programs : Service programs can 
be loaded into a System/7 over a BSC line. 
These programs can be used to: 

• Bootstrap-load an application program 
from a central computer ($UBIPL) 

• Transmit the contents of System/7 index 
registers to a central computer ($UBREG 
and $UBRGC) 

• Transmit the contents of System/7 
storage to a central computer ($UBDMP) 



If a program in the central computer 
tries to communicate with a System/7 pro- 
gram immediately after loading (using 
$UBIPL on a switched line) , the central 
computer should be prepared to reissue the 
Write Reset macro instruction. The Write 
Reset is necessary because the Read ENQ 
operation may time-out before the System/7 
is fully prepared to respond. 



Supported Functions : The following is a 
summary of the BSCA functions supported for 
System/ 7. 

Line Types 

Leased point-to-point 

Switched point-to-point (manual answer) 
Switched point-to-point (manual call) 
Switched point-to-point (auto answer) 
Multipoint tributary 

Character Modes 

ASCII (nontransparent only) 
EBCDIC (transparent, nontransparent, 
and remote IPL) 

BSC Line Functions 

TTD (for specific duration) 
WACK (for specific duration) 
Data check retry 

Switched line ID exchange (optional) 
Limited conversational facilities 
(optional) 
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Multipoint tributary automatic negative 
response (optional) 

• EOT poll response 

• NAK selection response 

Null message reception 
Leading graphics reception 
SOH (optional) 
ITB nontransparency 

Line Speeds/Clocking 

1200 to 50,000 b.p.s. 

Internal clocking (1200, 2000, and 2400 

b.p.s.) 
External clocking (modem) 

The following BSC functions are not sup- 
ported: 

Transmission of ITB transparency 

Remote workstation (such as HASP and 
RJE) 

Central multipoint 

Auto-Call 
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IBM 2780 DATA TRANSMISSION TERMINAL ~ PROGRAMMING CONSIDERATIONS 



INITIATING TRANSMISSION TO AN IBM 2780 

Transmission over Nonswitched 
Point- to- Point Line 

Initial contact between the central comput- 
er and an IBM 2780 over a nonswitched 
point-to-point line is on a contention 
basis. That is, the line remains idle 
until either the computer or the 2780 sends 
an ENQ character to the other, signifying 
its intent to begin a transmission. Send- 
ing the ENQ character is called bidding for 
the line. Ordinarily, the central computer 
and the 2780 will not simultaneously bid 
for the line. On rare occasions, however, 
bidding will be simultaneous. When this 
happens, the central computer must defer to 
the 2780. To cause this to happen, do not 
code MODE=CNTRL in the DCB macro for the 
line, as doing so would cause BTAM to 
retain control. 



initial-type WRITE macro instruction. This 
causes the addressing sequence for the 
desired 2780 to be sent; the WRITE macro 
specifies the addressing list entry repre- 
senting the 2780. 

The details of the polling and adressing 
functions are discussed under BSC Non- 
switched Multipoint Operation in the BSC 
Read and Write Operations chapter. 

The polling sequence for an IBM 2780 is 
always 

x 6 ENQ 

where the x may be any uppercase or lower- 
case character used as the station address 
of the 2780. This address is established 
at the time the 2780 is installed. The 
second character is always a 6 to indicate 
the card reader. 



When contention occurs, that is, both 
computer and 2780 send ENQ simultaneously, 
BTAM turns on bit 3 in the DECFLAGS field 
of the DECB for the line, posts the Write 
operation that sent the ENQ complete- with- 
error (X'Ul* in DECS DECB ) , and returns con- 
trol to the user program. The user program 
should immediately issue an initial-type 
READ macro; this will cause BTAM to detect 
the next ENQ character sent by the 2780, 
respond by sending ACK-0, and then read 
message text from the 2780. 

Transmission over Nonswitched Multipoint 
Line 

Communication between the central computer 
and an IBM 2780 over a nonswitched multi- 
point line begins when the central computer 
places the line in control mode by sending 
an EOT character, then initiates contact 
with the 2780 by sending the addressing 
sequence for that 2780 or by polling the 
line to wftich the 2780 is connected. 

Transmission from 2780 to central com- 
puter is initiated when BTAM executes an 
initial-type READ macro instruction. This 
causes the polling sequences for each of 
the remote 2780s to be sent automatically, 
in turn, until either the last 2780 repre- 
sented in the list is polled (for an open- 
type list) or until the last 2780 repre- 
sented in the list is polled following 
execution of a RESETPL macro for the line 
(for a wraparound list) . 

Transmission from central computer to 
2780 is initiated when BTAM executes an 



The addressing sequence for an IBM 2780 
is always 

x 3 ENQ (to address the printer) or 

x 4 ENQ (to address the punch) 

where the x is the station address, as 
described for the polling sequence. 

Polling and addressing examples are 
shown in Figure 31. 

Transmission over Switched Point-to-Point 
Line 

Communication between the central computer 
and an IBM 2780 via the switched telephone 
network begins when either the computer or 
the 2780 calls the other. The call may be 
made manually by the computer or terminal 
operator or it may be made automatically, 
where the 2780 or the transmission control 
unit at the computer is equipped with an 
automatic calling unit. Similarly, the 
operator at the computer or the 2780 may 
answer manually or the computer or 2780 may 
answer automatically if it is equipped with 
an automatic answering unit. 

Once the line connection is established, 
the calling station (computer or 2780) 
sends an ENQ character to bid for use of 
the line, as is done in a nonswitched 
point-to-point (contention) system. The 
called station, upon answering and success- 
fully receiving the ENQ, returns an ACK-0 
sequence (positive acknowledgment). Unlike 
a contention system, however, you may 
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Exomple 1: Card reader polled 

Computer EOT. .A6 ENQ. 

Sends: 



2780 
Sends: 




ACK-1 



,STX-Text-US-Text-ETB. 



Compufer Places Line Polling Positive Response fo Polling 

in Control Mode Sequence (First Message Block) 



.STX-Text-US-Text-ETB. 



Second Message Block 
from Card Reader 



ACK-0 



STX-. 



Other 
Message Blocks 



Example 2: Printer addressed 

Computer .EOT 

Sends: 



2780 
Responds: 



Computer Places Line 
in Control Mode 

Example 3: Cord Punch addressed 




Computer 
Sends: 



2780 
Responds: 



.A4 ENQ 



A3 ENQ 



STX-Text-US ESC S-Text-ETB 




STX-Text-ETX 



Printer 
Addressed 



Positive 
Response 



DLE STX.-Text-DLE ETB 




Print and 
Single Space 



DLE ST 



ACK-1 



Print and 
Double Space 







ACK-0 



Print and 
Single Space 




-DLE ETX 



EOT 



Line Placed in 
Control Mode 



.A3 ENQ, 

1 1 



Punch Addressed 
(Line in Control 
Mode Already) 



Positive Response 



ACK-1 



80-character records 
to be punched 



ACK-0 



Printer 
Addressed 



Figure 31. Multipoint Polling/Addressing Operations for 2780 



arrange for either the ENQ or the ACK-0, or 
both, to be preceded by from one to 15 
identification characters. This allows the 
2780 operator or BTAM to verify that the 
station sending those characters is 
authorized to communicate with it. In the 
2780 these characters, like the station 
address, are established at the time the 
2780 is installed. In BTAM, these charac- 
ters are user-defined in the terminal list 
referred to by the macro instruction that 
initiates the transmission. The action 
BTAM is to take if an invalid ID sequence 
or a negative acknowledgment is received 
may also be user-specified. 

The various alternatives to be used are 
determined by which type of READ or WRITE 
macro instruction you issue to initiate the 
transmission and by which type of terminal 
list you provide for use by that macro. 
See the explanations in the BSC Switched 
Point-to-Point Operation section of the BSC 
Read and Write Operations chapter. Figure 
30 summarizes the choices. 



END-TO-END CONTROL CHARACTERS 

In the character set of the IBM 2780 are 
four characters that provide secondary end- 
to-end control functions required by the 
printer, card reader, and card punch of the 
2780. 

One of these characters, BEL, is not 
used when the 2780 communicates with the 
central computer. (Its function in 
terminal-to-terminal operation is to cause 
the audible alarm to sound.) 

Another end-to-end control character is 
EM ( end-of -medium ) . When the card reader 
detects this character punched in a card it 
is currently reading, the reader ejects the 
card. When the EM character is sent to the 
card punch, it causes the punch to eject 
the card. These functions occur, however, 
only when the EM appears in nontrans parent 
text. If it appears in transparent text, 
it is ignored. Regardless of whether it is 
in nontransparent or transparent text. 



14 6 OS/VS BTAM SRL 



however, it is punched in the card, when 
sent to the card punch. 

The remaining two end-to-end characters 
are ESC (Escape) and HT (Horizontal Tab). 
The ESC character is used in component 
selection (except multipoint lines), in 
vertical forms control , and in horizontal 
formatting. The HT character is used in 
horizontal formatting, when the 2780 is 
equipped with the Printer Horizontal Format 
Control feature. 

The use of the ESC and HT characters is 
discussed under the functions with which 
they are associated. 



COMPONENT SELECTION 

In communicating with an IBM 2780 over a 
switched or nonswitched point-to-point line 
(but not a multipoint line), you must per- 
form component selection when transmitting 
messages to the 2780, if the Mode switch at 
the 2780 is set at Transmit or Receive. If 
the Mode switch is set to Print or Punch, 
the 2780 ignores component selection mes- 
sages; all messages it receives are auto- 
matically printed or punched. The Mode 
switch is manually set by the 2780 
operator. 

Component selection is accomplished by 
sending a nontransparent message beginning 



with a two-character escape sequence. To 
select the punch, begin the message (fol- 
lowing the STX character) with ESC 1. To 
select tne printer, begin the message 
(after STX) with any one of the vertical 
forms control escape sequences (for 
example, ESC /, ESC A, ESC B) . Thus, the 
vertical forms control escape sequences 
(discussed below) perform the dual function 
of selecting the printer and controlling 
the forms motion for the records in which 
they appear. 

Once a component is selected, you need 
not reselect it in successive records to be 
sent to that component. 

Because the 2780 recognizes component 
selection escape sequences only in nontran- 
sparent messages it receives, the first 
message, and any subsequent messages con- 
taining component selection sequences, must 
always be in nontransparent mode. Inter- 
vening messages can be in transparent mode. 
Figure 32 illustrates the use of component 
selection sequences. 



Nonswitched Point-to-Point Line 

When the 2780 finishes sending messages to 
the central computer, it transmits ETX (or 
DLE ETX) . The computer responds to this 
with a positive acknowledgment (ACK-0 or 
ACK-1) if it detected no errors. Upon 



Exomple I: Nontransparent mode 



Computer 
Sends: 


STX ESC 4 - 


-Text 


— US — Text — ETB 


STX 


— Text — US ESC A — Text — ETB STX — 


.... 




i 




t 


. 


i 




A J 


t ' 




2780 Replies: 












ACK- 


1 






ACK-0 






Pun 


ch 




80 -chare 


cter records 




Printer Print and Print and 




Sele 


cted 






to be Pur 


iched 




Selected 


Skip 


to 1 Single 


Space 



Example 2: Transparent mode 

Computer 
Sends: 



2780 Replies: 



Punch 
Selected 



DLE STX — Text — DLE ETB 



ACK-1 



DLE STX — Text — DLE ETB 

1 1 



ACK-0 



80 -character records 
to be punched 




ACK-1 



Printer 
Selected 



Figure 32. Examples of Component Selection for 2780 
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receiving the positive acknowledgment, the 
2780 sends an EOT to the computer. 

When the 2780 is equipped with the Auto- 
matic Turnaround feature, the card punch 
automatically enters ready status after the 
card reader reads a blank card. This per- 
mits the computer, upon receiving EOT, to 
immediately bid for the line (by sending 
ENQ) and select the punch. Without this 
feature, selection of the punch following a 
card reader operation requires operator 
intervention. Automatic selection of the 
printer, however, does not require the pre- 
sence of the Automatic Turnaround feature. 



Switched Point-to- Point Line 

The 2780 normally does not transmit the 
disconnect signal (DIE EOT) to the central 
computer; it thus lets the user program at 
the central computer decide when to break 
the switched line connection after a trans- 
mission. As mentioned above, when the 2780 
receives a positive acknowledgment to the 
last message it sends, it returns an EOT to 
the computer. The user program may then 
send the disconnect signal (DLE EOT) or, 
via a WRITE Inquiry macro, bid for use of 
the line. 















I Escape S< 


squ 
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Forms Motion I 


IUSASCII 




Transcode 
ESC / 


After Printinq 1 


|ESC Q 
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Double space | 
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Triple space | 


|ESC A 
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Skip to ch. 1 | 


|ESC B 
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B 




Skip to ch. 2 | 


|ESC C 
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C 




Skip to ch. 3 | 
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D 




Skip to ch. 4 | 


|ESC E 
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E 
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|ESC F 
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F 
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H 




Skip to ch. 8 | 


| (In EBCDIC, 


the 


ESC 


character is iden- 


|tical to 


the PRE (Prefix) character.) | 















Figure 33. Vertical Forms Control Escape 
Sequences 



printer carriage control tape, you must 
begin the print line record with the appro- 
priate escape sequence. See Example 2 of 
Figure 31 for examples of escape sequences 
for vertical forms control. 



When the user program sends an EOT to 
the 2780, the 2780 reacts in one of two 
ways. 

If the card reader is in ready status, 
the 2780 bids for use of the line by send- 
ing ENQ. Upon receiving the ENQ, BTAM 
posts normal completion (X*7F* in the 
DECSDECB field of the DECB) . The user pro- 
gram may, if it is ready to receive, then 
issue a READ Continue (TT or TTL) macro. 

If the card reader is not in ready sta- 
tus, the 2780 does not respond to the EOT. 
Instead, it continues to monitor the line 
for an ENQ from the computer. If it 
receives no ENQ within about 20 seconds, 
the 2780, if equipped with the Automatic 
Answering feature, will then break the line 
connection (go "on-hook"). 

Vertical Forms Control 

Vertical positioning of forms at the 2780 
printer is controlled by predefined escape 
sequences. These are shown in Figure 33. 

You must place the sequence in the first 
two character positions of each message 
block (print line record) you send to the 
printer. Exception: If you wish single 
spacing and, for a switched or nonswitched 
point-to-point line, you require no com- 
ponent selection characters, you may omit 
the escape sequence (ESC /, for EBCDIC, or 
ESC Q, for USASCII). For double or triple 
spacing, or skipping to a channel of the 



HORIZONTAL FORMAT CONTROL 

The IBM 2780 may be equipped with the 
Printer Horizontal Formatting Control fea- 
ture. This feature allows the printer of 
the 2780 to receive from the line instruc- 
tions on arranging across the page the text 
contained in subsequent print line records 
it receives. To tell the 2780 the format 
desired, the user program at the central 
computer must send a format record each 
time the format is to be changed. The for- 
mat record most recently received by the 
printer governs the horizontal format of 
all subsequent print line records. (Send- 
ing a format record is equivalent to set- 
ting the tab stops on a typewriter. ) 

Each format record roust begin with the 
ESC HT sequence. The record contains other 
HT characters, and intervening SP (space) 
characters such that a HT appears at each 
position of the format record corresponding 
to the print line position where a stop is 
to be made (that is, a tab stop is to be 
set) , with SP characters occupying all 
other format record positions. No charac- 
ters other than HT and SP may appear in the 
format record. It is not necessary to make 
the format record as long as the print 
line; it may end at the last HT character. 
The final character of the format record is 
an ETB. See Figure 3'\ for an example. 

Format records must always be sent in 
nontransparent mode. 
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STX ESC HT 


SPSPSPSP 


HT SPSP SPSPSPSP 


HT 


SP SP SP 


HT 


ETB 




1 


2 


3 4 


5 


6 


7 




1. 


Two-character sequence introducing the format record. 






2. 


Indicates 


print positions 1 -4 do not contain a s 


top. 








3. 


Indicates 


a stop at print 


position 5. 










4. 


Indicates 


no stop in print positions 6-1 1 . 










5. 


Indicates 


a stop at print 


position 12. 










6. 


Indicates 


no stop in print positions 13-15. 










7. 


Indicates 


a stop at print 


position 16. 











Figure 34. Example of a 2780 Format Record 



If the 2780 is not equipped with the 
Printer Horizontal Formatting Control fea- 
ture, the 2780 does not recognize HT chara- 
cters as end-to-end control characters 
regardless of whether they appear in trans- 
parent or nontransparent text. 



MULTIPLE RECORD TRANSMISSION 

The 2780 contains a 4 00 -character buffer 
for receiving data from the communications 
line. This buffer can accommodate one, 
two, or more records depending on whether 
the terminal is equipped with the Multiple 
Record Transmission feature and whether 
transparent or nontransparent mode is used. 



The 2780 printer is governed by the 
last-received format record until: 



• It receives a new format record. 

• Power is removed from the terminal. 

• A card is read by the card reader 

(EBCDIC and USASCII codes only) 

• A record is received by the card punch 
(EBCDIC and USASCII codes only) 

For terminals using Transcode, the 
printer retains the format record even if 
card reading or punching occurs following 
use of the printer. 

Once a format record has been sent to 
the printer, HT characters are used in sub- 
sequent print line records the user program 
sends to the printer to cause skipping to 
the next stop position on the print line. 
This is equivalent to pressing the Tab key 
of a typewriter. 

Example ; Assuming that the printer is 
governed by the format record shown in 
Figure 34, if you wished to print the two 
characters A, B at print positions 1 and 2, 
and the three characters C,D,E at positions 
12, 13, and 14, you would send this print 
line record: 

STX A B HT HT C D E ETB 

If HT characters appear in nontrans- 
parent text when no format record is in 
effect, or if it appears in the text beyond 
the format record position corresponding to 
the last stop on the print line, an error 
occurs — overrun of the print line. 

If HT characters appear in transparent 
text, the 2780 does not recognize them as 
end-to-end control characters but treats 
them as text characters. 



2780 without Multiple Record Transmission 
Feature 

Without the feature, the 2780 can receive 
or send two nontransparent records per 
transmission. The first record is ended by 
the unit separator (US) character (also 
called interchange unit separator — IUS — 
in EBCDIC) which provides the ITB function, 
while the second record ends with ETB or 
ETX. Thus, in nontransparent mode, a 
single transmission apppears on the line 
as: 



STX ...text... US 
ETX) 



text. . . ETB (or 



When received by the 2780, only the text 
is printed or punched. The US and ETB (or 
ETX) cause the punch to eject the card, but 
are not themselves punched into the card 
(unlike EM (end-of -medium) , which is 
punched into the card) . 

The STX character is mandatory at the 
beginning of the first record, and optional 
at the beginning of the second (after US) . 

Upon receiving a two-record transmis- 
sion, the 2780 checks each record individu- 
ally. If the first record is invalid and 
the second is invalid, it prints or punches 
only the first record. If the central com- 
puter subsequently resends the two-record 
transmission, the 2780 prints or punches 
only the second record, as the first has 
already been successfully printed or 
punched. If in the initial transmission 
the first record is valid, the 2780 prints 
or punches neither record, even if the 
second record is valid. This avoids pro- 
cessing records out of sequence. 

The 2780 can send two transparent re- 
cords per transmission, in this format: 

DLE STX . . . text. . . DLE US DLE STX . . . 
text... DLE ETB (or DLE ETX) 
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Mode 



Maximum 
number of records per transmission 



Maximum 
number of data characters 1 per record 



Nont rans parent 



2 without MRT 
7 with MRT 



t~ 



(variable length record) 
80 (to punch) 
80 (from reader) 
print line 2 (to printer) 



Transparent 



1 (to 2780) 

2 (from 2780 w/o MRT) 

4 (from 2780 with MRT) 



(fixed length record) 
80 (to punch) 
80 (from reader) 
print line 2 (to printer) 



^-Not including control characters (STX, US r etc.) or escape sequences. 
2 The print line may be 80, 120, or 144 positions. 

Figure 35. IBM 2780 Records: Number and Length 



(The distinction between ETB and ETX is 
that ETX is used to end the last block in a 
transmission. ) 

Although the 2780 can send two-record 
transmissions in transparent mode, BTAM can 
send the 2780 only one record per transmis- 
sion. The format is : 



DLE STX 



text... DLE ETB (or DLE ETX) 



2780 with Multiple Record Transmission 
Feature 

With the feature, the 2780 can send or 
receive up to seven records per transmis- 
sion, in non transparent mode, and can send 
up to four records, in transparent mode. 
BTAM can send the 2780 only one record per 
transmission in transparent mode. 

The maximum number of records per trans- 
mission, and the maximum number of data 
characters per record, are shown in Figure 
35. 

Although escape sequences cannot perform 
component selection in transparent mode, 
they may be used in transparent-mode trans- 
missions to the printer to perform vertical 
forms control. They are optional in this 
case, however, and do not count as part of 
the fixed record length shown in Figure 35. 
The only case in which the escape sequence 
is mandatory in transparent mode is if the 
first data character in the record coin- 
cides with the ESC character. 



PROGRAMMING CONSIDERATIONS 

Maximum Transmission Length 

The maximum number of characters in one 
transmission to the 2780 is 400. All 
characters in the transmission, including 
escape sequences, end-to-end control chara- 
cters, US, ETB, and ETX, occupy positions 



in the buffer, with one exception. STX 
characters are deleted by the 2780 control 
unit as they arrive and do not appear in 
the buffer. The limitation of 400 is in 
addition to other restrictions already men- 
tioned, such as print or punch record 
length and number of records per 
transmission. 

Automatic Turnaround Feature 

If the 2780 is equipped with the Automatic 
Turnaround feature, the first blank card 
placed in the card reader hopper behind 
cards being read and transmitted will cause 
the 2780 to stop card reading and send an 
ETX to the central computer. (The blank 
card is not sent over the line) . In this 
case the last message block from the 2780 
will be: 

STX ...text... US ETX 

Nonmixing of Modes within a Transmission 

Within one transmission you cannot send re- 
cords in both transparent and nontrans- 
parent modes. That is, a transmission of 
the form 



STX ...text. 
ETB 



US DLE STX ...text. 



DLE 



is not permitted. 

Responses by 2780 to Abnormal Conditions 

There are two possible responses by the 
2780 to abnormal conditions occurring when 
the 2780 is receiving a transmission from 
the central computer: NAK and EOT. 

The 2780 sends a response of NAK for 
line errors. For example, the received 
message block may contain a parity error. 
The 2780 returns a NAK to request the 
central computer to retransmit. Another 
kind of line error may result in a 
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received message block containing too many 
characters. (A user-program error could 
produce the same result.) Again, the 2780 
returns a NAK to request retransmission. 
Clearly, if the user program has actually 
sent too many records or characters in one 
transmission, the user program must be 
corrected; no amount of retransmission 
could clear the error condition. 

The 2780 sends EOT in response to cer- 
tain user-program errors that it can 
detect, such as failure to send a format 
record to the printer before sending print 
line records containing horizontal format 
control, or sending too many characters in 
a record. 

The 2780 also sends EOT when it detects 
certain internal errors, such as a punch 
jam, printer forms check, buffer parity 
check, etc. When these conditions occur, 
the 2780 immediately responds to the centr- 
al computer with EOT, signifying that the 
2780 operator must intervene before opera- 
tion can resume. 

Recovery from such a disruption depends 
on the user- program restart and recovery 
procedures and on the 2780 operator proce- 
dures. The operator's instructions may, 
for example, tell him to prepare the 2780 
to expect retransmission of the message 
block to which the 2780 responded with EOT. 
Or he may be instructed to prepare the 2780 
to receive a new message block, unrelated 
to the previous one. In any event, the 
operator's response and the user program's 
response to these conditions should be 
consistent. 

In certain instances the 2780 will not 
immediately respond with EOT when an inter- 
nal error occurs. This happens only if the 
error condition occurs during the printing 
or punching of the last record in a 
received message block. Upon verifying 
that the last record in a block is free of 
error, the 2780 responds with the appropri- 
ate acknowledgment to the central computer 



and overlaps processing of the last- 
received record with receipt of the next 
block. If an internal error occurs during 
processing of the last record, the 2780 
responds to the next block with an EOT. 
The 2780 operator can intervene to process 
the record on which the error actually 
occurred without retransmission of that 
record. The user program would then 
retransmit the next message block. 



A description of internal errors and 
operator procedures may be found in IBM 
2780 Data Transmission Terminal Component 
Description . 

In sending to the central computer, the 
2780 makes special use of the ENQ character 
to indicate the occurrence of an internal 
error. If a buffer parity or overrun error 
occurred in the message block it is send- 
ing, the 2780 sends a message block of the 
form: 

STX ...text... US ....text... ENQ 

(or) 
STX ...text... ENQ 

A message ending with ENQ is invalid, and 
BTAM error recovery procedures automati- 
cally respond to the 2780 with a NAK char- 
acter. The 2780 then sends EOT to indicate 
that it is aborting transmission until the 
operator corrects the error condition. 

If an internal error occurs during pro- 
cessing of a record being readied for 
transmission to the central computer, it 
sends STX ENQ (with no text) . The central 
computer and 2780 then exchange NAK and 
EOT, as above. 

When it receives the EOT, BTAM turns on 
bit 7 of the DECFLAGS field of the DECB and 
posts abnormal completion, with a code of 
X'41'. Subsequent transmission by the 
2780, after communication with the central 
computer is resumed, normally begins with 
the record on which the error occurred. 
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IBM 2790 DATA COMMUNICATION SYSTEM — PROGRAMMING CONSIDERATIONS 



OS/VS BTAM supports Binary Synchronous Com- 
munication between a System/370 and an IBM 
2790 Data Communications System (via an IBM 
2715 Transmission Control Unit) over point- 
to-point (switched and nonswitched) and 
multipoint nonswitched line configurations. 

The 2715 is available in two models: 
local and remote. The local 2715 (2715 
Model 1) is attached directly to the multi- 
plexer channel of a System/370. A Binary 
Synchronous Module is provided in the 2715 
Model 1 to simulate a Binary Synchronous 
Communications Adapter, operating on a 
point-to-point nonswitched line. The 
remote 2715 (2715 Model 2) can be connected 
to an IBM 2701 Data Adapter Unit attached 
to a System/370 multiplexer or selector 
channel, or to an IBM 2703 Transmission 
Control attached to a System/370 multiplex- 
er channel. Communication between the 
System/370 and the 2715 (local and remote) 
follows the line control conventions of 
Binary Synchronous Communications. To the 
System/370 programmer, a local 2715 is 
indistinguishable from a remote 2715 
(operating on a point-to-point nonswitched 
line) . 

For detailed descriptions of the 2790 
system, see IBM 2790 Data Communication 
System Component Description . 

The transmission code supported is tran- 
sparent EBCDIC. When communicating with a 
System/370, the 2715 sends error informa- 
tion and diagnostic messages to the system. 
The type of message (error information or 
diagnostic) is indicated in a special head- 
er that precedes the message text and is 
transparent to the user. 

• Diagnostic messages are operator 
awareness messages that are printed on 
the System/370 console or the 27U0, if 
available. These messages are the 
result of the 2715 completing 
diagnostics. 

• Error information messages are recorded 
on disk. These messages are sent when 
the 2715 has filled a sector of its 
integral disk with error information 
data or by user request. 

Note : If one of these diagnostic or error 
information messages is received by BTAM on 
a READ Initial operation, BTAM changes the 
optype to READ Continue and restarts the 
operation. The initial flag bit in the 
DECB is left on in this case. If one of 
these messages is received on a multipoint 



READ Initial operation, the input area may 
contain the index byte and EOT. 

The READ, WRITE, and CONTROL options 
available for the 2715 are listed in Figure 
19. 

BTAM provides a set of macro instruc- 
tions to enable the user to describe the 
processing that must be performed on his 
input. The 2715 cannot be programmed by 
the user. IBM-supplied microcode in the 
2715 interprets processing requirements 
through a set of tables generated by the 
user-coded macros. 

There are 18 user macros that can be 
used with the 2790 System. Seven of the 
macros are for the basic system, four are 
for the Pulse Count feature, and seven are 
for the 2798 Guidance Display Unit. The 18 
macros, when assembled by the System/370 
Assembler, generate 21 types of tables. 
The tables are transmitted in object form 
to the 2715 by the user's BTAM program. 
These tables contain pointers and index 
values, as well as parameters used by the 
microcoded routines. (See Appendix M for a 
sample 2790 program.) 



2715 PULSE COUNT FEATURE 

The 2790 Data Communications System is a 
data collection and data communication sys- 
tem. The 2715 Pulse Count feature is pro- 
vided to allow the 2790 system user to 
dynamically control and monitor production 
work flow. This feature adds another major 
capability to the 2790 system. 

Some of the highlights of the 2715 Pulse 
Count feature are: 

• The 2793 Area Station is the only area 
station in the 2790 system on which 
pulse counters can be attached. 

• Up to 63 counters are allowed on a 2793 
area station. 

• Up to 1008 counters are allowed on a 
2790 system. 

• These counters can have a decimal count 
from to 29, 999. 

• The READ/WRITE capability is available 
for all counters. 

• The overflow interrupt capability is 
available on all counters. 
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Implicit/explicit counter addressing at 
the DEU level is permitted. 



• Count testing can be performed on up to 
504 counters in the system. 

• Schedule readout capability is avail- 
able for up to 504 counters in the 
system. 

The 2715 Pulse Count feature has many 
possible uses. Some of the functions that 
can be performed with it are: 

• Appending counts automatically to 
transactions entered on a 2795/2796/ 
2797 Data Entry Unit. 



Monitoring the current progress of 
counters by requesting readouts of 
counters for printing at the 2740, 
area station 1053 printer, or the 
System/370. 



the 



Setting counters to predetermined 
counts, and when these counts are 
reached, automatic printouts of the 
counters are routed to the 2740, the 
area station 1053, or the System/370. 

Monitoring for unassigned production 
with printout notification at the 2740, 
the area station 1053, or the 
System/370. 

Monitoring counters on a scheduled 
basis and informing the user when a 
counter is not advancing. Printouts 
can be directed to the 2740, area sta- 
tion 1053, or the System/370 to alert 
the user of such "no- count" production 
conditions. 

Readout of counters on a scheduled 
basis for analysis by users. 

Scheduling up to 15 user-selected time 
schedules for flexibility in implement- 
ing the "count test" and "scheduled 
readout" functions described above. 



Counter Testing 

Two types of counter testing can be auto- 
matically performed by the 2715 if the user 
so desires. The user specifies one of 15 
possible test schedules for each of 504 
counters by means of the user table. He 
can also specify the type of count testing 
that is to be automatically performed on 
each of up to 504 counters. The 2715 will 
scan the counter table and perform one of 
two count tests, "no count" or "unassigned 
production," depending on what the user 
specifies in the tables and also whether or 
not count testing is enabled. 



The user has the ability to enable or 
disable count testing from either the 
System/ 370 or the 2790 DEUs via user- 
specified transaction lists. When 
initiated from a DEU, the desired action 
must be specified in the transaction list 
(CTRLIST macro) . If explicit counter ad- 
dressing is specified, this address must be 
within the data entry. Implicit counter 
addressing at a DEU implies counters 1 
through 32 only. All count test entries 
must be the last data entry from the DEU. 

The user can enable or disable count 
testing from the System/370 or the 2715 
operator's console for all counters on an 
area station, or all counters on the sys- 
tem. If the user disables count testing 
for all counters on the system, he can 
enable all counters and either have the 
2715 continue from the previous stop point 
in the timing of the schedules, or have the 
2715 reinitialize all schedules and start 
again. 

Three possible count testing actions can 
be initiated on an individual counter 
basis: 

1. No-count test can be started. The 
2715 automatically stops unassigned 
production testing in this case. 

2. Unassigned production test can be 
started. The 2715 automatically stops 
no-count test in this case. 

3. All count testing can be stopped. 

The no-count test informs the user that 
a counter is not advancing. The no- count 
test is executed on a user-defined schedule 
on an individual counter basis. When the 
2715 detects that a counter is not advanc- 
ing, a message signifying a no-count condi- 
tion is generated and routed to the 
destination defined by the user in the 
ROUTE operand of the ASCTR macro instruc- 
tion. The message indicates which counter 
has not advanced when it should have. The 
2715 then disables further no-count testing 
for that counter until the user has 
corrected the situation and has enabled 
further testing. Count testing for all 
other counters remains in progress. 

The unassigned production test informs 
the user that a counter is advancing when 
it should not. The unassigned production 
test is executed on a user-defined schedule 
on an individual counter basis. When the 
2715 detects a counter advancing, a message 
signifying an unassigned production test 
condition is generated and routed to the 
destination designated by the user, in the 
ROUTE operand of the ASCTR macro instruc- 
tion. This message indicates which counter 
has advanced when it should not. The 2715 
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then disables further unassigned production 
testing for that counter until the user has 
corrected the situation and has enabled 
further testing. Count testing for all 
other counters remains in progress. 

Scheduled Counter Readout 

An individual counter readout function is 
provided so that the 2715 will automati- 
cally read up to 504 counters on user- 
defined schedules if the user so desires. 
The user specifies one of 15 possible sche- 
dules for each of up to 504 counters in the 
table macros (CTRGROUP and CTRSCHED). As 
the 2715 reads a counter, the transaction 
header is attached and the transaction is 
stored automatically on disk as deferred 
data. The transaction header contains the 
counter address and associated time stamp. 

The user can enable or disable scheduled 
readout from the System/ 3 70 or the 2715 
operator's console for all counters on an 
area station or all counters on the system. 
He can also enable or disable scheduled 
readout for a single counter from the 
System/370. If the user disables scheduled 
readout for all counters on the system, he 
can enable scheduled readout on all coun- 
ters and either have the 2715 continue from 
the previous stop point in the timing of 
the schedules or have the 2715 reinitialize 
all schedules and start again. 

DEU Set Counter Capability 

The, initiating transaction from a DEU con- 
sists of one or more data entries. For 
multiple data entries, the set counter 
function is contained within the last data 
entry. There is no set counter capability 
on the 2795 DEU. Only the 2796 and 2797 
DEUs have this capability. The user 
selects the proper transaction list by set- 
ting the top left knob on the 2796 or the 
left knob on the 2797. (Transaction expan- 
sion may not be used.) The last step in 
the transaction list must be the counter 
appendage. The counter control byte in the 
counter appendage step of the transaction 
list specifies the set counter operation 
and also specifies whether or not implicit 
or explicit counter addressing is to be 
used. For implicit addressing, the user 
does not have to specify the counter 
address. The DEU address is automatically 
translated to a counter address. The user 
specifies the high-order byte of the 5- 
digit value to which the counter, is to be 
set by turning the top right knob on the 
2796 or the right knob on the 2797 to the 
high-order digit of the value. This digit 
must be 0,1, or 2, because the value cannot 
exceed 29,999. The user specifies the low- 
order four digits of the counter value in 
the four digit-rocker switches on the 2796 



or by keying them in on the manual entry 
digit keys of the 2797. 

Note : There are 6 possible manual entry 
positions on the 2797. Only the U low- 
order positions are used for the low-order 
value of the set counter operation. 

Explicit addressing requires that the 
counter address be contained in the data 
entry. Explicit addressing may be accomp- 
lished by DEU manual entry or by manual 
entry and card or badge entry. If manual 
entry is used, the lower left and lower 
right knobs on the 2796 or the two high 
order positions of the 2797 manual entry 
field specify the counter address. If 
iranual and card or badge entry are used, 
columns 77 and 78 of the card or columns 19 
and 20 of the badge must contain the count- 
er address. 

The status of a DEU-initiated set count- 
er operation is indicated via normal status 
reporting. Unsuccessful set counter tran- 
sactions initiated by a DEU are signified 
by raising the red error flag on the DEU 
Set counter functions may not be routed to 
ASLOG printer. 



DEU Read Counter Capability 

The initiating transaction from the DEU 
consists of one or more data entries. For 
a transaction that contains multiple data 
entries, the last data entry must contain 
the information necessary to initiate a 
read counter. The 2795, 2796, and 2797 
DEUs have the read counter capability. The 
user selects the proper transaction list by 
setting the left knob on the 2795 or 2797 
or the top left knob on the 2796. The last 
step in the transaction list must be the 
counter appendage. The counter control 
byte in the counter appendage step of the 
transaction list specifies the read counter 
operation to be performed, and also speci- 
fies whether implicit or explicit counter 
addressing is to be used. Read counter 
values are appended to the normal transac- 
tion and routed according to the user- 
defined routing designation in the transac- 
tion list. 

The read counter capability includes 
both implicit and explicit counter address- 
ing for all read operations except Read 
Group and Read Group Residual, for which 
explicit counter addressing must be used. 
The following read operations may be 
defined in the last step of the transaction 
list: 

• Read (single or group) 

• Read Residual (single or group) 
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• Read and Reset (single counter) 

• Read and Set* (single counter) 

♦For 2796 and 2797 only. 

For implicit counter addressing, the 
user does not have to specify the counter 
address. The DEU address is automatically 
translated to the counter address. For 
explicit counter addressing, the user may 
manually set the lower-left and lower-right 
knobs on the 2796 to the counter address, 
or he may put the counter address in 
columns 77 and 78 of the card or columns 19 
and 20 of the badge. For the 2797, the 
user may mamially enter the two digits for 
the counter address in the manual entry 
digit keys (these two digits must be left 
justified) , or he may put the counter 
address in columns 77 and 78 of the card or 
columns 19 and 20 of the badge. Explicit 
counter addressing for the 2795 may only be 
specified from columns 77 and 78 of the 
card or columns 19 and 20 of the badge. 
Manual entry is not possible on the 2795. 

For explicit counter addressing on the 
Read Group or Read Group Residual, the user 
may manually set the lower-left and lower- 
right knobs on the 2796 to the starting 
counter address, and the first two digit- 
rocker switches to the ending counter 
address, or he may put the starting and 
ending counter addresses in columns 77-80 
of a card or 19-22 of a badge. For the 
2797, the user may manually enter the two 
digits for the starting counter address 
followed by the two digits for the ending 
counter address in the manual entry digit 
keys (these four digits must be left justi- 
fied) , or he may put the starting and end- 
ing counter addresses in columns 77-80 of a 
card or columns 19-22 of a badge. For the 
2795, the user must specify the starting 
and ending counter addresses in columns 
77-80 of a card or columns 19-22 of a 
badge. For a Read and Set operation, the 
user specifies the set counter value in the 
same way as for the set counter operation 
(transaction expansion may not be used) , 
with the top right knob and the four digit- 
rocker switches on the 2796, or the right 
knob and the four low-order digits from the 
manual entry digit keys on the 2797. 

The counter transaction and count value 
may be logged at any area station for 1053 
display by message routing, but the counter 
transaction must consist of only one step 
in addition to the counter appendage. Any 
of the read operations (except Read Group 
and Read Group Residual) may be routed to 
an area station 1053 printer by implicitly 
or explicitly specifying the output 
destination. Read and Set operations 
(READSET) may not be routed to the ASLOG 
printer. The implicit routing address is 



in the transaction list, while the explicit 
routing address is from the card or badge 
entry. Implicit message routing is done by 
using both the left and right knobs on the 
2795 and 2797 or the upper left and right 
knobs on the 2796 to address the transac- 
tion list. For explicit message routing to 
an area station 1053, the user must specify 
the 1053 address in columns 71 and 72 of 
the card or columns 13 and 14 of the badge. 
This applies to any DEU. 

Note ; Transaction expansion is a prerequi- 
site to message routing. Storage expansion 
(32K) is a prerequisite to transaction 
expansion. 

Setting a counter to a certain value 
implies that the user wants to know when 
the counter reaches that value. The set 
counter function sets a counter to a value 
of 29,999 minus the value specified, so 
that when the user-specified count is 
reached, the user is alerted to an overflow 
interrupt for that counter. The read coun- 
ter function allows the actual value of the 
counter to be read. The read residual 
counter function allows the value of the 
counter to be subtracted from 29,999, so 
that the residual difference is read. 

For example, if a user sets a counter to 
a value of 10 and immediately performs a 
read counter function, the value read will 
be 29,989. If he immediately performs a 
read residual function on the counter, the 
value read will be 10. 



2715 TABLES 

There are 18 user macros that, when 
assembled, generate 21 types of tables to 
be transmitted in object form to the 2715. 
The types of tables are: 

• Table Definition Block. 

• Area Station Table. 

• Data Entry Unit Table. 

• Transaction Group Tables. 

• Transaction List Tables. 

• Area Station Sequence Table. 

• Area Station Counter Table. 

• Counter Table. 

• Schedule Table. 

• Data Entry Unit Sequence Table. 

• Data Entry Unit Index Table. 
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• System Parameter Table. 

• Transaction Table. 

• GDU List Table. 

• Parameter List Number Table. 

• Parameter List Table. 

• Display Guidance Table. 

• GDU Area Station Table. 

• GDU Sequence Table. 

• Identification Table. 

• Translate Table. 

Descriptions of these tables and the 
macros that generate them follow. 

Note ; The user must assemble all his 
macros at the same time since the relation- 
ship among the tables is established by 
labels. 

Table Definition Block : The Table Defini- 
tion Block contains a pointer to each of 
the other tables. It is defined by the 
CONFIGUR macro instruction. 

Area Station Table (AS Table) : The Area 
Station Table contains one entry per area 
station. Each entry is one byte and con- 
tains a numeric pointer that relates the 
specified area station to a particular 
transaction group within the Transaction 
Group Table. The maximum size of the AS 
Table is 100 bytes for a 2715 having 32K 
bytes of storage and 64 bytes for a 2715 
having 16K bytes of storage. The AS Table 
is defined by the AS macro instruction. 

Data Entry Unit Table (DEU Table) ; The 
Data Entry Unit Table contains one entry 
for each area station defined in the sys- 
tem. This entry (0-99) is used for all 
data entry units attached to the designated 
area station. If there are no attached 
data entry units, the entry contains a 
value to indicate this condition. The DEU 
table is defined by the AS macro 
instruction. 

The position of the entry in the table 
is relative to the position of the area 
station address within the valid range of 
addresses. For example, the first entry in 
the DEU Table is for the data entry units 
attached to the area station with ID=0 ; the 
second for those attached to the area sta- 
tion with ID=1; etc. 

Each entry in the DEU Table is one byte 
and is used to gain access to the transac- 
tion group associated with all the data 



entry units attached to the area station. 
This indicates that all data entry units 
attached to an area station must use a com- 
iron transaction group. 

Transaction Group Table (TGROUP Table) ; 
Each transaction group consists of nine 
halfword (two-byte) entries that contain 
pointers to a transaction list or to anoth- 
er transaction group. Each entry corres- 
ponds to a transaction code (a transaction 
key on an area station or the value of the 
left rotary knob on a 2795 or 2797 or the 
top left rotary knob on a 2796 Data Entry 
Unit) . Each entry contains a pointer to a 
transaction list that defines the operating 
procedure associated with the specified 
transaction code. If nine transaction 
lists are not sufficient, an indication can 
be set in one or more of the transaction 
group entries to permit a transaction 
expansion function in which a secondary 
value (the first digit of input from an 
area station or the value of the right hand 
rotary knob on a data entry unit) is used 
to index another transaction group. There- 
fore, it is possible for an area station or 
data entry unit to refer to nine TGROUP 
entries, any or all of which may indicate 
secondary indexing. This allows a data 
entry unit to perform a maximum of 81 dis- 
tinct transaction functions, while allowing 
81 functions for area stations (see TGROUP 
in the Macro Descriptions section) . 

All area stations that have the same 
operating characteristics must refer to the 
same transaction group, using the area sta- 
tion address and the corresponding entry in 
the AS Table. The same is true for data 
entry units, using the area station address 
and the corresponding entry in the DEU 
Table. There can be up to 63 transaction 
groups, each of which uniquely specifies an 
area station or data entry unit capability. 
The transaction groups are defined by 
TGROUP macro instructions. 

Transaction List Tables (TRLIST Tables) ; 
Each Transaction List Table consists of a 
three- fcyte identification and routing head- 
er field and either an internal message or 
from one to sixteen data entry steps. The 
header field determines the destination of 
the completed transaction. Each data entry 
step is generated by an ASLIST or DEULIST 
macro and determines whether checking is to 
be performed on the input. If an ASLIST 
macro generated a data entry step, the step 
contains the number of the next guidance 
light to be turned on (more than cne gui- 
dance light number is included if the user 
chooses to include error checking in his 
transaction step, for example, via LENGTH 
and DIGIT operands of the ASLIST macro) . 

A TRLIST Table is defined in any one of 
three ways: 
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• A TRLIST macro followed by one or more 
ASLIST macro instructions, 

• A TRLIST macro followed by one or more 
DEULIST macro instructions, 

• A TRLIST macro followed by one or more 
ASLIST (DEULIST) macro instructions 
with specification for message routing 
with an internal message. 

The first Transaction List Table always 
refers to all IBM 10 35 Badge Readers, if 
there are any on the system. 



Area Station Sequence Table (AS-SEQ Table) : 
A transaction from an area station may com- 
prise a discrete number of processing steps 
(for example, badge, card, card) . The AS- 
SEQ Table keeps track of the last step of 
the transaction entered from each area sta- 
tion. The AS-SEQ Table has one entry per 
area station. Each entry is one byte and 
contains the step number (0-15). The maxi- 
mum size of the AS-SEQ Table is 100 bytes, 
one byte for each of the 100 possible area 
stations. The AS-SEQ Table is defined by 
the AS macro instruction. 



Area Station Counter Table (ASCTR Table) : 
The Area Station Counter Table contains one 
entry per area station. Each entry is two 
bytes and contains a displacement to the 
group of counters in the Counter Table for 
that particular area station. Each entry 
also contains routing information for coun- 
ter overflow and count test response mes- 
sages. All counters attached to an area 
station have counter overflow and count 
test response messages routed to the same 
destination. 

Each entry in the Area Station Counter 
Table is us€.d to gain access to the coun- 
ters in the Counter Table associated with 
this area station. The displacement in 
each entry, plus the counter address, 
allows the 2715 to index to individual 
counters. Scheduled readout and count 
testing are performed at the individual 
counter lev€»l. 

The maximum size of the Area Station 
Counter Table is 202 bytes: 2 bytes for 
each of 100 area stations, plus 2 addition- 
al control bytes. This table is truncated 
at the highest assigned area station. 
Unassigned area stations below the highest 
assigned area station require 2 bytes of 
unused main storage. However, the highest 
assigned area station with counters can be 
any assigned area station less than or 
equal to the highest assigned area station 
defined by the AS macro operand ID=n. The 
Area Station Counter Table is defined by 
the ASCTR macro instruction. 



Counter Table (CTR Table) : The Counter 
Table consists of 2 bytes of control infor- 
mation for each counter in the system that 
requires testing. The table is organized 
en a group basis. Each area station that 
has one or more counters (to be tested) 
constitutes a group. Each group is trun- 
cated at the highest counter address. 
Counters for which scheduled readout and 
count testing are not to be done require 2 
bytes each in the counter table if their 
addresses are less than the highest counter 
address. Only 504 counters can be defined 
in the Counter Table. The Counter Table is 
defined by CTRGROUP macro instructions. 
Each CTRGROUP macro defines a single 
counter . 



Schedule Table : The Schedule Table con- 
sists of 2 bytes for each user-defined 
count test schedule or readout schedule. 
The maximum number of schedules that can be 
defined is 15, so the maximum size of the 
Schedule Table is 30 bytes. These sche- 
dules determine the frequency (in minutes) 
with which the Counter Table entry will be 
tested. Scheduled readout and count test 
operations can refer to any of the 15 sche- 
dules that are defined. The maximum fre- 
quency that can be specified is 2047. 

Data Entry Unit Sequence Table (DEU-SEQ 
Table) : A transaction from a data entry 
unit may comprise a discrete number of 
steps. The DEU-SEQ Table keeps track of 
the last step entered from each data entry 
unit on the system. Each one- byte entry 
contains the step number (0-15) of the 
transaction initiated by each data entry 
unit. The maximum size of the DEU-SEQ 
Table is 1,024 bytes (one byte for each of 
the 1,024 data entry units available on the 
2790 system) . The DEU-SEQ Table is defined 
by the AS macro instruction. 

Data Entry Unit Index Table (DEU- INDEX 
Table) : When a data entry is received from 
a data entry unit, the 2715 receives the 
area station address and the data entry 
unit address. The area station address is 
used as an index to the desired entry in 
the DEU- INDEX Table. (There is one entry 
per area station.) The one-byte entry in 
the DEU- INDEX Table contains a pointer to 
the desired entry in the DEU-SEQ Table. 
However, since the DEU-SEQ Table can be up 
to 1,024 bytes long, two additional bits 
are necessary. Using bits 6 and 7 of the 
corresponding entry in the DEU Table 
extends the addressing capability of the 
DEU-INDEX Table entry to the full 1,024 
possible entries of the DEU-SEQ Table. Use 
of the data entry unit address allows inde- 
xing to the specific counter associated 
with the data entry unit sending the tran- 
saction. The DEU-INDEX Table is defined by 
the AS macro instruction. 
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System Parameter Table : The System Param- 
eter Table has a fixed core location and 
maintains an index of other 2798 GDU table 
locations. The System Parameter Table con- 
tains the following information: 

System error guidance: 

Invalid function error guidance 
Premature termination error guidance 
Monitor key error guidance 

Table pointers: 

GDU Sequence Table pointer 
Transaction Table pointer 
Parameter List Number Table pointer 
Identification Table pointer 
Translate Table pointer 
GDU AS Table pointer 

Identification characters: 

"Get" identification character 
"Store" identification character 

Counts: 

GDU list count 
Identifier count 

The System Parameter Table is generated by 
the CONFIGUR macro. The information in the 
table is determined from the CONFIGUR macro 
operands. There is only one System Param- 
eter Table per 2790 System with 2798 GDUs. 

Transaction Table : The Transaction Table 
is used to index the desired GDU list from 
a GDU operator entered transaction code. 
Each entry in the Transaction Table may 
contain a pointer to a GDU list associated 
with a transaction code. There are 100 
possible transaction codes so there are 100 
possible entries in the Transaction Table. 
Each entry in the table is 2 bytes long for 
a maximum table size of 200 bytes. The 
table is truncated at the highest assigned 
transaction code. But for each entry 
skipped between zero and the highest 
assigned value two bytes of core are 
reserved, just as if this value had been 
assigned. Each entry in the Transaction 
Table is generated by a GDUTRANS macro. 

GDU List Table : The GDU List Table con- 
tains up to 100 GDU lists. Each GDU list 
entry will contain a transaction header, a 
variable number of GDU steps (up to 16), an 
all zero byte, and implicit text (if speci- 
fied) . Each GDU list entry is generated by 
a combination of the TRLIST macro and from 
1 to 16 GDULIST macros. The TRLIST macro 
generates the transaction header. Each 
GDULIST macro generates a 5-byte GDU step 
with the following information: 

• A one-byte parameter list number. 

• Two bytes of normal guidance to be sent 
to the operator guidance panel on the 



GDU. This guidance is used to light a 
combination of 16 lights. 

• A two-byte display guidance pointer 
used to: 

a. Point to a display guidance message 
in the Display Guidance Table, or 

b. Point to an identifier in the Iden- 
tifier Table. 

Implicit text is defined in the last GDU- 
LIST macro in the GDU list entry. Each GDU 
list entry can contain a minimum of 10 
bytes and a maximum of 85 bytes plus impli- 
cit text. 

Parameter List Number Table : The Parameter 
List Number Table contains up to 127 
addresses of the parameter lists. Each 
entry in the table is two bytes for a maxi- 
mum table size of 254 bytes. This table is 
generated by PARAMNUM macros, each of which 
generates a two- byte entry. The table is 
truncated at the highest defined parameter 
list number defined by the PLN operand of 
the PARAMNUM macro. 

Parameter List Table : The Parameter List 
Table contains up to 127 entries. The data 
in each parameter list entry defines the 
types of checks that are performed on a 
data entry. The first two bytes of a 
parameter list contain a check field and a 
function field in which the checks and/or 
functions associated with this list are 
denoted. Following these two bytes are the 
check lists if any are required. These 
check lists provide the test information 
and error guidance for the checks performed 
on a data entry. The check lists are vari- 
able lengths, depending on the tests to be 
done. The parameter lists are packed 
decimal. Each parameter list is crenerated 
by a PARMLIST macro. 

Display Guidance Table : The Display Gui- 
dance Table contains the various messages 
used as display guidance for the GDUs on 
the loop. Each entry in the Display Gui- 
dance Table contains a length byte and from 
1 to 16 data bytes. Each entry in the 
table is generated by a DISPGUID macro. 

Guidance Display Unit Area Station Table 
(GDUAS Table) : The Guidance Display Unit 
Area Station Table, in conjunction with the 
GDU device address, contains pointers which 
provide entries into the GDU Sequence 
Table. Each entry is two bytes and is 
generated by the GDUAS macro. The maximum 
size of the GDUAS table is 200 bytes. This 
table is truncated at the highest assigned 
area station. Unassigned area stations 
below the highest assigned area station 
require two bytes of unused main storage. 
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Guidance Display Unit Sequence Table ; The 
Guidance Display Unit Sequence Table con- 
sists of one byte of zeros for each GDU on 
the 2790 system. Each byte is used for 
inquiry display and GDU sequence. This 
table is generated by the GDUTRANS macro. 

Identification Table : The Identification 
Table contains the areas to maintain the 
GDU identifiers. Fourteen bytes are 
generated for each identifier. The total 
number of identifiers is specified in the 
System Parameter Table. This table is 
generated by the STEND macro. 

Translate Table : The Translate Table is 
used in conjunction with the translate 
function and contains a maximum of eight 
entries. Each entry contains a translate 
character, the length of the text into 
which it is to be translated, and from 1 to 
14 bytes of text. One byte of zeros fol- 
lows the last entry in the table. The 
maximum table size is 129 bytes. Each 
entry in this table is generated by a TRAN- 
SLAT macro. 

Loading the Tables 

The assembly output of the user macros is a 
set of tables, in object form, needed for 
the 2715 internal operation. The user mus- 
twrite a BTAM routine to load these tables 
into the 2715. During transmission of the 
object text from the System/370 to the 
2715, the user must include two headers 
before each card's data: a message header 
and a transaction header (Figure 39). The 
user must provide DLE STX in front of the 
message (se€> format below). BTAM provides 
the ending characters. All cards must be 
transmitted, one at a time, to the 2715. 
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When loading the tables, the user must 
first be sure that the 2790 system is inac- 
tive. This is accomplished by using the 
defined control transactions to "stop 2790 
input" and to purge the disk of all 
deferred data ("Read deferred data"). When 
activity at the 2715 has ceased, the user 
must initially send a "table load start" 
control transaction. This is followed by 
the transmission of the table object cards 
as "table load data" control transactions 
(see the Message Format section) . 

Columns 73-80 of the object deck contain 
a program identification and a sequence 
number, which are checked by the 2715. The 
program identification (columns 73-76) is 
determined from a named TITLE card 



generated by the CONFIGUR macro instruc- 
tion. Both the identification and the 
sequence are checked by microcoded routines 
in the 2715. The completion of the data 
load is signaled by the END card (END in 
columns 2-4). After transmitting the END 
card, the user must send a "table load end" 
control transaction. If an error is found 
in either the program identification or the 
sequence field of any card, the table load 
is rejected. 

When transmitting the tables, the maxi- 
mum message length is 128 bytes. When the 
last message of the table load has been 
sent, the user should transmit an EOT. The 
2715 bids for the line and then transmits a 
message indicating the status of the table 
load (see the Message Format section) . The 
table load is rejected if any of the fol- 
lowing conditions occurs: 

1. Invalid program identification 
sequence field. 

2. Improper control field in transaction 
header. 

3. 2715 table size exceeds storage 
available. 

4. Data has not been purged from the 2715 
integral disk. 

5. The system is active. 



MACRO INSTRUCTIONS 

The macros coded for the 2790 System must 
be in the following order: 



CONFIGUR 

AS 

GDUAS (optional) 

TGROUP 

ASCTR (optional) 

CTRGROUP (optional) 

CTRSCHED (optional) 

GDUTRANS (optional) 

PARAMNUM (optional) 

PARMLIST (optional) 

DISPGUID (optional) 

TRANSLAT (optional) 

TRLIST 
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• AS LI ST 

• DEULIST (optional) 

• GDULIST (optional) 

• CTRLIST (optional) 

• STEND 

Configuration Macro (CONFIGUR) : The Confi- 
guration macro generates the table defini- 
tion block that contains pointers to the 
other user tables. 

Area Station Definition Macro (AS) : The 
Area Station Definition macro permits 
building an exhaustive list of all area 
stations present in the system. In addi- 
tion, each macro logically attaches area 
stations and data entry units to their 
associated transaction groups. 

Guidance Display Unit Area Station Macro 
(GDUAS) : The GDUAS macro is used to build 
an entry in the GDU Area Station Table. 

Transaction Group Macro (TGROUP) : By cod- 
ing the Transaction Group macro, the user 
establishes a pointer to a set of transac- 
tion lists that can be associated with the 
transaction keys of a group of area sta- 
tions, with the left-hand knob positions of 
a group of 2795 or 2797 Data Entry Units, 
or with the top left-hand knob positions of 
a group of 2796 Data Entry Units. 

With each of the nine transaction keys 
on an area station, the operator can select 
up to nine transaction lists. With each 
position of the left-hand knob on a 2795 or 
2797 or of the top left-hand knob on the 
2796 Data Entry Unit, the operator can also 
select up to nine transaction lists (posi- 
tion is reserved) . Normally, each tran- 
saction key or position of the left-hand 
knob is associated with only one transac- 
tion list. Since groups of area stations 
and groups of data entry units usually have 
the same operating procedure, a given set 
of area stations must have corresponding 
transaction keys associated with identical 
transaction lists. 

Area Station Counter Macro (ASCTR) : By 
coding the ASCTR macro, the user defines 
each area station that has pulse counters, 
and establishes a displacement to the coun- 
ter group in the Counter Table associated 
with each particular area station. In 
addition, the user defines routing informa- 
tion for counter overflow and count test 
response messages for all the counters on 
each area station. 

Counter Group Macro (CTRGROUP) : By coding 
the CTRGROUP macro, the user can define two 
bytes of control information for each coun- 



ter on an area station for which scheduled 
readout or count testing is to be done. 



Counter Schedule Macro (CTRSCHED) ; The 
CTRSCHED macro defines the count test sche- 
dules and the readout schedules that can be 
used by all the counters on the system. 



Guidance Display Unit Transaction Macro 
(GDUTRANS) : The GDUTRANS macro is used to 
build an entry in the Transaction Table. A 
GDUTRANS macro must be coded for every 
transaction code that will be used in coro- 
irunication with the 2798 GDUs. 

Parameter List Number Macro (PARAMNUM) ; 
The PARAMNUM macro is used to define an 
entry in the Parameter List Number Table 
for use with 2798 GDUs. 



Parameter List Macro (PARMLIST) 



The PARM- 



LIST macro is used to generate an entry in 
the Parameter List Table. The data in this 
entry defines the types of checks that are 
performed on a data entry from a 2798 GDU. 

Display Guidance Macro (DISPGUID) : The 
DISPGUID macro is used to define a display 
guidance message in the Display Guidance 
Table. 

Translate Table Macro (TRANSLAT) : The 
TRANSLAT macro is used to build an entry in 
the Translate Table. 

Transaction List Macro (TRLIST) ; The Tran- 
saction List macro is used with the Area 
Station List macro or the Data Entry Unit 
List macro to define a transaction, or it 
is used to define a user-specified message. 
The TRLIST macro enables the user to con- 
trol the destination of the completed tran- 
saction or a predefined message. Each 
transaction list has a DEU or AS transac- 
tion code associated with it. 

Area Station List Macro (ASLIST) : When the 
transaction is to be initiated by an area 
station, the Transaction List macro is fol- 
lowed by one or more Area Station List 
macros . The ASLIST macro is used to define 
one step of a transaction for a 2791 Area 
Station; the transaction code is the value 
of the transaction key pressed by the 
operator. 

Data Entry Unit List Macro (DEULIST) : When 
the transaction is to be initiated by a 
data entry unit, the Transaction List macro 
is followed by one or more Data Entry Unit 
List macros . The DEULIST macro is used to 
define one step of a transaction for a data 
entry unit; the transaction code is the 
value of the left-hand rotary knob of a 
279 5 or 2797 and of the top left-hand 
rotary knob of a 2796. 
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Guidance Display Unit List Macro (GDULIST) ; 
The GDULIST macro is used to define one 
step of a GDU transaction list for a 2791 
or 2793 Area Station with 2798 GDUs 
attached. 



are 16 and 32. If an invalid value is 
specified, an MNOTE is issued and no 
code is generated. If the CORE param- 
eter is omitted, 16 is assumed. 



Counter List Macro (CTRLIST) : When the 
transaction is to be initiated by a data 
entry unit, the TRLIST macro is followed by 
one or more DEULIST macros, and, optional- 
ly, by a CTRLIST macro instruction. The 
CTRLIST macro defines the last step of a 
transaction for a data entry unit that is 
attached to a 2793 Area Station using pulse 
counters . 

Statement End Macro (STEND) ; The Statement 
End macro indicates the end of all user 
macros . 

Macro Descriptions 

The macros are arranged in the following 
section in the same order as they must 
appear in the assembly. 

The macros? must be assembled together. 
The first assembly statement must be the 
CONFIGUR macro (there must not be a TITLE, 
CSECT, or START card). The last assembly 
statement must be the END card. There must 
not be any other macros or code inserted 
into the assembly of the user tables. 

CONFIGUR (Configuration) Macro Instruction 

The CONFIGUR macro is used to generate the 
table definition block, which contains 
pointers to the 2715 tables. The format of 
the CONFIGUR macro is: 



r t t 

| Name | Operation | Operand 
j. + +— . 



[symbol) j CONFIGUR 



/16\ /NO \ 

[CORE=l32J] [,PC=\YESjl 

.NO \ 
[,GDU=(YES)) 

I ,FUNCERR= (absexp, 

...)] 
[ , ENDERR= (absexp, . . . ) 3 
[,MONERR=( absexp, ...)] 
[ , GETID=absexp] 
[, STORID=absexpl 
[ , IDCOUNT=absexp] 

JNO \ 
(,INQDISP=\YESJ ) 



symbol 

the name of the macro is optional. 



PC 



GDU 



If C0RE=16 is coded, then the size of 
all tables built must not exceed 1,280 
bytes. If CORE=32 is coded, then the 
size of all tables built must not 
exceed 4,096 bytes. The size of all 
tables built is calculated by using 
Figure 36. The size will be the total 
of all macros used. 



the PC operand indicates whether pulse 
count macros are coded in this assemb- 
ly. If PC=YES is specified, pointers 
to the Area Station Counter Table, the 
Counter Table, and the Schedule Table 
are included in the Table Definition 
Block. Coding PC=YES adds six bytes 
to the Table Definition Block. If 
PC=NO is coded, the pointers to the 
Area Station Counter Table, the Count- 
er Table, and the Schedule Table are 
omitted, but two bytes of zeros are 
added. If the PC operand is omitted, 
PC=NO is assumed. 

The PC operand is valid only if CORE= 
32 is specified. If PC=YES is coded 
and CORE=16 (or the CORE operand is 
omitted) , an MNOTE is issued and no 
code is generated. 



CORE 



the CORE parameter specifies the 2715 
storage size. The only valid values 



indicates whether 2798 Guidance Dis- 
play Units are used on the 2715. If 
this operand is omitted, GDU=NO is 
assumed. If GDU=YES is coded, CORE=32 
roust also be specified. 

FUNCERR 

this operand indicates the error gui- 
dance that will be returned to the 
2798 GDU when the following invalid 
functions are recognized: 

• An invalid length is specified on a 
Get Identifier function. Normally, 
the GDU operator keys the *Get ID* 
character, the two digit identifier 
address, and the ENTER key upon ent- 
ering a GDU step having a get condi- 
tion in its function field. An in- 
valid length occurs when more than 
two characters are entered for the 
identifier address following the 
•Get ID* character. 

• An invalid length on a Translate 
function. This error occurs when a 
GDU step is entered that has a 
translate function associated with 
it and more than one keyed character 
is entered. 
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| Macro 

L _ J 


Min. 

Bytes 

Used 


Additional Considerations 


| CONFIGUR 


22 


Add 4 if PC=YES. 
Add 22 if GDU=YES. 
Add 14 times the number 
coded if IDCOUNT=n. 


|AS 


4 


Add 4 for each skipped ID 

in sequence. 

Add 1 for each DEU 

attached. 


| GDUAS 


1 


Add 1 for each skipped ID 
in sequence. 


|TGROUP 


18 




| ASCTR 


2 


Add 2 for each skipped ID 

in sequence. 

Add 2 after last ASCTR 

macro. 


| CTRGROUP 


2 


Add 2 for each skipped 
counter in sequence. 


|CTRSCHED 


2 


For each schedule. 


| GDUTRANS 


2 


Add 2 for each skipped 
TRCODE operand. 


| PARMLIST 


2 


Add 3 for CKLNGTH=. 

Add 3 for CKMODll=. 

Add 3 for CKMOD10=. 

Add 8 for CKOR=. 

Add 3 for CKNONUM=. 

Add 3 for CKNUM=. 

Add 5 for CKRANGE= plus 1 

for each position in 

CKRANGE field. 

Add 3 for CKAND= plus 1 

for each position in CKAND 

field. 


IDISPGUID 


1 


Add 1 for each text 
character. 


| TRANSLAT 


16 




|TRLIST 


5 




IASLIST 


5 


Add 1 for each implicit 
text character. 


IDEULIST 


5 


Add 1 for each implicit 
text character. 


|GDULIST 


5 


Add 1 for each implicit 
text character. 


| CTRLIST 


5 


Add 1 for each implicit 
text character. 


| STEND 





Add 1 for each area sta- 
tion in system if INQDISP= 
YES in CONFIGUR macro. 



• An invalid address on a Get Identi- 
fier or Store Identifier function. 
This error occurs when the two digit 
identifier address is not in the 
Identifier Table, or the two digit 
identifier address has not been 
specified. 

• A non-translatable character is 
specified on a Translate function. 
This error occurs when the character 
to be translated is not found in the 
Translate Table. 

• A non-numeric character is reco- 
gnized during a range check. 

The value of each suboperand in this 
operand may range from 1 to 16 and up 
to 16 suboperands may be coded. This 
operand indicates exactly which lights 
on the Guidance Display Panel the user 
wants to turn on when the error 
occurs. (See Figure 37.) 

ENDERR 

this operand indicates the error gui- 
dance that will be returned to the 
2798 GDU when a premature termination 
occurs. A premature termination 
occurs when the number of characters 
received in a data entry from a 2798 
is not sufficient to complete all of 
the checks specified by this GDULIST 
macro (with exception of the CKLENGTH 
macro) . The value of each suboperand 
in this operand may range from 1 to 16 
and up to 16 suboperands may be coded. 
This operand indicates exactly which 
lights on the Guidance Display Panel 
the user wants to turn on when the 
error occurs. (See Figure 37.) 

MONERR 

this operand indicates the error guid- 
ance that will be returned to the 2798 
GDU when a Monitor key check error 
occurs. The value of each suboperand 
in this operand may range from 1 to 16 
and up to 16 suboperands may be coded. 
This operand indicates exactly which 
lights on the Guidance Display Panel 
the user wants to turn on when the 
error occurs. (See Figure 37.) 






Figure 36. 2715 Macro Storage Site 
Estimates 
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Hexa- 




Hexa- | 


| Keyboard 1 


decimal 1 


Keyboard ] 
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L__ —J 
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r I 


r 1 
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CI 


2 i 


F2 | 


1 B 


C2 


3 


F3 | 


1 c 


C3 


4 


F4 | 


i D ! 


cu 


5 


F5 | 


1 E 


C5 j 


6 
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1 F 


C6 


7 


F7 | 
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8 I 


F8 j 
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C8 


9 


F9 | 
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C9 


TAB | 


05 | 


1 J 


Dl 


NEWLINE 


15 | 


1 K 


D2 


LINEFEED 


25 | 
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D3 


SPACE 


40 | 
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DU 


. 


UB | 
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D5 


+ 


UE j 


1 o 


D6 


6 
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1 P 


D7 


i 


5A | 
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D8 


$ 


5B | 
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D9 


* 
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£2 


i 


5E | 
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E3 


- 


60 | 
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EU 


/ 


61 | 
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E5 


I 
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E6 


1 ? 
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1 X 


E7 
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1 ¥ 


E8 
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E9 
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FO 
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Figure 38. 2798 GDU Keyboard Character 
Conversion 



use the Store Identifier function 
prior to using the Get Identifier 
function after an ICPL if he expects 
useful information to be in the iden- 
tifier table. 

INQDISP 

this operand indicates whether Inquiry 
Display will be used on the 2715. If 
this operand is omitted, INQDISP=NO is 
assumed. If INQDISP=YES is coded, 
CORE=32 must also be coded. 

AS (Area Station) Macro Instruction 

The AS macro is used to build an entry in 
the Area Station Table and the Data Entry 
Unit Table, and a corresponding entry in 
the Data Entry Unit Index Table. In each 
table, the position of the entry to be 
built relative to the beginning of the 
table is determined from the ID parameter. 
Each AS macro requires (4 + absexp) bytes 
of 2715 storage (absexp is the value of the 
DEGROUP operand). The format of the AS 
macro is : 

r t t " — i 

| Name |Operat ion | Operand | 

|. x + 1 

| [symbol] | AS | ID=absexp | 

j j | t,ASGROUP=symbol] j 
j | | t,DEGROUP=( symbol, j 
| | | absexp)] | 

i_ x x 1 



GETID 

this operand specifies the GET Identi- 
fication character that is used for 
the GET Identifier function. The 
value of this operand is the hexadeci- 
mal equivalent of any of the charac- 
ters: A-Z, 0-9, and any of the spe- 
cial characters: $6-/, # a " 
:?!;*+ TAB NEWLINE LINEFREED 
SPACE. (See Figure 38.) 

STORID 

this operand specifies the Store Iden- 
tification character that is used for 
the Store Identifier function. The 
value of this operand is the hexadeci- 
mal equivalent of any of the charac- 
ters: A-Z, 0-9, and any of the spe- 
cial chaa racters: .$€-/, # a " 
=:?!;*+ TAB NEWLINE SPACE LINE- 
FEED. (See Figure 38.) 

IDCOUNT 

this operand specifies the number of 
identifiers that will be used. The 
value of this operand may be from to 
100. This operand must be coded if 
GDU=YES. Every time the 2715 is 
ICPLed, the predefined text •NOT USED* 
will be defined in every identifier in 
the identifier table. The user should 



symbol 

the name field is optional. 



ID 



each area station is assigned a spe- 
cific address (X*80 f - X'ES*) at sys- 
tem installation time, and the value 
of "absexp" is the decimal representa- 
tion of that address (see Figure 39). 
ID is used to determine the position 
of an entry in the AS Table, DEU 
Table, and DEU-INDEX table. The value 
of the ID parameter must be from to 
99 when CORE=32 in the CONFIGUR macro; 
however, all values in this range need 
not be specified. The value of the ID 
parameter must be from to 63 when 
CORE=16 or when the CORE operand is 
omitted in the CONFIGUR macro; howev- 
er, all values in this range need not 
be specified. If one is omitted, a 
warning message is generated. The 
values 100 through 128, which would 
generate hexadecimal values E4 through 
FF, are not valid. The AS macros must 
be in ascending sequence by ID. An AS 
macro found to be out of sequence or 
in error terminates the assembly of 
this macro instruction. The ID of a 
macro in error is subsequently handled 
the same as an omitted ID. 
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lvalue of ID 




lvalue of ID 




Value of ID 




(Parameter in 


Valid 


| Parameter in 


Valid 


Parameter in| 


|AS or GDUAS 


Addresses of 


|AS or GDUAS 


Addresses of 


AS or GDUAS 


| Valid Addresses 


| Macro 


Area Stations 


| Macro 


Area Stations 


Macro 


| of Area Stations 


| (Decimal) 


(Hexadecimal) 


| (Decimal) 


(Hexadecimal) 


(Decimal) 


| (Hexadecimal) 


1 o 


h 

80 


-+ i 

| 33 


1. ^ 

Al 


66 


4 

| C2 


1 1 


81 


| 34 


A2 


67 


1 c 3 


1 2 


82 


1 35 


A3 


68 


| C4 


1 3 


83 


1 36 


A4 


69 


| C5 


1 « 


84 


1 37 


A5 


70 


| C6 


1 5 


85 


| 38 


A6 


71 


1 C7 


1 8 


86 


| 39 


A7 


72 


| C8 


1 7 


87 


| 40 


A8 


73 


| C9 


1 8 


88 


| 41 


A9 


74 


| CA 


1 9 


89 


| 42 


AA 


75 


| CB 


| 10 


8A 


1 43 


AB 


76 


| CC 


1 11 


8B 


| 44 


AC 


77 


| CD 


1 12 


8C 


| 45 


AD 


78 


| CE 


1 13 


8D 


| 46 


AE 


79 


| CF 


1 I 1 * 


8E 


1 47 


AF 


80 


| DO 


1 15 


8F 


| 48 


B0 


81 


1 Dl 


1 16 


90 


| 49 


Bl 


82 


| D2 


1 17 


91 


1 50 


B2 


83 


1 D3 


1 18 


92 


1 51 


B3 


84 


| D4 


1 19 


93 


1 52 


B4 


I 85 


1 D5 


| 20 


91 


1 53 


B5 


86 


| D6 


1 21 


95 


1 54 


B6 


| 87 


1 D7 


| 22 


96 


1 55 


B7 


88 


| D8 


| 23 


97 


1 56 


B8 


| 89 


| D9 


| 24 


98 


1 57 


B9 


90 


| DA 


1 25 


99 


1 58 


BA 


1 91 


| DB 


1 26 


9A 


1 59 


BB 


92 


| DC 


| 27 


9B 


| 60 


BC 


| 93 


| DD 


| 28 


9C 


1 61 


BD 


94 


| DE 


| 29 


9D 


| 62 


BE 


1 95 


| DF 


| 30 


9E 


| 63 


BF 


96 


| E0 


1 31 


9F 


| 64 


CO 


| 97 


1 El 


| 32 


A0 


1 65 


CI 


98 

| 99 


| E2 
| E3 



A JL 

Macro Id Parameter Decimal and 



Figure 39. AS or GDUAS 



Hexadecimal Equivalents 



ASGROUP 

the ASGROUP parameter is valid for the 
2791 only. The value of "symbol" is 
the name of the transaction group for 
this area station and must appear in 
the name field of a TGROUP macro. If 
the name does not appear, an assembly 
error occurs. The ASGROUP parameter 
builds an entry in the AS table. 

DEGROUP 
symbol 

the name of the transaction group with 
which the data entry units on this 
area station are associated is speci- 
fied by "symbol" . It must appear in 
the name field of a TGROUP macro; if 
not, an assembly error occurs. "sym- 
bol" builds an entry in the DEU Table, 
"symbol" must be identical to the name 
of the first (or only) TGROUP macro 
that defines a transaction group for 



data entry units. That is, "symbol" 
must be the same as the name of the 
transaction group for the 2795s con- 
nected to this area station, or of the 
dummy transaction group that precedes 
the transaction group for the 2796s 
connected to this area station (see 
Figure 40 for examples). 

absexp 

the value of the absolute expression 
is the number of data entry units 
attached to this area station. This 
number must not exceed 32, since this 
is the maximum number of data entry 
units that can be attached to any one 
area station. The value is used to 
build an entry in the DEU-INDEX table. 

The DEGROUP operand may be omitted if no 
data entry units are attached to this area 
station. The entries in the DEU table and 
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r t t 

| Name | Operation | Operands 



H 



* DEFINING TRANSACTION GROUPS FOR BOTH 2795 AND 2796 DATA ENTRY UNITS 

I i 

| AS |ID=59,DEGROUP=(GROUPl,5) (TOTAL OF 5 DEU'S) 
GROUP1 |TGROUP j TC1=ATTENDNC, TC2=SETUP,TC3=PRODN, . . . (2795'S) 
GROUP2 ITGROUP | TC1=MESSAGE,TC2=RECEIPT,TC3=ISSUE, . . . (2796'S) 

I I 

* DEFINING TRANSACTION GROUP TABLE FOR 2796 AND DUMMY TRANSACTION GROUP TABLE FOR 2795 



| AS 
GROUP1 | TGROUP 
GROUP3 ITGROUP 



|ID=59,DEGROUP=(GROUPl,2) (TOTAL OF 2 2796* S) 
|TC1=MESSAGE (DUMMY TABLE FOR 2795'S) 
|TC1=MESSAGE,TC2=RECEIPT,TC3= ISSUE, ... (2796'S) 
I 



DEFINING TRANSACTION GROUP TABLE FOR 2795 ONLY 



GROUP1 

* 



| AS |ID=59,DEGROUP=(GROUPl,3) (TOTAL OF 3 2795'S) 
| TGROUP |TC=1ATTENDNC,TC2=SETUP,TC3=PR0DN,... (2795'S) 



DEFINING TRANSACTION GROUP FOR 2797 AND DUKMY TRANSACTION GROUP FOR 2795 AND 2796 

I I 

| AS | ID=59,DEGROUP=(GROUPl,3) (TOTAL OF 3 2797 *S) 
GROUP1 JTGROUP |TC1=MESSAGE (DUMMY TABLE FOR 2795'S) 
GROUP2 j TGROUP j TC1=MESSAGE (DUMMY TABLE FOR 2796'S) 
GROUP3 JTGROUP | TCl=MESSAGE f TC2=RECEIPT, TC3=ISSUE, . . . (2797'S) 
L X X 

Figure 40. Examples of Defining Transaction Group Tables for Data Entry Units 



the DEU-INDEX table corresponding to this 
area station are then defined with a value 
indicating there are no DEUs. The DEGROUP 
parameter must be coded for the 2793. 

GDUAS (Guidance Display Unit Area Station) 
Macro Instruction 

The GDU Area Station macro instruction is 
used to build an entry in the GDU Area Sta- 
tion Table. The position of the entry to 
be built relative to the beginning of the 
table is determined from the ID operand. 
Each GDUAS macro requires 2 bytes of 2715 
storage. The format of the GDUAS macro is: 

r t t i 

| Name | Operat ion | Operand | 

l x x 4 

I t symbol ] | GDUAS j ID=absexp , | 

j j I GDUNUMB=absexp j 
l x x J 

symbol 

the name field of this macro is 
optional . 



ID 



each area station with attached 2798 
GDUs is assigned a specific address 
(X*80' - X'E3') at system installation 
time, and the value of 'absexp' is the 
decimal representation of that address 
(see Figure 38) . ID is used to deter- 
mine the position of an entry in the 
GDUAS Table. The value of the ID 
operand must be from to 99. The 
GDUAS macros must be in ascending 



sequence by ID. A GDUAS macro found 
to be out of sequence or in error ter- 
minates the assembly of this macro 
instruction. 

GDUNUMB 

this operand specifies the number of 
GDUs on this area station. The value 
of this operand can be from 1 to 16 
for a 2793 and from 1 to 12 for a 2791 
Model 3. 

Note : The GDUAS macro should only be coded 
for an Area Station with 2798 GDUs 
attached. The GDUAS macro must be coded 
once for every area station with 2798 GDUs 
attached. 

TGROUP (Transaction Group) Macro 
Instruction 

The TGROUP (Transaction Group) macro 
defines entries in a TGROUP Table. Each 
keyword operand associates a transaction 
list with a transaction code. The maximum 
number of TGROUP macros allowed is 63. The 
TGROUP macro instructions must follow the 
last AS macro instruction coded. A macro 
sequence error occurs if they do not. Each 
TGROUP macro requires 18 bytes of 2715 
storage. 

The three types of data entry units 
(2795, 2796, and 2797) require separate 
transaction groups, one for all 2795s con- 
nected to an area station, followed by one 
for all 2796s connected to the same area 
station, and immediately followed by one 
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for all 2797s connected to the same area 
station. 

If all three types of DEUs are connected 
to the same area station, the user must 
code three TGROUP macro instructions. The 
first defines the transaction group for the 
2795s, the second defines the transaction 
group for the 2796s, and the third defines 
the transaction group for the 2797s. If 
only 2797s are connected to the area sta- 
tion, three TGROUP macros must still be 
coded. The first two define dummy transac- 
tion groups and the third defines the 
transaction group for the 2797s. If only 
2796s are connected to the area station, 
two TGROUP macros must be coded. The first 
will be a dummy and the second will define 
the transaction group for the 2796s. If 
only 2795s are connected to the area sta- 
tion, one TGROUP macro must be coded. The 
dummy groups are required because the 2715 
microcoded routines expect to find the 
groups for the three types of DEUs in the 
same relative main storage position from 
the beginning of the user tables. 

Where two or more TGROUP macros are 
coded for the same area station, the name 
of the first macro must appear in the 
DEGROUP operand of the AS macro for that 
area station. The first operand of any 
dummy TGROUP macro must be identical to the 
first operand of the following non-dummy 
TGROUP macro for the same area station. 
Only one operand need be coded for dummy 
TGROUP macros. 

Figure *»0 shows examples of how TGROUP 
macros may be coded. The format of the 
TGROUP macro is: 



r t r 1 

| Name | Operat ion | Operand | 

t. x + 4 

(symbol |TGROUP j [TCn= (symboln[ ,E] ) ] j 
i x x j 



symbol 

the name field is required for this 
macro instruction. 



TCn 



if TCn=symboln is coded, the transac- 
tion code "n" is associated with the 
transaction list referred to by "sym- 
boln". At least one TCn operand must 
be present. An MNOTE is issued if all 
operands are omitted. The value of 
"n" must be between 1 and 9 inclusive. 
If TCn=(symboln,E) is coded, it indi- 
cates that this is a transaction 
expansion entry and that the transac- 
tion is associated with the transac- 
tion group referred to by "symboln". 
The transaction group referred to by 
"symboln" must have transaction code 1 
defined. When using the transaction 



expansion function, the format of the 
TGROUP referred to varies for area 
stations and data entry units. The 
first character of data received indi- 
cates the desired entry in the TGROUP 
Table. 

Each entry in the transaction group 
referred to points to a transaction 
list. If the transaction expansion is 
for an area station, the first step of 
each of these transaction lists must 
be identical. Transaction expansion 
must be used when generating the tran- 
saction list in which message routing 
is to be specified. A transaction 
expansion entry must not refer to 
another transaction expansion entry. 

ASCTR (Area Station Counter) Macro 
Instruction 

The ASCTR macro is used to generate the 
Area Station Counter Table. The Area Sta- 
tion Counter Table requires two bytes of 
control information for each of up to 100 
area stations, plus two additional bytes, 
for a maximum of 202 bytes. This table is 
truncated at the highest assigned area sta- 
tion, that is, the area station with the 
highest ID. Unassigned area stations below 
the highest assigned area station will each 
have two bytes defined in the Area Station 
Counter Table by BTAM at assembly time. 
The highest assigned area station with 
counters can be any assigned area station 
less than or equal to the highest assigned 
area station that is defined by the AS 
iracro operand ID=n. 

Associated with each area station with 
counters is a displacement that provides 
for scanning of the counter table. This 
displacement is used with the counter 
address to provide an index to individual 
counter level control. Schedule readout 
and count testing are performed at the 
individual counter level. 

This macro also allows routing specifi- 
cation to be specified for counter overflow 
and count test response messages. All 
counters attached to an area station must 
have these messages routed to the same 
destination. 

The format of the ASCTR macro instruc- 
tion is: 



r t t 

Name | Operation | Operand 




ID=absexp, 

HIGHCTR=absexp, 

ROUTE=( CPU 
DISK 
[,LOG] 
[,ASLOG] 
(,EXTALRMl) 
[ , NEXTAS=absexp] 



■1 
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The macro is coded once for each area sta- 
tion with pulse counters. The maximum num- 
ber of ASCTR macros that can be coded is 
100. 

symbol 

the name field is optional. 



ID 



specifies the decimal representation 
of the address of the area station on 
which pulse counters are available. 
The ID operand is not required for all 
area stations, but the ID operands 
must be in ascending sequence. An ID 
operand out of sequence causes an in- 
valid table assembly. The ID operand 
may have values from to 99. 



HIGHCTR 

specifies the number of the highest 
counter on this area station that 
scheduled readout or count testing may 
be performed on. Values for the 
HIGHCTR operand may range from to 
63, since only 63 counters are allowed 
on any given area station. A value of 
indicates that no area station coun- 
ters use scheduled readout or count 
testing. 



ROUTE 



CPU 



DISK 



LOG 



specifies the destination of counter 
overflow and count test response mes- 
sages. At least one destination must 
be specified, and if only one is spec- 
ified, the parenthesis are not coded. 
The CPU and DISK suboperands are mutu- 
ally exclusive. 



specifies that counter overflow and 
count test response messages should be 
routed directly to the CPU. 



specifies that counter overflow and 
count test response messages should be 
routed to the 2715 integral disk. 



specifies that counter overflow and 
count test response messages should be 
routed to the 2740 attached to the 
2715. 



AS LOG 



specifies that counter overflow and 
count test response messages should be 
routed to the area station 1053 print- 
er from which the overflow was 
initiated. 



EXTALRM 

specifies that counter overflow and 
count test response messages should be 
routed to the 1053 printer on the area 
station from which the overflow was 
initiated, and that the external alarm 
contact closure at the area station 
should be activated. 



The above suboperands specifying routing 
information for counter overflow and count 
test response messages need not be coded in 
any given order. 

NEXTAS 

specifies the decimal representation 
of the address of the next higher area 
station with pulse counters on which 
count testing or readout functions may 
be scheduled. The NEXTAS operand may 
have values from to 99. This 
operand must be coded when HIGHCTR=0 
is coded, but is not necessary for any 
other HIGHCTR value. NEXTAS=0 must be 
coded if there is no higher area sta- 
tion that has pulse counters on which 
count testing or readout functions may 
be scheduled. Unless NEXTAS=0 is 
coded, the NEXTAS operand must be 
greater than the ID operand for this 
ASCTR macro. If the NEXTAS operand is 
greater than 0, the ASCTR macro 
referred to by the value of the NEXTAS 
operand must have a HIGHCTR operand 
value greater than 0. 



CTRGROUP (Counter Group) Macro Instruction 

The CTRGROUP macro is used to generate the 
Counter Table. The macro must be coded 
once for each counter in the system on 
which schedule readout or count test func- 
tions are to be performed. A CTRGROUP 
iracro must be coded for the counter whose 
value was specified in the HIGHCTR operand 
of the ASCTR macro instruction for this 
area station. The counter Table is 
organized on a group basis. Each group 
consists of the highest counter with sche- 
duled readout or testing and all counters 
(whether scheduled or unscheduled) below it 
en the same area station. Each group is 
truncated at the highest counter scheduled 
for readout or testing, with a maximum of 
63 counters allowed per area station. The 
Counter Table consists of two bytes of con- 
trol information for each of these counters 
(scheduled and unscheduled) plus two addi- 
tional bytes at the end of the table. Up 
to 50 4 counters may be scheduled for the 
entire system. Each CTRGROUP macro defines 
two bytes of control information for a par- 
ticular counter. 

The format of the CTRGROUP macro in- 
struction is: 
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I Name 



"T T 

| Operation J Operand 



[ symbol ] | CTRGROUP 



| ctrno, 
[ s ro ] , 
[cttest] , 
ID=absexp 
[,SROENAB=(NO \] 
\YESj 



(,CTINIT= 



NULL ) 
NCT J ] 
UNASP J 



symbol 

the name field is optional. 



ctrno 



identifies the counter on which sche- 
dule readout or count testing is to be 
done. The value of the ctrno operand 
must be from 1 to 63; however, all 
values in this range need not be spec- 
ified. All counters must be specified 
in ascending sequence. 



sro 



indicates which readout schedule is to 
be used for this particular counter. 
The value of the sro operand must be 
from to 15. A value indicates 
that schedule readout is not to be 
performed for this counter. If the 
sro operand is omitted, no schedule 
readout will be performed. This 
operand must not specify a test sche- 
dule greater than the highest test 
schedule defined by the CTRSCHED macro 
instruction. 

cttest 

indicates which count test schedule is 
to be used for this particular count- 
er. The value of the cttest operand 
must be from to 15. A value indi- 
cates that count testing is not to be 
done. If the cttest operand is 
omitted, count testing is not per- 
formed. This operand must not specify 
a test schedule greater than the high- 
est test schedule defined by the 
CTRSCHED macro instruction. 

ID 

specifies the decimal representation 
of the address of the area station on 
which this particular counter is 
defined. This operand is required. 

SROENAB 

specifies whether or not schedule 
readout is to be automatically started 
by the 2715 at ICPL time. If SROENAB= 
YES is coded, this indicates that 
schedule readout is to be automati- 
cally started by the 2715. Coding 
SROENAB=NO indicates that schedule 
readout is not to be automatically 



started by the 2715; the user can 
initiate schedule readout with a con- 
.trol request at a later time. 
SROENAB=YES must not be coded if the 
sro operand is or is omitted. If 
the SROENAB operand is omitted, 
SROENAB=NO is assumed. 

CTINIT 

specifies an initial count test condi- 
tion that is to be started by the 2715 
after an ICPL for this counter. Cod- 
ing CTINIT=UNASP indicates that unas- 
signed production testing is to be 
started by the 2715. Coding CTINIT= 
NCT indicates that no-count testing is 
to be started by the 2715. Coding 
CTINIT=NULL indicates that neither 
unassigned nor no-count testing is to 
be started by the 2715 for this count- 
er. CTINIT=UNASP or CTINIT=NCT must 
not be coded if the cttest operand is 
or is omitted. If the CTINIT 
operand is omitted, CTINIT=RESET is 
assumed. Count testing can be 
initiated later by a control request 
if it is not automatically started at 
ICPL time. 

CTRSCHED (Counter Schedule) Macro 
Instruction Instruction 

The CTRSCHED macro defines the count test 
schedules and the readout schedules to be 
used by all the pulse counters in the 2790 
System. The count test and readout sche- 
dules may be any of 15 possible schedules 
in the Schedule Table. The format of the 
CTRSCHED macro instruction is: 



r t t T 

I Name j Operation | Operand | 

| [symbol] | CTRSCHED | sched, ... | 

i x ± J 

symbol 

the name field is optional. 

sched 

specifies a count test schedule or 
readout schedule in minutes. This 
operand must be coded once for each 
schedule interval to be defined, but 
the maximum number of schedules that 
can be coded is 15. The value of this 
operand must be between 1 and 2 047. 

GDUTRANS (Guidance Display Unit 
Transaction) Macro Instruction 

The GDU Transaction macro is used to build 
an entry in the Transaction Table. The 
position of the entry to be built relative 
to the beginning of the table is determined 
from the TRCODE operand. A GDUTARNS macro 
must be coded for every transaction code 
that will be used in communication with the 
2798 GDUs. Each GDUTRANS macro requires 
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two bytes of 2715 storage. The format of 
the GDUTRANS imacro is: 

i t r 1 

| Name | Operation! Operand | 

j. x x ) 

| [symbol] I GDUTRANS | TRCODE=absexp, j 

| | | TRLIST=symboln | 

L X x j 

symbol 

the name field of this macro is 
optional. 

TRCODE 

this operand is the value of a tran- 
saction code. Each transaction code 
is associated with a particular GDU 
List. The TRCODE operand is used to 
determine the position of an entry in 
the Transaction Table. The value of 
the TRCODE operand must be from 00 to 
99. However, all values in this range 
need not be specified. The GDUTRANS 
macros must be in ascending sequence 
by TRCODE operands. A GDUTRANS macro 
found to be out of sequence or in 
error terminates the assembly of this 
macro instruction. 

TRLIST 

this operand associates a GDU transac- 
tion list with the transaction code 
indicated in the TRCODE operand. The 
transaction list (TRLIST) referred to 
by •symboln* is associated with the 
TRCODE operand. 

PARAMNUM (Parameter List Number) Macro 
Instruction 

The PARAMNUM macro is used to define an 
entry in the Parameter List Number Table 
for use with 2798 GDUs. The Parameter List 
Number macro is coded once for every param- 
eter list defined by the user with the PAR- 
MLIST macro. Up to 127 PARAMNUM macros can 
be coded. This macro requires two bytes of 
2715 storage. The format of the PARAMNUM 
macro is: 



r t t T 

| Name | Operation | Operand | 

j x + < 

j (symboll | PARAMNUM |PLN=absexp, | 

| j j PARMLST=symboln | 

L J X J 

symbol 

the name field of this macro is 
optional. 



PLN 



this operand specifies the parameter 
list number that is to be associated 
with the parameter list referred to by 
the PARMLST operand. The value of 
this operand must be between 1 and 



127. The PARAMNUM macros must be in 
ascending sequence by PLN. A PARAMNUM 
macro found out of sequence or in 
error terminates the assembly of this 
macro instruction. The value of the 
PLN operand must be 1 greater than the 
PLN operand of the previous PARAMNUM 
macro. 

PARMLST 

this operand specifies the name of a 
parameter list defined by a PARMLIST 
macro. 



PARMLIST (Parameter List) Macro Instruction 

The PARMLIST macro is used to generate an 
entry in the Parameter List Table. The 
data in the parameter list defines the 
types of checks that are to be performed on 
a data entry from a 2798 GDU. The entries 
in the Parameter List Table to be used by 
the 2715 are selected by a pointer from the 
Parameter List Number Table. Every PARM- 
LIST macro must be referred to by a PARMLST 
operand in the PARAMNUM macro. The size of 
the Parameter List entry is varaible 
depending on the type of tests requested. 
The format of the PARMLIST macro is: 



I T T 

I Name | Operation | Operand 



h 



symbol 



PARMLIST 



(CKLNGTH=(length-absexp, 

errguidance-absexp, . . . ) ] 
NO 
(,CKMONKY= YES ] 
(,CKMODll=(length-absexp, 

position-absexp, 
errguidance-absexp, . . . ) ] 
[ ,CKRANGE= Cpositionl-absexp, 
position2-absexp , 
hilowchars-absexp, . . . ) ] 
C,LOWGUID=(absexp, . ..)] 
[,HIGUID=(absexp,. . .) ] 

ERROR 
[,RNGETST= DATA ] 
(,CKMOD10=(length-absexp, 

position-absexp, 
errguidance-absexp, . . . ) ] 
[ , CKOR= (position-absexp, 

checkcharl-hexchar, . . . 
checkcharn-hexchar) ] 
(,ORGUID=(absexp,. . .) ] 
[,CKAND=(positionl-absexp, 

position2-absexp, 
checkcharl-hexchar, . . . 
checkcharn-hexchar) ] 
[,ANDGUID=(absexp, . ..) ] 
[ ,CKNONUM= (positionl-absexp, 
position2-absexp, 
errguidance-absexp, . . . ) ] 
{ ,CKNUM=( positionl-absexp, 

position2-absexp, 
errguidance-absexp, . . . ) ) 
NO 
(, TRANS L= YES ] 

NO 
(,IDENT= YES ] 
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symbol 

the name field must be specified and 
must be the same name as defined by 
the PARMLST operand in the PARAMNUM 
macro. 

CKLNGTH 

this operand causes the 2715 to check 
the data entry to determine if it is 
the length specified. 

length 

this suboperand specifies the length 
of the data entry and its value may be 
from 1 to 17. 

Note : The first byte in the data 
entry is the Operational Status byte 
that is generated by the 2715. There- 
fore, the value specified by the 
length suboperand will always be one 
more than the number of characters 
entered by the GDU operator. For 
example, if the user doesn't expect 
any characters to be entered from the 
GDU keyboard he must assign a value of 
1 to the length suboperand. 

errguidance 

this suboperand specifies the error 
guidance that is returned to the 2798 
GDU if the data length is incorrect. 
The value of each suboperand may be 
from 1 to 16 and up to 16 suboperands 
may be coded. Each suboperand repre- 
sents a light on the guidance panel 
that is turned on when a CKLNGTH error 
condition exists. (See Figure 37.) 

Example : If the user coded CKLNGTH=(8, 
2,4,16) and the GDU operator entered 
any number of characters other than 7, 
then the error guidance lights for 
lines 2 and 4 on the left panel and 
line 16 on the right panel will be 
turned on. 

CKMONKY 

this operand indicates whether the 
2715 will check to determine if the 
2798 Monitor key is on. If CKMONKY= 
YES is coded, the 2715 checks that the 
Monitor key is on. If a Monitor key 
error is encountered when CKMONKY=YES, 
the error guidance, as specified by 
the MONERR operand in the CONFIGUR 
macro, is returned to the 2798 GDU. 

CKMOD11 

this operand causes the 2715 to per- 
form a modulus 11 check on the field 
specified and tests the data in the 
field to ensure that it is numeric. 
The last position in the specified 
field must contain the self-check 
character. A detailed description of 
modulus 11 checking can be found in 



Component Description: IBM 2790 Data 
Communication System , GA27-3015. 

length 

this suboperand specifies the length 
of the modulus 11 check field. The 
value of this suboperand may be from 1 
to 15. The length does not include 
the self- check character. 

position 

this suboperand specifies the starting 
position of the modulus 11 check 
field. The value of this suboperand 
may be between 2 and 16. 

errguidance 

this suboperand specifies the error 
guidance that is returned to the 2J98 
GDU if the modulus 11 check is not 
satisfied. The value of each sub- 
operand may be from 1 to 16 and up to 
16 suboperands may be coded. Each 
suboperand represents a light on the 
guidance panel that is turned on when 
a CKMOD11 error condition exists. 
(See Figure 37.) 

Example : CKM0D11= (6,2,2,10,14) will 
result in a modulus 11 check of a 7 
digit field (the seventh digit is the 
self-check digit) starting at GDU data 
entry position 2. If the self-check 
digit does not satisfy the modulus 11 
check, the error guidance lights for 
line 2 on the left panel and lines 10 
and 1H on the right panel will be 
turned on. 

CKRANGE 

this operand causes the 2715 to check 
the specified field to ensure that it 
is neither less than the specified low 
test value nor higher than the speci- 
fied high test value. This check also 
tests the data to ensure that it is 
numeric. 

positionl 

this suboperand specifies the starting 
position of the field for which the 
range check is performed. The value 
may be from 2 to 17. 

position2 

this suboperand specifies the last 
position of the field for which the 
range check is performed. The value 
may be from 2 to 17. 

hilowchars 

this suboperand specifies the high and 
low test digits (0-9) for each charac- 
ter in the field. Up to 16 •hilow- 
chars* may be coded. If the high and 
low test digits coded for a position 
of a field are the same digit, the 
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2715 will check that the test position 
is indeed that digit. 

Example ; CKRANGE=(8,10, 91, 80,63) will 
cause the 2715 to check for a 3 digit 
number starting in data entry position 
8 and ending in position 10. The 3 
digit number in positions 8 thorugh 10 
must be greater than or equal to 103 
and less than or equal to 986. 

LOWGUID 

this operand specifies the error gui- 
dance that is returned to the 2798 GDU 
if the specified field in the CKRANGE 
check is lower than the low test 
value. The value of each suboperand 
may be from 1 to 16 and up to 16 sub- 
operands may be coded. Each value 
represents a light on the guidance 
panel that is turned on when the low 
test condition exits. (See Figure 
37.) 

Example : From the example associated 
with the CKRANGE operand, the user may 
code LOWGUID=(8,9) to inform the GDU 
operator if the number he entered at 
the 2798 GDU is less than 103. If the 
number is less, the error guidance 
lights for line 8 on the left panel 
and line 9 on the right panel will be 
turned on. 

HIGUID 

this operand specifies the error gui- 
dance that is returned to the 2798 GDU 
if the specified field in the CKRANGE 
check is higher than the high test 
value. The value of each suboperand 
may be from 1 to 16 and up to 16 sub- 
operands may be coded. Each value 
represents a light on the guidance 
panel that is turned on when the high 
test condition exists. (See Figure 
37.) 

Example : From the example associated 
with the CKRANGE operand, the user may 
code HIGUID= (10,12) to inform the GDU 
operator if the number he entered at 
the 2798 GDU is greater than 986. If 
the number is greater, the error gui- 
dance lights for lines 10 and 12 on 
the right panel will be turned on. 

RNGETST 

this operand indicates the action to 
be taken when the data entry fails to 
comply with a CKRANGE check. If 
RNGETST= ERROR is coded and the CKRANGE 
fails, the data entry is not accepted 
and the desired error guidance is 
returned to the 2798 GDU. If RNGETST= 
DATA is coded and the CKRANGE fails, 
the data entry is accepted and the 
desired error guidance is returned 
with the normal guidance for the next 



step. RNGETST is the only error con- 
dition for which data can be accepted. 



CKMOD10 

this operand causes the 2715 to per- 
form a modulus 10 check on the field 
specified and tests the data in the 
field to ensure that it is numeric. 
The last position in the specified 
field must contain the self-check 
character. A detailed description of 
modulus 10 checking can be found in 
Component Description: IBM 2790 Data 
Communication System , GA27-3015. 



length 

this suboperand specifies the length 
of the modulus 10 check field. The 
value of this suboperand may be from 1 
to 15. The length does not include 
the self-check character. 

position 

this suboperand specifies the starting 
position of the modulus 10 check 
field. The value of this suboperand 
may be from 2 to 16. 

errguidance 

this suboperand specifies the error 
guidance that is returned to the GDU 
if the modulus 10 check is not satis- 
fied. Each value of this suboperand 
may be from 1 to 16 and up to 16 sub- 
operands may be coded. Each sub- 
operand represents a light on the gui- 
dance panel that is turned on when 
CKMOD10 error condition exists. (See 
Figure 37.) 

Example : CKMOD10= (4,1,16) will result 
in a modulus 10 check of a 5 digit 
field (the fifth digit is the self- 
check digit) starting at GDU data 
entry position 1. If the self- check 
digit does not satisfy the modulus 10 
check, the error guidance light for 
line 16 on the right panel will be 
turned on. 



CKOR 



this operand causes a check by the 
2715 to ensure that the character 
received in the position specified in 
the data entry is one of the check 
characters specified by the user. 
There may be one to five unique check 
characters associated with this test 
and only one must compare. 

position 

this suboperand specifies the position 
in the data entry that is checked for 
the character comparison. The value 
of this suboperand may be from 2 to 
17. 
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checkchar 1 , checkcharn 

each suboperand defines a check char- 
acter. From 1 to 5 of these sub- 
operands may be coded. The value of 
the suboperand may be the hexadecimal 
equivalent of any of the characters: 
A-Z, 0-9, or any of the special chara- 
cters: .$£-/, # " 3 = : ? ! ; * 
+ SPACE TAB NEWLINE LINEFEED. (See 
Figure 38.) 

Example : CKOR=<3, D3,F5, 7C, 61) will 
check the fourth data entry position 
(the third character entered by the 
operator) to ensure that is contains 
one of the characters: L, 5, a, or /. 
If the character is not one of the 
four specified, the user may code the 
following operand. 

ORGUID 

this operand specifies the error gui- 
dance that is returned to the 2798 GDU 
if the CKOR check indicates an error. 
The error occurs when the character in 
the specified data entry position does 
not equal any of the check characters. 
The value of each suboperand may be 
from 1 to 16 and up to 16 suboperands 
may be coded. Each value represents a 
light on the guidance panel that is 
turned on when a CKOR error condition 
exists. (See Figure 37.) 

Example : From the example associated 
with the CKOR operand, the user may 
code ORGUID=(2,3,4) to inform the GDU 
operator if the third character he 
entered at the 2798 GDU is not equal 
to one of the specified characters. 
If the character is not equal, the 
error guidance lights for lines 2, 3, 
and 4 on the left panel will be turned 
on. 



CKAND 



this operand causes the 2715 to check 
the characters received in the conse- 
cutive positions specified to ensure 
that they match all of the specified 
check characters. 

positionl 

this suboperand specifies the starting 
position of the field for which the 
CKAND compare is started. The value 
of this suboperand may be from 2 to 
17. 

position2 

this suboperand specifies the last 
position of the field for which the 
CKAND compare occurs. The value of 
this suboperand may be from 2 to 17. 

checkcharl , checkcharn 

each suboperand defines a check char- 



acter and from 1 to 16 characters may 
be coded. The value of the suboperand 
may be the hexadecimal equivalent of 
any of the characters: A-Z, 0-9, or 
any of the special characters: . $ 6 
-/,#"»=:?!;*+ SPACE TAB 
NEWLINE LINEFEED. (See Figure 38.) 

Example : CKAND=(7,10,C2,E3 # C1,DU) 
will check the consecutive data entry 
positions 7 through 10 to ensure they 
contain the characters B, T, A, and M 
in that order. If an error occurs, 
the user may code the following 
operand. If the hexadecimal value 
X'OO* is used as a check character, 
the character in the corresponding 
position of the data field will not be 
checked* 

Example : CKAND=(2,5,C1,C2,00,C3) will 
check data entry positions 2, 3, and 5 
to ensure they contain the characters 
A, B, and C in that order. The char- 
acter in data entry position 4 will 
not be checked. 

ANDGUID 

this operand specifies the error gui- 
dance that, is returned to the 2798 GDU 
if the CKAND check indicates an error. 
This error occurs when the characters 
received in the consecutive positions 
specified do not match all of the 
specified check characters. The value 
of each suboperand may be from 1 to 16 
and up to 16 suboperands may be coded. 
Each value represents a light on the 
guidance panel that is turned on when 
a CKAND error condition exists. (See 
Figure 37.) 

Example : From the example associated 
with the CKAND operand, the user may 
code ANDGUID=9 to inform the GDU 
operator if the specified characters 
do not match. If the characters do 
not match, the error guidance light 
for line 9 on the right panel will be 
turned on. 

CKNONUM 

this operand causes the 2715 to check 
a specified field to ensure that no 
numeric characters are received. 

positionl 

this suboperand specifies the starting 
position of the field to be checked. 
The value may be from 2 to 17. 

posit ion 2 

this suboperand specifies the last 
position of the field to be checked. 
The value may be from 2 to 17, but 
must be greater than or equal to the 
•positionl* suboperand. 
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err guidance 

this sutoperand specifies the error 
guidance that is returned to the GDU 
if a numeric character is received and 
a CKNONUM check is performed. The 
value of each suboperand may be from 1 
to 16 and up to 16 suboperands may be 
coded. Each value represents a light 
on the guidance panel that is turned 
on when the CKNONUM error condition 
exists. (See Figure 37.) 

Example : CKN0NUM=(2, 17, 3, 6) causes 
the 2715 to check positions 2 through 
17 of the GDU data entry to ensure 
that all the characters are non- 
numeric. If any of the characters in 
the specified positions are numeric, 
the error guidance lights for lines 3 
and 6 on the left panel will be turned 
on. 



will be used. This operand can not be 
used if any other operand in the PARM- 
LIST macro except CKMONKY is used. 
The TRANSL and IDENT operands are 
mutually exclusive. 



IDENT 



CKNUM 

this operand causes the 2715 to check 
a specified field to insure that all 
numeric characters are received. 

positionl 

this suboperand specifies the starting 
position of the field to be checked. 
The value may be from 2 to 17. 

position 2 

this suboperand specifies the last 
position of the field to be checked. 
The value may be from 2 to 17, but 
must be greater than or equal to the 
•positionl' suboperand. 

errgui dance 

this suboperand specifies the error 
guidance that is returned to the GDU 
if a non-numeric character is received 
and a CKNUM check is performed. The 
value of each suboperand may be from 1 
to 16 and up to 16 suboperands may be 
coded. Each value represents a light 
on the guidance panel that is turned 
on when the CKNUM error condition 
exists. (See Figure 37.) 

Example : CKNUM=(8, 8,15) causes the 
2715 to check position 8 of the GDU 
data entry to ensure that the charac- 
ter in this position is numeric. If 
the character in the specified posi- 
tion is non-numeric, the error gui- 
dance light for line 15 on the right 
panel will be turned on. 

TRANSL 

this operand indicates if the transl- 
ate function will be performed on the 
transaction step that uses this param- 
eter list. If TRANSL=YES is coded, 
the translate function will be used. 
If TRANSL=NO is coded, or the operand 
is omitted, the translate function 



this operand indicates if a store or 
get identifier function may be per- 
formed on the transaction step that 
uses this parameter list. If IDENT= 
YES is coded, the store or get identi- 
fier function may be used. If IDENT= 
NO is coded or the operand is omitted, 
the store or get identifier function 
may not be used. Other checks may be 
specified. The IDENT and TRANSL 
operands are mutually exclusive. 

Note : Only three of the following 
seven check operands can be coded on a 
PARMLIST macro: 

CKMOD11 

CKRANGE 

CKMOD10 

CKOR 

CKAND 

CKNONUM 

CKNUM 

The CKLNGTH and CKMONKY operands may 
be coded on any PARMLIST macro, regar- 
dless of how many other check operands 
are coded. 

Only one check may be performed on a 
given data position in the 2798 GDU 
data entry. The seven check operands 
listed above must not overlap. A par- 
ticular position in the data entry 
cannot be covered by more than one 
check. This does not apply to either 
the CKLNGTH or CKMONKY operands. 



DISPGUID (Display Guidance) Macro 
Instruction 

The DISPGUID macro is used to define a dis- 
play guidance message in the Display Gui- 
dance Table. A DISPGUID macro must be 
defined for every display guidance message 
the user defines. The desplay guidance 
address in the GDU step of the GDU list is 
used by the 2715 to address a particular 
display guidance message in the Display 
Guidance Table. The DISPGUID macro 
requires from 2 to 17 bytes of 2715 
storage. The format of the macro is: 

r t r 1 

| Name | Operation | Operand | 

j. + + i 

| (symbol] | DISPGUID | DISPMSG= , text i | 

I I I ills I I 

| | | [,SUPPRES=(NO J] | 
I X x j 
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symbol 

the name field of this macro is 
optional. 



DISPMSG 

this operand defines a user specified 
display guidance message. The text 
must not exceed 16 characters. 

SUPPRES 

this operand indicates whether the 
display guidance message is returned 
to the 2715 after it is displayed at 
the GDU display guidance and the 
operator presses the GDU Enter Key. 
Coding SUPPRES=YES or omitting the 
operand indicates that the defined 
data that was written to the GDU by 
the 2715 is not to be returned with 
the operator added data to the 2715. 
Only that data inserted by the GDU 
operator will be returned. Coding 
SUPPRES=NO will cause the defined data 
and operator inserted data to be 
returned, up to a maximum of 16 chara- 
cters. If the operator inserted data 
plus the defined data exceed 16 chara- 
cters, the defined data will be moved 
to the left and the right most charac- 
ters lost. 

The maximum number of DISPGUID macros 
that can be issued depends only on the 
user table size limitation. 



TRANSLAT (Translate Table) Macro 
Instruction 

The TRANSLAT macro instruction builds an 
entry in the Translate Table. A maximum of 
eight TRANSLAT macros may be coded and 3 to 
16 bytes of 2715 storage are required for 
each. This macro is coded once for each 
character that is translated. The format 
of the TRANSLAT macro is: 



r t t T 

I Name J Operation | Operand j 

| + + i 

| [symbol] | TRANSLAT | TRANSCH=hexchar, | 
| | |TRANTXT='text' | 

l X A J 

symbol 

the name field of this macro is 
optional. 

TRANSCH 

this operand defines the character 
that is translated. The value for 
this operand is the hexadecimal equiv- 
alent of any of the characters: A-Z, 
0-9, and any of the special charac- 
ters: . $6-/,#3" = : ? ! ; 
* + SPACE TAB NEWLINE LINEFEED. (See 
Figure 38.) 



TRANTXT 

this operand defines the user speci- 
fied translate text. 

Example : An assembly line worker is 
required to enter the character C from 
a 2798 GDU each time he builds and 
tests a specific clutch. The pro- 
grammer coded the following in the 
TRANSLAT macro: TRANSCH=C3,TRANTXT=' U 
SPEED CLUTCH' . The 2715 checks the 
character entered for this Translate 
transaction and replaces the C with 
the text 'U SPEED CLUTCH' . The text 
is now displayed at the 2798. 

Note : Each character assigned to a 
text must be unique, that is, assign a 
different character to each text. 

TRLIST (Transaction List) Macro Instruction 

The Transaction List macro is used with the 
Area Station List macro and the Data Entry 
Unit List macro to define a transaction. 
When the transaction is initiated by an 
area station, the Transaction List macro is 
followed by one or more ASLIST macros. 
When the transaction is initiated by a data 
entry unit, the TRLIST macro is followed by 
one or more DEULIST macros. The DEULIST 
macros may be followed by a CTRLIST macro. 
The first transaction list must be for all 
of the IBM 1035 Badge Readers. This con- 
sists of a TRLIST macro instruction fol- 
lowed by one DEULIST macro instruction. 

The Transaction Lists created by the 
TRLIST, ASLIST, DEULIST and CTRLIST macro 
instructions are composed of two elements: 
a header, and either an internal message or 
from one to sixteen data-entry steps. The 
header information is provided in the 
TRLIST macro instruction. The TRLIST macro 
must follow the last TGROUP macro. 

The TRLIST macro is used to generate the 
transaction headers for GDU lists and can 
te referred to by the GDUTRANS macro. 

Message routing can be specified (NULL 
or absexpl coded) only when the TRLIST is 
part of a transaction expansion. Message 
routing means that explicit or explicit/ 
implicit text is to be routed to 1053 
printer on an area station. The only ways 
the user can specify message routing are to 
code ROUTE=NULL or ROUTE=absexpl in the 
TRLIST macro. Coding ROUTE=DISK, CPU, or 
LOG does not imply message routing, but 
that the transaction is to be routed to the 
specified ROUTE parameter. Transaction 
routing does not mean routing to an area 
station 1053 printer. 

Each TRLIST macro requires 15 ♦ (text 
length +1)) bytes of 2715 storage. The 
format of the TRLIST macro is: 
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r t t 

| Name | Operation | Operand 

| symbol JTRLIST |TRID=absexpl 

^(DISKlll 



-H 



Icpu JJJ 

,NULL )"| 
, absexp2(J 
(NO n 

YES I 



, ROUTE= 

[ , LOG) 

_ , TEXT= 

, INQDISP= 

,DEMOD10= 

, DEMODll=* 
(NO 

,gdu=(yes 

A 12 



symbol 

the name field is required for this 
macro instruction. 



(NO 1 
YES 




NO 
YES 




NO 
YES 




] 





LOG 

specifies that the transaction is to 
be routed to the 27 UO attached to the 
2715. 

NULL 

specifies that the first data entry of 
the transaction is the destination 
address of the message, that is, the 
hexadecimal address of an area sta- 
tion. The message is to be routed to 
the printer attached to that area 
station. 

absexp2 

specifies the decimal representation 
of the address of an area station (see 
Figure 39). The message is to be 
routed to the printer attached to that 
area station. 

Note ; The suboperands of the ROUTE 
parameter may be coded in any order. 
If one is omitted, commas need not be 
coded to indicate the omission. 



TRID=absexpl 

specifies a transaction identifier. 
The user assigns a value from to 159 
to "absexpl," and the 2715 places this 
value in the transaction control byte 
of the transaction header for priority 
and deferred data. The value of 
"absexpl" must be in ascending order 
with the other TRID parameters coded 
in the program; however, values may be 
omitted (a warning message is 
generated at assembly time) . Since 
the user receives the transaction 
header with a message, the transaction 
identifier allows him to determine 
which TRUEST macro processed the data 
in the 2715. 



ROUTE 



the ROUTE operand specifies the 
destination of the data records (tran- 
sactions) that originate on one of the 
devices attached to the 2715. At 
least one destination must be speci- 
fied, and if only one is specified the 
parentheses are not coded. 



DISK 

specifies that the transaction should 
be routed to the 2715 integral disk; 
that is, the message is a deferred 
message. 



CPU 



specifies that the transaction should 

be routed directly to the CPU; that 

is, the message is an inquiry or a 
priority message. 



TEXT= NO 
YES 
specifies that a message defined in a 
subsequent ASLIST, DEULIST, GDULIST or 
CTRLIST macro is to be routed. 



INQDISP 

the INQDISP operand indicates whether 
this transaction is an Inquiry Display 
transaction. Coding INQDISP=YES spe- 
cifies that inquiry display will be 
used in this transaction. Coding 
INQDISP=YES requires that INQDISP=YES 
be coded in the CONFIGUR macro. Cod- 
ing INQDISP=YES requires one extra 
GDULIST macro to end this transaction 
list. See GDULIST macro description 
for details. 



DEMOD10 

the DEMOD10 operand indicates whether 
the 2715 will perform a Modulus 10 
self check on all or part of a data 
entry from an area station or data 
entry unit. Coding DEMOD10=YES speci- 
fies that Modulus 10 self checking 
will be performed on a data entry in 
this transaction. Coding DEMOD10 
requires CORE=32 to be coded in the 
CONFIGUR macro. This operand is mutu- 
ally exclusive with the DEMOD11 
operand. This operand does not apply 
to the 2798 GDU. 

DEMOD11 

the DEMOD11 operand indicates whether 
the 2715 will perform a Modulus 11 
self check on all or part of a data 
entry from an area station or data 
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GDU 



entry unit. Coding DEM0D11=YES speci- 
fies that Modulus 11 self checking 
will be performed on a data entry in 
this transaction. Coding DEM0D11=YES 
requires CORE=32 to be coded in the 
CONFIGUR macro. This operand is mutu- 
ally exclusive with the DEMOD10 
operand. This operand does not apply 
to the 2798 GDU. 



this operand allows for 100 additional 
transaction identifiers (TRID) to be 
specified by the user. The normal 
range of identifiers is from to 159 
and the additional identifiers range 
from to 99. Coding GDU=YES resets 
the TRID operand checking and allows 
for a maximum of 100 more transaction 
identifiers to be specified. The 
checking resumes with the new identi- 
fiers which may or may not be unique 
identifiers. If non-unique identi- 
fiers exist, the user must also check 
the device address in the transaction 
header to determine if the transaction 
is for a 2798 GDU. All TRLIST macros 
for GDU transactions and the asso- 
ciated GDULIST macros should be the 
last macros coded before STEND. (See 
Appendix M. ) 



Example : This example represents a 
series of 260 TRLIST macros with all 
other macros omitted: 



TRLISTO TRLIST TRID=0 ,ROUTE=DISK 
TRLIST1 TRLIST TRID=l,ROUTE=CPU 
TRLIST2 TRLIST TRID=2 , ROUTE=DISK 



Name 



[symbol] 



Oper- 
ation 



ASLIST 



Operand 



device-code, NORM=absexp 
[ , LENGTH= ( absexpl , 

absexp2) ] 
[ , DIGIT= (absexpl , 

abs exp2 , abs exp3 ) ] 
{,ENTRY=(1|] t,MSG='text'] 

<mJ 

[,INQDISP=absexp 
[ , MODULUS= ( absexpl , 
absexp2,absexp3) ] 

(NO | 
[,SELTRAN=lYESM 



symbol 

the name field of this macro instruc- 
tion is optional. 



device- code 

this operand indicates the device to 

be activated at the 2791 Area Station. 

The accepted values are: 



NORM 



B - Badge 

C - Card 

M - Manual entry 

O - OEM input 



this operand indicates which guidance 
light on the area station should be 
switched on if no error is recognized 
in the previous step of the transac- 
tion (see Figure 38). (The first step 
is considered to be the acceptance of 
the transaction code. ) This value 
must be from 1 to 31. 



TRLST159 
GDUTR0 



GDUTR99 



TRLIST 
TRLIST 



TRLIST 



TRID=159, ROUTE=CPU 
TRID=0 , ROUTE=DISK, 
GDU=YES 



TRI D= 9 9 , ROUTE= CP U , 
GDU=YES 



LENGTH 



ASLIST (Area Station List) Macro 
Instruction 

The Area Station List macro instruction is 
used to define one step of a transaction 
list for a 2791 Area Station. One to six- 
teen ASLIST macros may follow a TRLIST 
macro. If more than sixteen are used, the 
excess macros are flagged as errors in the 
assembly. Each ASLIST macro requires 5 
bytes of 2715 storage. If the message 
operand is coded, the ASLIST macro requires 
additional storage of length-of-text-plus- 
one bytes. The format of the ASLIST macro 
instruction is: 



absexpl 

specifies the significant length of 
the data entry (the number of data 
characters excluding blanks) . This 
may be any value from to 81; the 
maximum length depends on the input 
device — card reader, badge reader, 
manual entry, OEM entry. 

absexp2 

specifies which guidance light should 
be switched on if the number of chara- 
cters received is different from the 
value specified by "absexpl". The 
value of "absexp2" must be from 1 to 
31. (See Figure 41.) 

No length error checking takes place 
if the LENGTH parameter is not coded. 
If the LENGTH parameter is omitted, or 
if zero is specified, no significant 
length checking is done. 
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Figure 


41. 


ASLIST 


Operand 


Values for Gui- 



dance Lights by Position on the 
Area Station 



DIGIT 



absexpl 

specifies the position or column of 
the value in the data entry that is to 
be compared with the value specified 
in "absexp2". The value of "absexpl" 
must be from 1 to 15. 



operand is omitted, or if ENTRY=1 is 
coded, there will be only one data 
entry for this step. If ENTRY=M is 
coded, this step may be repeated until 
ended by the operator. User- 
documented instructions to the opera- 
tor must reflect the fact that the 
total number of bytes of data entered 
must not exceed the maximum transac- 
tion length of 247. This operand must 
not be coded on the first or only 
ASLIST macro following a TRLIST macro. 

INQDISP 

this operand specifies which guidance 
light on the area station is turned on 
when an Inquiry Display transaction is 
received by the 2715 and routed to the 
CPU as priority data. This is a user 
specified guidance such as "Inquiry in 
Process." The value of the operand 
must be from 2 to 31 (0 is reserved 
for Select Transaction and 1 is 
reserved for an aborted inquiry). 
Coding this operand requires INQDISP= 
YES to be coded in the TRLIST macro 
for this transaction. 

MODULUS 

this operand indicates the field in 
this data entry for which the 2715 
performs either a Modulus 10 or Modu- 
lus 11 self check algorithm. Error 
guidance is also specified when the 
self check fails. 



Note ; The actual position of the 
first byte of data received from the 
input devices depends on the device. 
For the local badge reader, card read- 
er, keyboard, and OEM devices on the 
2791, the first byte of data is in 
position 2. (Position 1 is the Mon- 
itor key.) 

absexp2 

specifies a value, from to 9, to be 
compared with a specified value in the 
data entry. 

absexp3 

indicates which guidance light should 
be switched on if the specified values 
do not match. This value must be from 
1 to 31. (See Figure 38.) 

If this operand is omitted, no error 
checking takes place. 

The DIGIT operand can not be coded if 
DEMOD10=YES or DEM0D11=YES in the TRLIST 
macro. 



ENTRY 



this operand allows a processing step 
to accept multiple input data entries 
until the operator calls for the next 
step to be activated. If the ENTRY 



absexpl 

specifies the starting position of the 
field for the modulus check. 

absexp2 

specifies the length of the field on 
which the modulus check is performed. 
The value can be from 1 to 15. This 
length does not include the self check 
character. 

absexp3 

specifies which guidance light is 
turned on if the modulus check fails. 
This value must be from 1 to 31. 

Note : The MODULUS operand can not be 
coded unless DEMOD10=YES or DEM0D11= 
YES is coded in the TRLIST macro. 
This operand is mutually exclusive 
with the DIGIT operand. 

SELTRAN 

this operand allows the Select Tran- 
saction light on the 2791 Area Station 
to be turned on at the completion of a 
transaction, instead of the first gui- 
dance light. Coding SELTRAN=YES on 
any ASLIST macro after the first 
ASLIST macro in any transaction causes 
the Select Transaction light to be 
turned on at the completion of a tran- 
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saction. If the operand is omitted or 
if SELTRAN=NO is coded, the first gui- 
dance light is turned on at the com- 
pletion of the transaction. SELTRAN= 
YES can not be coded on the first 
ASLIST macro in a transaction. 



MSG=*text' 



defines a user-specified message to be 
routed. The text must not exceed 127 
characters. The destination of the 
message was specified in the preceding 
TRLIST macro instruction. This 
operand may only be specified for the 
last ASLIST macro associated with any 
TRLIST macro. TEXT=YES must have been 
coded in the TRLIST macro. 



Note : The actual position of the 
first byte of data received varies 
depending on the device. For a data 
entry unit (2795, 2796, 2797), the 
first byte of data is in position 3. 
Positions 1 and 2 are the Monitor key 
and setting of the right-hand knob. 
For a 1035 badge reader, the first 
byte of data is in position 1. 

absexp2 

specifies a value, from to 9, to be 
compared with a specified value in the 
data entry. 

The DIGIT operand can not be coded if 
DEMOD10=YES or DEM0D11=YES is coded in the 
TRLIST macro for this transaction. 



DEULIST (Data Entry Unit List) Macro 
Instruction 

The Data Entry Unit List macro is used to 
define one step of a transaction list for a 
data entry unit or to define a transaction 
for the 1035 Badge Reader. For a 2796 and 
2797 DEU one to thirteen DEULIST macros and 
for a 2795 DEU one to sixteen DEULIST 
macros may follow a TRLIST macro. If more 
than sixteen are used, the excess macros 
are flagged as errors in the assembly. 
Each DEULIST macro requires 5 bytes of 2715 
storage. If the MSG operand appears, the 
DEULIST macro requires additional storage 
of length-of -text-plus-one bytes. The for- 
mat of the DEULIST macro instruction is: 



LENGTH 



r t t 

| Name | Operation! Operand 
j. + +. 




[DIGIT=(absexpl, 

absexp2) ] 
[,LENGTH=absexpl] 
[,MSG='text , l 
t , MODULUS= (absexpl , 

absexp2) ] 
[ , DIGIT2= (absexpl , 

absexp2) ] 



symbol 

the name of the DEULIST macro is 
optional. 



DIGIT 



absexpl 

specifies the position or column of 
the value in the data entry that, is to 
be compared with the value specified 
in "absexp2". The value of "absexpl" 
must be from 1 to 15. If the speci- 
fied values do not match, the red 
error button on the data entry unit 
pops up, and the operator must reenter 
correct data. 



absexpl 

specifies the significant length of 
the data entry (the number of data 
characters excluding blanks) . 

To determine the required data entry 
length, use the following formulas 
(see Programming Notes for data entry 
format) : 

1035: Reads a badge = value from 1 to 
10 or 

2795: ID+RK+CDBD = value from 2 to 12 
or 

2796: MON+TRK+CDBD+BLK+BRK+ROCK = 
value from 8 to 18 or 

2797: MON+RK+CDBD+MAN = value from 8 
to 18 or 
BLK = bottom left knob (1 byte) 
BRK = bottom right knob (1 
byte) 

CDBD = card or badge (0 to 10 
bytes) 

ID = ID code (1 byte) 
MAN = manual entry (6 bytes) 
MON = Monitor key (1 byte) 
RK = right knob (1 byte) 
ROCK = digit- rocker switches (<* 
bytes) 
TRK = top right knob (1 byte) 

If zero is specified or if the LENGTH 
parameter is omitted, no significant 
length check is performed. If an in- 
valid length is detected, the red 
error button pops up. 

MODULUS 

the MODULUS operand indiactes the 
field in this data entry for which the 
2715 performs either a Modulus 10 or 
Modulus 11 self check algorithm. The 
MODULUS operand can not be coded 
unless either DEMOD10=YES or DEM0D11= 
YES is coded in the TRLIST macro for 
this transaction. This operand is 
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mutually exclusive with the DIGIT 
operand, but not the DIGIT2 operand. 

absexpl 

specifies the starting position of the 
field for which the modulus check is 
performed. The value can be from 2 
through 16 corresponding to the last 
data positions in the data entry. 

absexp2 

specifies the length of the field for 
which the modulus check is performed. 
This value can be from 1 to 15. This 
length does not include the self check 
character. 

DIGIT2 

the DIGIT2 operand specifies a posi- 
tion in the data entry that is checked 
by the 2715 for a specified value. 
This operand can be coded when either 
the DIGIT operand or the MODULUS 
operand is coded or when neither is 
coded. 

absexpl 

specifies the position of the value in 
the data entry that is compared with 
the value specified in "absexp2." The 
value of "absexpl" must be from 1 to 
15. If the specified values do not 
match, the red error button on the 
data entry unit pops up and the opera- 
tor must reenter the correct data. 

absexp2 

specified a value from to 9 that is 
compared with a specified value in the 
data entry. 

MSG 

defines a user- specified message to be 
routed. The text must not exceed 127 
characters. The destination of the 
message was specified in the preceding 
TRLIST macro instruction. This 
operand may be specified only for the 
last DEULIST macro associated with any 
TRLIST macro. TEXT=YES must have been 
coded in the TRLIST macro. If a 
CTRLIST macro is coded, the MSG 
operand may be specified only in the 
CTRLIST macro. 

GDULIST (Guidance Display Unit List) Macro 
Instruction 

The GDULIST macro instruction is used to 
define one step of a GDU transaction list 
for a 2791 or 2793 Area Station with 2798 
GDUs attached. One to sixteen GDULIST 
macros may follow a TRLIST macro. If more 
than sixteen are coded, the excess macros 
are flagged as errors in the assembly. 
Each GDULIST macro requires 5 bytes of 2715 
storage. If the MSG operand is coded, the 
GDULIST macro requires additional storage 



equal to the length of the MSG text. If an 
inquiry display transaction (INQDISP=YES in 
the TRLIST macro) is coded, one extra GDU- 
LIST macro must be coded as the last entry 
of the transaction list. This macro supp- 
lies normal guidance light number and dis- 
play message number only and initiates no 
checking or parameter list references. 

The format of the GDULIST macro is: 



(Name | Operat ion | Operand 
t x x. 



[symbol] | GDULIST 



PARAMNO=absexp 

t, (NORGUID=absexp, 

...)] 
I" (DISPMSG=symbol|"| 
L,llDENT=absexp J J 
[,MSG= , text l ] 



(, ENTRY 



-fftii 



U X X. 



symbol 

the name field in this operand is 
optional. 

PARAMNO 

this operand indicates the parameter 
list number to be used by the 2715 to 
get to a parameter list that defines 
the type of checks to be performed on 
the data entry for this GDU step. The 
value of this operand must be defined 
in a PLN operand of the PARAMNUM 
macro. The value of the PARAMNO 
operand must be from 1 to 127. 

NORGUID 

this operand indicates the normal gui- 
dance that will be sent to the opera- 
tor guidance panel on the GDU when 
this step is entered. The value of 
this operand can be from 1 to 16 and 
up to 16 subope rands can be coded. 
Each suboperand represents a light on 
the guidance panel that will be turned 
on when this particulat step is 
entered. 

DISPMSG 

this operand specifies the name of the 
DISPGUID macro that defines the mes- 
sage to be displayed on the 2798 Dis- 
play Guidance Panel when this step in 
the GDU transaction is entered. 



IDENT 



this operand specifies an identifier 
in the Identifier Table to be dis- 
played on the 2798 Display Guidance 
Panel when this step in the GDU tran- 
saction is entered. The value of this 
operand must be between and 99 and 
must be less than the value of the 
IDCOUNT operand of the CONFIGUR macro 
(except when the IDCOUNT=0). The DIS- 
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MSG 



PMSG and IDENT operands are mutually 
exclusive. Every time the 2715 is 
ICPLed, the predefined text 'NOT USED* 
will be defined in every identifier in 
the identifier table. The user should 
use the Store Identifier function 
prior to using the Get Identifier 
function after an ICPL if he expects 
useful information to be in the iden- 
tifier table. 



Example : If the IDCOUNT operand of 
the CONFIGUR macro indicates there are 
6 identifiers in the Identifier Table 
(IDCOUNT=6) f and the user wants to 
display the fifth identifier when the 
step associated with a GDULIST macro 
is entered, then he must code IDENT=H 
in this macro (IDENT=0 is the first 
identifier available) . 



Note ; The user is made aware of the 
fact that he has not stored any text 
in a particular Identifier since he 
performed his table load by having the 
text 'NOT USED* defined in every Iden- 
tifier in the Identifier Table at 
assembly time. When the user displays 
a particular Identifier as specified 
by the IDENT operand of a GDULIST 
macro and sees the text •NOT USED, * he 
should realize that he has never 
stored any text in the Identifier. 



defines a user-specified message to be 
routed. The text must not exceed 127 
characters. The destination of the 
message was specified in the preceding 
TRLIST macro instruction. This 
operand may be specified only for the 
last GDULIST macro associated with any 
TRLIST macro. TEXT=YES must have beeii 
coded in the TRLIST macro. If a 
CTRLIST macro is coded, the MSG 
operand may be specified only in the 
CTRLIST macro. 



ENTRY 



this operand allows a processing step 
to accept multiple input data entries 
until the operator calls for the next 
step to be activated. If the ENTRY 
operand is omitted, or if ENTRY=1, 
there will be only one data entry for 
this step. If ENTRY=M, this step may 
be repeated until ended by the opera- 
tor. User documented instructions to 
the operator must reflect the fact 
that the total number of bytes of data 
entered must not exceed the maximum 
transaction length of 247. This 
oprand must not be coded on the first 
or only GDULIST macro following a 
TRLIST macro. 



CTRLIST (Counter List) Macro Instruction 

The CTRLIST macro is used to define the 
last step of a transaction for a data entry 
unit that is attached to a 2793 Area Sta- 
tion with pulse counters. This macro 
generates a five-byte data entry step for 
pulse count. The counter appendage step 
must be the last step in a transaction. 

The format of the CTRLIST macro instruc- 
tion is: 



|Name | Operation j Operand 

L_ «_J. J «.__ — _-. 


1 


r T 1 

j [symbol] | CTRLIST | DEVCOD=f B ) 




1 1 1 c , 




I 1 1 <mJ 




1 CTRADR= 
■ i i 


IMP , 
EXP) 




j j |CTRRD= 


SINGLE), 
GROUP J 




j j | CTTEST= 


NULL 
SETNCT 


» 1 


| | | JSETUNAS 




j j | (reset 




j j |CTROP= /READ 




1 1 1 | SET 




| j | 1 READS ET 




j | | jREADRST 




| j | Irdresid 




1 1 1 (null 




| | | [,MSG= , texf ] 




L—_— _ „ X — __«._A «... 


.______j 


symbol 

the name field is optional. 





DEVCOD 

indicates the way the data entry is 
entered at the DEU. If DEVCOD=B is 
coded, a badge will be used; if 
DEVCOD=C, a card will be used; and if 
DEVCOD=M, manual entry will be used. 
M may not be specified for a 2795 DEU. 

CTRADR 

indicates whether implicit or explicit 
counter addressing is to be used. 
Coding CTRADR=EXP indicates that 
explicit counter addressing is to be 
used. Explicit counter addressing is 
entered within the last data entry. 
This entry is retained as data in 
normal transaction assembly. Address- 
ing is specified as decimal digits 
with values from 1 to 63. 

Coding CTRADR=IMP indicates that 
implicit counter addressing is to be 
used. Implicit counter addressing is 
valid only from a DEU and implies that 
only the first 32 counters can be 
used. For implicit counter address- 
ing, the device address of the DEU 
initiating the request (from X'CO* to 
X'DF*) will be converted to a counter 
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device address (from X'l' to X^O') 
and used as the implied address. 

CTRRD 

indicates how counters are to be read. 
If CTRRD=SINGLE is coded, the counters 
are to be interrogated individually. 
Coding d'RRD=GROUP indicates that 
counters are to be interrogated on a 
group basis. Group reads are done on 
a f roir/to basis with a 16-counter 
maximum. 

CTTEST 

specifies the count test options. 
Coding CTTEST=NULL indicates that 
there is no change in the present 
count test condition. Coding CTTEST= 
SETNCT indicates that no-count test 
will be enabled and the unassigned 
production test will be disabled. 
Coding CTTEST=SETUNAS indicates that 
the no-count test will be disabled and 
the unassigned production test will be 
enabled. Coding CTTEST=RESET disables 
all testing conditions. 



CTROP 



indicates the type of counter request 
to be performed. Coding CTROP=READ 
indicates that the counters are not to 
be reset after a single or group read. 
Coding CTROP=SET indicates that the 
counters are to be set to the value 
specified by the user at the DEU. 
Coding CTROP=READSET indicates that 
the counters are set to the value 
specified by the user at the DEU after 
a single or group read. SET and READ- 
SET are valid only for 2796 and 2797 
DEUs and may not be routed to the 
ASLOG printer. Coding CTROP=READRST 
indicates that the counters are to be 
reset to zero after a single or group 
read. Coding CTROP=RDRESID indicates 
a read residual function, after which 
the counters are not reset. Coding 
CTROP=NULL indicates that no read or 
set counter functions will be per- 
formed in this transaction. 



MSG 



defines a user-specified message to be 
routed. The text must not exceed 127 
characters. The destination of the 
message was specified in the preceding 
TRLIST macro instruction. This TRLIST 
macro must also have specified 
TEXT=YES. 

STEND (Statement End) Macro Instruction 

The Statement End macro instruction is used 
with or without a name and must have no 
operands. It is used to indicate the end 
of all user macros. This must be the last 
card processed before the assembler END 
card. The STEND macro instruction compares 



the total number of bytes generated for the 
2715 tables with the maximum allowable size 
for the user's particular 2715 (see CONFI- 
GUR) . If the size of the tables exceeds 
the maximum, an MNOTE is issued indicating 
the assembly is invalid. 

r t t 1 

| Name | Operation! Operand | 

j. + x ^ 

| [symbol] | STEND | j 

i x x J 

symbol 

the name field of this macro is 
optional. 



Note ; A warning MNOTE is generated by this 
macro. 



PROGRAMMING NOTES 

The following general operational charac- 
teristics should be remembered when com- 
municating with a 2715: 

• When priority data has been read to 
exhaustion (EOT received) , the user 
should write a control message to the 
2715 requesting deferred data and then 
read that data until an EOT is 
received. 

• When a data message has been accepted 
fcy the 2715 but cannot be routed to its 
ultimate destination, the 2715 sends 
the message back to the System/360 with 
the transaction control byte unchanged, 
and an error code in the zone field of 
the second byte of the time field of 
the transaction header. The error 
codes are: 

27 40 not attached 1110 

2740 not operational 1101 

Incomplete transaction 1100 

1053 not attached 1011 

1053 not operational 1010 

2740 overload 1001 

MSG routine overload 1000 

Invalid request from CPU 0111 
Counter not attached (Pulse 

Count feature) 0101 
Device not operational (Pulse 

Count feature 0011 

• The devices attached to a 2790 system 
may vary in their ability to transmit 
blanks. This may affect the length of 
data entered, that is, data from local 
card reader, badge reader, etc. 

• A 2715 data entry consists of the 
following: 
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2795 Data Entry Unit 

j LEFT | ID | RIGHT | 

| KNOB | CODE | KNOB | 10 DATA BYTES 

III I 

t + X X 



■12 BYTES -» 



2796 Data Entry Unit 

I T T T T 1"™ ' T- 1 

| TOP |MON-|TOP | 10 | BOT-j BOTTOM JU DIGIT j 
| LEFT | ITOR j RIGHT | DATA |TOM j RIGHT | ROCKER | 
| KNOB | KEY j KNOB | BYTES | LEFT | KNOB | SWITCH- | 
I 1*1 I |KNOB| |ES | 
L X X X X X X .( 

I I 



l 18 BYTES 

* Has a value of 1, 2, or 3. 

2797 Data Entry Unit 

r T T T T 

| LEFT | MON- | RIGHT j 10 | 6- DIGIT MANUAL 
| KNOB | ITOR j KNOB j DATA | ENTRY BUFFER 
j | KEY | | BYTES | 

I I** I I I 

I X X X X 



l 18 BYTES 

** Has a value of 4, 5, or 6. 
2798 Guidance Display Unit 



r t t T 

I TRANS- I OPERA- j MAXIMUM OF 16 DATA BYTES | 
|ACTIONjTIONAL| | 

| CODE | STATUS | | 

| BYTE | BYTE j | 

l X X < 



-17 BYTES J 



2791 Area Station 

r t t 1 

| TRANSACTION | MONITOR j j 

|CODE |KEY* | 1 TO 80 DATA BYTES** | 
l X x 4 

I I 

«. 1 TO 81 BYTES -» 

♦Not included with data entries from 1035 
Badge Readers 
X'FO' = Key off 
X'Fl' = Key on 
♦♦Card reader-80 bytes 
Badge reader- 10 bytes 
Manual entry-6 bytes 
OEM entry- 10 bytes 

The Monitor key on an area station or a 
data entry unit allows the operator to add 
an approval to a given transaction. 
Approval is accomplished through the trans- 
mission of a unique character that is acti- 
vated by placing a key in a two-position 
lock switch for the 2791 Area Station and a 



three position lock switch for a 2796 or 
2797 Data Entry Unit. 

Note : The 2715 removes the first charac- 
ter, which is the transaction code (from a 
transaction key on an area station or the 
value of the left-hand knob on a 2795 or 
2797 or of the top left-hand knob on a 2796 
Data Entry Unit) . 

• The user roust provide input/output 
areas or buffers of at least 610 conti- 
guous bytes to allow for the maximum 
message length that can be received 
from the 2715. 

• A separate assembly of the following 
macros is required for table 
generation: 

CONFIGUR 

AS 

TGROUP 

ASCTR (optional) 

CTRGROUP (optional) 

CTRSCHED (optional) 

TRLIST 

ASLIST (DEULIST) 

CTRLIST (optional) 

STEND 

• The first assembly statement must be 
the CONFIGUR macro (there must not be a 
TITLE, CSECT, or START card). The last 
assembly statement must be the END 
card. 

Notes : 

1. When cransaction expansion is speci- 
fied, all TRLISTs referred to by this 
group must be such that the device 
selection and normal guidance in the 
first data entry of each of these 
transaction lists are identical. 

2. Storage expansion (32K core) is a pre- 
requisite to transaction expansion. 

3. Transaction expansion is a prerequi- 
site to message routing. 

4. A transaction expansion entry must not 
refer to another transaction expansion 
entry. 

5. The first transaction must be for all 
of the IBM 1035 Badge Readers. 

6. Chaining data entries is not allowed 
for the IBM 1035 Badge Reader. 

7. The value coded in the LENGTH param- 
eter must be equal to the number of 
data characters (nonblank) plus 1. 

8. MSG operand may only be specified for 
the last ASLIST, DEULIST or CTRLIST 
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9. 



macro associated with any TRLIST 
macro . 

The last entry of a transaction cannot 
be a multiple entry. 



10. The maximum transaction length on a 
multiple entry is 247 bytes. 

11. All DEUs attached to an area station 
must use a common transaction group 
(TGROUP). If 2795, 2796, and 2797 
DEUs are attached to the same area 
station, three TGROUP macro instruc- 
tions must be coded, but only one 
DEGROUP operand is coded in the AS 
macro for this area station. See 
Figure 37 for examples and the discus- 
sion of the TGROUP macro instruction 
for details. 



MESSAGE FORMAT 

The user communicates with the 2715 using 
BTAM READ and WRITE macro instructions and 
BSC line control procedures. When reading 
from the 2715, the length of the message is 
text length plus 3 (DLE STX is received at 
the beginning of the message and ETX is 
received at the end) . The maximum length 
for text received is 640 characters. 

When writing to the 2715, the number of 
bytes coded in the length operand of the 
WRITE macro instruction is text length plus 
2 (the user must insert DLE STX in front of 
the text) . The total number of bytes writ- 
ten is text length plus 4 (BTAM inserts DLE 
ETX at the end of the text) . The maximum 
length for text written is 128 characters. 

Each message transmitted or received is 
composed of one or more transactions, pre- 
ceded by a message header. Each of the 
transactions is composed of a transaction 
header and data. When transmitting to the 
2715, these headers must be provided by the 
user in correct format. Message formats 
are shown in Figure 42. 

Message Header — System/370 to 2715 

The message header is two bytes and has the 
following format: 



Byte 
Byte 1 



Message length 
Message control byte 



Message Length : The message length is a 
one-byte count, in hexadecimal, of the num- 
ber of characters in the message, including 
headers and data. The BSC framing control 
characters are not included in this count. 
For transmission from the System/370 to the 
2715, the message length should not exceed 
128 bytes. 



MESSAGE 
HEADER 



(—5 bytes—* 



TRANSACTION 1 



TRANSACTION n 



TRANSACTION 
HEADER 



DATA 



f«— 8 bytes •«♦* — 1 to 247 bytes— H 

1 I I 



up ro 612 bytes- 



2715 to System/370 



MESSAGE 
HEADER 


TRANSACTION 1 


TRANSACTION n 


r- 2 byt«— - 


-- 




TRANSACTION 
HEADER 


DATA 














1 up to 128 bytes 


1 



System/370 to 2715 



Figure 42. Message Formats 



Message Control Byte : The message control 
byte is used to indicate one of three poss- 
ible destinations for output data, as shown 
below. 



j MESSAGE DESTINATION 
^ 

| 1053 Printer or Pulse Count 

I 

|2715 Control 

I 

|2740 Terminal 

l , 



" T 1 

j CONTROL BYTE j 




Message Header — 2715 to System/370 

The message header is five bytes and has 
the following format: 



Bytes 0-2 
Bytes 3-4 



Work day number 



Restart number 



Work Day Number : The work day number is a 
three-byte EBCDIC field used as a date 
field. The date may be omitted, in which 
case the field is undefined. 

Restart number : The restart number is a 
two- byte field that defines the type of 
data and associated restart information. 
The format of this field is: 
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Byte 3: bits 0-4 Low-order bits of 
cylinder address. 

bit 5 Track. 

bits 6-7 Sector. 

Byte 4: bit Reserved. 

bit 1 If on, indicates 
deferred data. 

bit 2 If on, indicates 
priority data. 

bits 3-4 Reserved. 

bits 5-7 High-order bits of 
cylinder address. 



Transaction Header 

The transaction header is eight bytes and 
has the following format: 



Byte 
Byte 1 
Byte 2 
Byte 3 

Bytes 4 



Transaction length 

Transaction control byte 

Area station address 

Device address 
(counter address) 

Time stamp 



Transaction Length ; For transmission from 
the 2715 to the System/370, the transaction 
length is a hexadecimal count of the number 
of bytes in a transaction, including the 
header. The count may not exceed 255; 
therefore, the maximum number of bytes of 
data is 247. 

For transmission from the System/370 to 
the 2715, the transaction length is a user- 
provided hexadecimal count of the number of 
bytes in a transaction, including the tran- 
saction header. The count must not exceed 
126; therefore, the maximum number of bytes 
of data is 118. The 2715 checks the summa- 
tion of all transaction lengths against the 
message length. If they do not agree, the 
2715 transmits an EOT, aborting the 
transmission. 

Transaction Control Byte : The transaction 
control byte is a binary code that speci- 
fies the type of transaction. Values for 
the transaction control byte are shown in 
Figure 43. If the value in a control tran- 
saction is not recognized by the 2715, a 
message is returned to the System/370. 



Note : When a data message has been 
accepted by the 2715 but cannot be routed 
to its ultimate destination, the 2715 sends 
it back to the System/370 with an error 
code inserted in the zone field of the 
second byte of the time stamp. See the 
Time Stamp description for definition of 
the error codes. The transaction control 
byte still contains the "System/370 to 
2715" indication. 

Area Station Address : For transmission 
from the 2715 to the System/370 the Area 
Station Address field usually contains the 
area station address. The field contains a 
hexadecimal value (see Figure 39) . 

• For priority data and deferred data, 
the field contains the area station 
address. 

• For responses to control transactions, 
the field is undefined. 

For transmission from the System/370 to 
the 2715, the field normally contains the 
area station address . The user must speci- 
fy the address in hexadecimal (see Figure 
39). When the field contains an invalid 
area station address, the transaction is 
returned intact with an error code (see 
Programming Notes) . The area station 
address field should be zero for control or 
2740 operations. 

Device Address : For transmission from the 
2715 to the System/370 the Device Address 
field identifies the sending data entry 
unit, 1053 Printer, 1035 Badge Reader, OEM 
device, or 2791 resident card, badge, or 
manual entry, or the actual counter 
address. This field is zero if it is con- 
trol information. Addresses in this field 
are represented in hexadecimal form. 

For transmission from the System/370 to 
the 2715, the field usually contains the 
address of the printer on the area station. 
The field is zero for the 2740 or control 
transactions . 

Time Stamp : The time stamp is a four-byte 
field that contains the value of the clock 
when the data was received. It is carried 
in conventional form, in hours and minutes, 
as EBCDIC characters. The field may be 
omitted on output to the 2715. If the 
field is omitted, four zero EBCDIC charac- 
ters (X'FO*) must be inserted. 

An error condition will be encoded into 
the zone bits of the second byte to pre- 
serve the original time stamp. Note that 
the zone bits of the first time byte may 
also be changed. 
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Control | 


Data Entry Bytes 




Message Type and Function 


Byte | 


(dj. f d a r . . «d n ) 




---1 

System/370 to 2715 ! 


► -| 






- Data transactions 








- 1053 printer data 


X'FA" 


dj.-d n (max=118 bytes) 




- 2710 terminal data 


X'FB* 


di~d n (max=118 bytes) 




- Control transactions 








- Bypass area station; causes the speci- 


X'Cl' 


da.=area station ad- 




fied area station to go offline. 




dress in hex 




- Restore area station; causes the speci- 


X'C2' 


d x =area station 




fied area station to go online. 




address in hex 




- Bypass segment; causes the specified 


X«C3* 


d i =segment to be by- 




segment of the transmission line to be 




passed in EBCDIC 




bypassed. 








- Restore segment; causes the specified 


X'CH* 


d ± =segment to be re- 




segment of the transmission line to be 




stored in EBCDIC 




restored to operation. 








- Read deferred data; causes deferred 


x'cs' 


none 




data to be sent from the 2715 disk to 








the System/370. 








- Stop 2790 input. 


X«C6' 


none 




- Start 2790 input. 


X , C7' 


none 




- Alarm messages: 








• Text; sends user error message to 


X'CD* 


di-d n =user error 




the area station 1053. 




message in EBCDIC 




• Alarm; causes alarm bell to ring at 


X'CE* 


none 




the area station 1053. 








• Alarm and text; sends alarm and 


X'CF 1 


da.-d n =user error 




user error message to area station. 




message in EBCDIC 




- User table load start. 


X'Dl' 


none 




- User table load data; defines the fol- 


X , D2* 


d x -d =one object 




lowing data as 2715 tables. 




card from the user's 
assembly of 2715 
macro instructions 




- User table load end. 


X«D3* 


none 




- CPU restart; recovers deferred data 


X'DU* 


d ± -d a =restart number 




that was received subsequent to the 




[ that was checkpointed 




specified restart number (used with the 




(in hexadecimal) 




checkpoint/restart capability) . 








- 2715 restart; attempts to recover data 


X«D5' 


di-d a =def erred re- 




that has been buffered at the 2715 and 




start number log 




not yet transmitted to the System/370 




(in hexadecimal) 




after a 2790 or 2715 irrecoverable 




1 d ± -d =priority re- 




error or stop. 




start number log 
[ (in hexadecimal) 




- Sort area station errors; causes the 


X^' 


none 




2715 to scan the error logout file and 








extract error statistics for the ad- 








dress specified in the fourth byte of 








the transaction header. 








- Read partial error log; causes error 


X*D7' 


j none 




data in the 2715 error logout file to 








be transmitted to the System/370. 








- Reinitialize 2715 disk (will not be 


X^' 


none 




initiated unless all 2790 input is 








stopped and all deferred data is trans- 








mitted to the System/370). 








- Set day stamp. 


X*E2 f 


none 




- Monitor day number; causes the previ- 


| X f E3' 


| none 




ously set day stamp to be monitored. 








- Monitor time; causes Real-time clock 


X*E4 ( 


| none 




to be monitored. 







Figure 43 (Part 1 of 2). Transaction Control Byte Usage 
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Message Type and Function 



Control 
Byte 



Data Byte Entries 
(d 1# d a # - - .d n ) 



- Reset deferred data mode; causes the 
2715 to stop queuing deferred data from 
the disk to be transmitted to the 
System/370 (the 2715 will continue to 
transmit the deferred data already 
queued) . 

- All Pulse Count transactions: 

• Read Group functions; reads the 
contents of one or more counters. 

• Set functions and Read and Set 
functions; sets the counter to a 
predetermined count. 

2715 to System/370 
- Data Transactions 



Control Transactions 

- Positive response to CPU request 

- Negative response to CPU request 

- Invalid response to CPU request 

- Positive response to 2715 request 

- Negative response to 2715 request 

- Response to invalid 2715 request 

- User defined 

- Automatically initiated response 

- Unsolicited 2715 response 

Special pulse counter transactions 

- Positive response to CPU request 



Invalid response to CPU request 
Positive response to operator 
initiated pulse counter control request 

Pulse count transactiosn for CPU 
Response for pulse counters 



X^* 



X'FC 1 



X' 


00' 


x« 


7F .l 


X 1 


CA' 


x« 


CB' 


X' 


CC 


X' 


DA' 


X" 


DB' 


X" 


DC f 


X' 


FO' 


X' 


F9* 


X 


FF* 


X' 


FD' 



X'CA" 



X' 


cc 


X' 


DA' 


X' 


ED' 


X' 


EF ,a 



none 



d^counter control 
byte in EBCDIC 
d a -d 3 =EBCDIC value 
of last counter in 
the group 
d a -d =EBCDIC value 
to which the counter 
is to be sent 



discounter control 

request 

da=control definition 

same as X^A* 

discounter control 

request 

d a =control definition 



*This is the value of the transaction identifier. 

diagnostics can be run on a counter or counters for a specific area station while 
the system is still active with normal customer transactions. If the user wants to 
save the counter values, a diagnostic code can be issued to route all the counter 
values to the system. After the counters have been returned to the system, they may 
be restored to the original values by the user program. 

L 

Figure 43 (Part 2 of 2). Transaction Control Byte Usage 



The following error codes are assigned: 

X*E* 2740 not attached — The 2740 is not 
attached to the system, and the 2740 
was specified in a user table entry. 
The transaction- list number in the 
header identified the incorrect user- 
table entry. 

X'D* 2740 intervention required — The 

2740 requires intervention because it 



has power off, is out of paper, or is 
in improper mode. 



X*C* Incomplete transaction — This tran- 
saction is incomplete due to one of 
several causes: 

• Operator aborted the transaction. 

• Byte count was exceeded on a repeat 
transaction. 
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• Stop loop was executed and transac- 
tion was not completed in the time 
allowed. 

• Incomplete communication with a 
counter for any request. 

X'B* 1053 not attached — The transaction 
was addressed to an area station that 
did not have a 1053 attached. This 
can be due to CPU program problems if 
the CPU originated the transaction, 
due to user table problems in the 
case of message routing with implicit 
addressing, or due to operator errors 
in message routing with explicit 
addressing. 

X'A* 1053 not operational — The addressed 
station has a 1053 attached, but for 
some reason it is not operational. 

X*9' 2740 overload — The 2740 was speci- 
fied in so many transactions that a 
significant part of 2715 buffering 
was queued for the 2740 and system 
operation was affected. In this 
case, the 2715 will flag transactions 
with this error code, bypass the 
2740, and send them to the processor 
as priority data. Transactions 
already on the 2740 queue are not 
affected and print out at the 2740. 
When the 2740 queue clears, the sys- 
tem will revert to its normal 
operation. 

X'8' Message-routing overload — The out- 
put queue contained so much of the 
2715 buffering that system operation 
was affected. The 2715 will flag 
transactions with this code and route 
them to the processor as priority 
data. Transactions already on the 
output queue are handled normally. 
When the output queue clears, the 
system will return to normal 
operation. 

X*7* Invalid request from CPU — The orig- 
inal transaction from the CPU is 
returned to the CPU due to one of the 
following causes: 

• An improper command. 

• Wrong transaction length. 

• An invalid value specified from a 
DEU to set a counter (Pulse Count 
feature) . 

X*5* Counter not attached — The counter 
specified is not present on the area 
station (Pulse Count feature) . 

X*3* Device not operational — The speci- 
fied counter is present, but is not 
operational due to a busy condition 
in the counter adapter (Pulse Count 
feature) . 



Note : In the X'8' and X'9' cases, the user 
program still has access to the 2740 or 
1053 output within normal output limita- 
tions. Thus the user may reroute this 
traffic under control of his program as he 
wishes. 

It is the user's responsibility to 
restore the zone bits in the first and 
second bytes of the time-stamp field 
whenever he detects an error if he wishes 
to restore the time field to true EBCDIC 
representation (for example, if he were to 
reroute the transaction) . 

Data with 2798 Transactions 

The first byte of data of every step in a 
transaction from a 2798 indicates whether 
the monitor key was on or off at the 2798 
from which the transaction was entered. 
This monitor key byte is either X'FA* indi- 
cating monitor key off, or X'FB* indicating 
monitor key on. Following the monitor key 
byte can be a data field containing from 
to 16 data characters received from the 
2798 GDU. When the user is analysing a 
2798 transaction, he can separate each step 
by comparing for a X'FA' or X'FB* (or both) 
in the transaction depending upon whether 
or not he expects the monitor key to be on 
or off. 

Data with Counter Control 

The first byte of data is the counter con- 
trol byte indicating the type of pulse 
counter operation this transaction results 
from, as shown in Figure 44. The counter 
control byte can be the response to any of 
the read functions (Read, Read Residual, 
Read and Reset, Read and Set, Read Group), 
or one of the following operations: 



Counter Control 



Counter Control 



Operation 


Byte 


(in Hex) 


Scheduled Readout 




F4 


No-Count Test Failure 




F2 


Unassigned Production 






Test Failure 




Fl 


Overflow Interrupt 




F6 


Power Interrupt 




F7 


Invalid Transaction 






from AS 




F0 



The second byte of data always contains 
a blank character (X^O*). The third and 
fourth bytes contain the address of the 
counter that the operation resulted from. 
In the case of the Read Group operation, 
the third and fourth bytes contain the 
address of the first counter in the group. 
The fifth byte of data is another blank 
character. The next five bytes contain the 
counter Value. Except for the following 
operations, there is no more data in the 
data area. 



IBM 2790 Data Communication System — Programming Considerations 187 



Counter Control Operation 



, + 

|Set no-count testing (NCT), reset unassigned production testing (UNASP) | 01 

Reset NCT, set UNASP | 02 

Reset all count testing functions | 03 

Set counter | 20 

Set counter, set NCT, reset UNASP | 21 

Set counter, reset NCT, set UNASP | 22 

Set counter, reset all count testing functions | 23 

Read counter | 80 

Read counter, set NCT, reset UNASP | 81 

Read counter, reset NCT, set UNASP | 8 2 

Read counter, reset all count testing functions | 83 

Read residual | A0 

Read residual, set NCT, reset UNASP | Al 

Read residual, reset NCT, set UNASP | A2 

Read residual, reset all count testing functions | A3 

Read and reset counter | CO 

Read and reset counter, set NCT, reset UNASP | CI 

Read and reset counter, reset NCT, set UNASP | C2 

Read and reset counter, reset all count testing functions | C3 

Read and set counter | E0 

Read and set counter, set NCT, reset UNASP | El 

Read and set counter, reset NCT, set UNASP | E2 

Read and set counter, reset all count testing functions | E3 

Read group | 88 

Read group residual | C8 

Disable schedule readout (single counter) | B0 

Enable schedule readout (single counter) | Bl 

Disable schedule readout and count testing (all counters on an AS) | B2 

Enable schedule readout and count testing (all counters on an AS) | B3 

Disable all schedule readouts (on 2790 System) j B4 

Enable all schedule readouts (on 2790 System) | B5 

Disable all count testing functions (on 2790 System) | B6 

Enable all count testing functions (on 2790 System) j B7 

Disable all schedule readouts and count test functions (on 2790 System) j BB 

Enable all schedule readouts and count test functions by continuing | BC 

from stop point j 

Enable all schedule readouts and count test functions by reinitializing! BD 

all schedules | 
x 

Figure 44. Counter Control Operation 



Counter Control 
Byte (in hex) 



• Read Group. 

• Read Group Residual. 

• No-Count Test Failure 

• Unassigned Production Test Failure. 

• Overflow Interrupt. 

• Power Interrupt. 



For the Read Group and Read Group Resi- 
dual operations, all the remaining counter 
values are contained in the data area, and 
each is separated by a blank character 
(X'40'). For other operations, the follow- 
ing EBCDIC messages are in the data area, 
preceded by a blank character: 



Operation Message 

No-Count Test Failure NCTF 
Unassigned Production Test 

Failure UPTF 

Overflow Interrupt OVFL 

Power Interrupt POWR 



CONTROL TRANSACTIONS 

Control transactions are formatted the same 
as other types of transactions, using the 
transaction control byte of the transaction 
header to indicate the action to be per- 
formed. The data field of the message is 
used to identify the specific object of the 
action, for example, the identification 
number of the area station to be restored 
(the data field may or may not be present. 
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depending on the nature of the transaction 
control type) . 



The control transaction types, as pre- 
sently defined, are: 

• System/370 to 2715 (sent by the user 
program) : 

Bypass area station. 

Restore area station. 

Bypass segment. 

Restore segment. 

Stop 2790 input. 

Start 2790 input. 

User table load start. 

User table load data. 

User table load end. 

CPU restart. 

2715 restart. 

Sort area station errors. 

Read partial error log. 

Reinitialize disk. 

Set day stamp. 

Monitor day number. 

Monitor time. 

Reset deferred data mode. 

Read deferred data. 

All pulse count transactions. 

Alarm. 

Text. 

Alarm and Text. 

• 2715 to System/37-0 (sent to user 
program) : 

Positive response to CPU request. 

Negative response to CPU request. 

Response to invalid CPU request. 

Positive response to 2715 request. 

Negative response to 2715 request. 

Response to invalid 2715 request. 

User defined. 

Automatically initiated response. 

CE-initiated response. 

Unsolicited 2715 response. 

Pulse count responses to 2715 operator- 
initiated requests. 

Pulse count transactions destined for 
CPU 

Response for pulse counters. 

In addition to the above transactions, 
there are two types of messages that are 
transparent to the user (that is, non-user 
data) . 

1. Error records are recorded by BTAM on 
a disk file; and 

2. Diagnostic information (automatic or 
resulting from intervention at the 
2715 local) is printed by BTAM on the 
System/370 Console or the 2740, if 
available. Diagnostic information 
from the 2715 remote goes to the 2740 
Data Communications Terminal. 



Pulse Count Transactions 

All pulse count transactions initiated from 
a System/370 have a control byte of X'FC* 
in byte 1 of the 8-byte transaction header. 
Eyte 2 contains the area station address 
and byte 3 the counter address (in hexadec- 
imal) . Particular kinds of pulse counter 
operations are specified in the transaction 
text or data. The first byte of the tran- 
saction text is the counter control byte. 
This byte specifies the counter operation 
requested. Only one data byte (the counter 
control byte) is required for all counter 
operations except the Set functions, the 
Read and Set functions, and the Read Group 
functions. 

For the Read Group and Read Group Resi- 
dual operations, two additional data bytes 
must follow the counter control byte. 
These two bytes are the EBCDIC value of the 
last counter in the group. The upper limit 
of the last counter is 63, since there can 
be only 63 counters on a single area 
station. 

For the Set functions and the Read and 
Set functions, five additional data bytes 
must follow the counter control byte. 
These five bytes contain the EBCDIC value 
to which the counter is to be set. The 
value must be between and 29,999 in 
EBCDIC. These five additional data bytes 
are required for the following operations: 

• Set Counter 

• Set Counter and Set No-Count Testing 
and Reset Unassigned Production Testing 

• Set Counter and Reset No-Count Testing 
and Set Unassigned Production Testing 

• Set Counter and Reset all count testing 
functions 

• Read and Set 

• Read and Set and Set No-Count Testing 
and Reset Unassigned Production Testing 

• Read and Set and Reset No-Count Testing 
and Set Unassigned Production Testing 

• Read and Set and Reset all count test- 
ing functions 

The counter control operations and the 
hexadecimal representation of the counter 
control bytes are shown in Figure 44. 



Overflow Interrupt 

An overflow interrupt message is trans- 
mitted to the user-defined routing indica- 
tion (specified in the ASCTR macro instruc- 
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tion) whenever any counter reaches a value 
of 30,000. 

Power Interrupt 

The reporting of initial power-up or power 
failure at an area station results in a 
power interrupt message being transmitted 
to the user-defined routing indication 
(specified in the ASCTR macro instruction) . 
Until the power interrupt is reported from 
the area station, all counter transactions 
will be incomplete transactions. 



EXTERNAL ALARM CONTACT FEATURE 

The Area Station External Alarm Contact 
feature is provided as a method of alerting 
the operator at the area station level that 
an alarm condition exists in his area. 
This feature on a 2791-1 or 2793-1 Area 
Station allows the attachment of an extern- 
al device at the area station 1053 printer, 
which can make use of a contact closure to 
operate some kind of external alarm whenev- 
er the EBCDIC character for BELL (X^F* ) is 
received at the area station 1053 printer. 

Three types of alarm messages can ori- 
ginate from either the System/370 f the 2740 
attached to the 2715, or an area station or 
data entry unit. The three types of mes- 
sages are: 

1 . Alarm 

2. Text 

3. Alarm and text 

The alarm message causes the 2791/2793 
alarm hardware to be activated. The text 
message consists of data that is printed on 
the 1053 printer. The alarm and text mes- 
sage consists of data that causes the 2791/ 
2793 alarm hardware to be activated and 
that causes the data to be sent to the 1053 
printer. If the 1053 is not available, 
alarm or alarm and text messages are routed 
to the CPU. The 2791/2793 alarm hardware 
is activated for the alarm or alarm and 
text messages whether or not the 1053 
printer is available. Text messages 
initiated at the System/370 or 2740 must be 
supplied by the user with the transaction 
request. Area station and data entry unit 
requests may have text supplied as explicit 
or implicit text. 

The alarm messages initiated from the 
System/370 are handled as normal System/370 
to area station 1053 printer output mes- 
sages. The transaction control byte 
defines the type of alarm message, as 
follows: 



Control Byte Value 

X'CD' 

X'CE* 

X'CF' 



Alarm Message Type 

Text 

Alarm 

Alarm and text 



The data can be any normal user data. 
For alarm or alarm and text messages, the 
2715 generates the alarm character to send 
to the 1053 (the user does not have to do 
this) . 

The alarm message initiated from the 
2740 is handled as a special control requ- 
est. This request must be coded as 
follows: 

r T T T T T 1 

I I I I I II 

| BID j Dl J D2 | D3 | Text | EOT | 
i x x x x x J 

where: 

BID is the 2740 BID key. 

Dl is the type of request and can have 
the following values: 

Y for alarm message. 

Z for text message. 

X for alarm and text message. 

D2 and D3 represent the area station 
address to which the message is to be 
sent (decimal 00 to 99). 

Text is any user text up to 127 
characters. 

EOT is the 2740 EOT key. 

Messages originating at an area station 
or data entry unit are initiated by an 
input transaction in conjunction with the 
2715 user tables. The implicit or explicit 
area station address, if other than the 
area station address of the originating 
station, indicates that two messages will 
be created by the 2715. One message will 
be the alarm message that will be sent to 
the area station that initiated the tran- 
saction. The second message will contain 
the data to be routed to some other area 
station 1053 printer. This second message 
will not be an alarm message. If, however, 
the user desires to send alarm and text to 
another area station, the first two charac- 
ters of the text must be the alarm, text, 
or alarm and text characters. If the 
implicit or explicit area station address 
is the address of the transaction initia- 
tor, then only an alarm message will be 
generated by the 2715. Message routing and 
implicit text will be specified in the 
transaction list header for messages ori- 
ginating at an area station or data entry 
unit. The first two bytes of implicit text 
must define the type of alarm message 
desired. For alarm messages, these bytes 
will be deleted from text sent to the 1053. 
The following table shows the format of the 
first two bytes of the implicit text for 
alarm messages. Implicit text is specified 
in the 2715 user tables in the MSG operand 
of the last ASLIST or DEULIST macro or the 
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CTRLIST macro in a defined transaction. 
The user must multipunch a 0-7-8-9 sequence 
for the EBCDIC BELL character specified in 
the table. The SPACE character indicates 
that nothing is punched in this column of 
the card. 



Message Type 

Alarm 

Text 

Alarm and Text 

2740 TRANSACTIONS 



First Byte 
BELL 
SPACE 
BELL 



Second Byte 

SPACE 

BELL 

BELL 



Following these six printed characters 
[two for each byte] is a space. Bytes 
7 through 10 are printed as they appear 
in main storage. There will be a total 
of 11 characters printed, including the 
space. ) 



Data: The maximum length of the actual 
data text is 118 bytes if the margins 
of the 27 40 are set to maximum printing 
space. 



The 2740 Communications Terminal is a stan- 
dard feature on the 2715 remote and an 
optional feature on the 2715 local. It is 
used with the 2715 as both an input 
(inquiry, control) and output (response, 
error logging) device. 

A message originated by the System/370 
and destined for the 2740 terminal has a 
maximum length of 128 bytes (two-byte mes- 
sage header, eight-byte transaction header, 
118 bytes of text) . These messages have 
the following format: 

• Bytes 1 and 2: Message header (these 
bytes are not printed on the 2740) . 

• Bytes 3 through 10 : Transaction header 
(Bytes 4, 5, and 6 are printed in hex. 



A message entered from the 2740 may be 
formatted by the 2715 as a normal 2740- 
initiated request and routed directly to 
the System/370 user or will be treated as 
acontrol request. The 2715 will format a 
standard eight-byte transaction header, 
inserting the first character entered from 
the keyboard in the control byte of the 
header. If this byte is numeric, a four- 
byte time stamp will be added, subsequent 
characters from the 2740 will be inserted 
as text, and the message will be routed to 
the System/ 370. 



If the first character entered from the 
2740 is not numeric, the 2715 will not add 
a time stamp and will treat the message as 
a control request . 
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IBM 2770 DATA COMMUNICATION SYSTEM — PROGRAMMING CONSIDERATIONS 



SYSTEM CONFIGURATION 

An IBM 2770 can communicate with a System/ 
370 over a nonswitched line (point-to-point 
or multipoint) or a switched line. The 
2772 Control Unit must be equipped with the 
Multipoint Data Link Control feature for 
use on a multipoint line. A control unit 
for use on a switched line can be equipped 
with an Automatic Answering feature, if 
desired. 



TRANSMISSION CODES 

The IBM 2770 communicates with the System/ 
370 using either of two transmission codes, 
EBCDIC or USASCII, as selected when the 
2770 is ordered. If the 2770 is equipped 
with the EBCDIC Transparency feature, text 
data can contain any of the 256 EBCDIC bit 
patterns. That is, when text data is sent 
in transparent mode, the EBCDIC bit pat- 
terns representing data link control and 
terminal control characters are treated 
simply as data, and do not cause the con- 
trol functions usually effected by these 
bit patterns to occur. This feature allows 
transmission of various kinds of raw data, 
such as packed decimal numbers, floating- 
point numbers, and machine-language pro- 
grams. When transmission is in nontrans- 
parent mode, however, the data link and 
format control characters are recognized as 
such, and thus cannot appear as normal 
text. 



select correctly the character sequences 
you need. These sequences are given below. 



Point-to-Point 

In point-to-point communication, you may 
perform component selection by one of two 
irethods. The output device may be selected 
by the Job Select Switch on the 2770 opera- 
tor control panel, or it may be selected by 
the transmission of a device control char- 
acter. If more than one device is assigned 
by the Job Select Switch, the device con- 
trol character is mandatory. DC1, DC2, and 
DC3 are the device control characters for 
output devices attached to output adapters 
1, 2, and 3. 

Device control characters for point-to- 
point lines may be sent as separate message 
blocks, or accompanied by text data, in the 
format STX DCx (text) ETB, or STX DCx 
(text] ETX. You code this message block in 
the output area referenced by a WRITE macro 
instruction. A device control character 
can be sent only as a nontransparent block, 
and it must be the first block of a mes- 
sage, that is, following EOT or the first 
block of conversational reply. 

The polling function is not used for a 
2770 on a point-to-point line, since mes- 
sage transmission from terminal to computer 
is initiated only by the terminal. 



TERMINAL POLLING AND SELECTION 

In order to activate a terminal so that 
data transmission can occur, the central 
computer transmits on the communications 
line a specific character sequence that 
identifies the input or output component 
(and in the case of multipoint lines, the 
terminal as well) from which data is to be 
received, or to which data is to be sent. 
This procedure is called polling when an 
input device is involved, and selection 
when an output device is involved; the 
character sequences are called polling 
sequences and selection sequences. Specif- 
ic polling and selection sequences are 
assigned to 2772 Control Unit input and 
output adapters, rather than to specific 
device types, as is the case with some 
other terminal types. The specific 
adapter-to-device correspondence is estab- 
lished by the customer engineer when the 
2770 system is installed. You must be 
aware of the correspondence in order to 



Multipoint 

Message transmission between computer and 
2770 via a multipoint line is intiated only 
by the computer, using a Read Initial or 
Write Initial operation. You code polling 
and selection sequences in terminal lists 
(called polling lists for polling 
sequences, and addressing lists for selec- 
tion sequences). (The terms selection and 
addressing are used here synonymously.) 
The DFTRMLST macro instruction is used to 
create the terminal lists. The READ or 
WRITE macro instruction that initiates mes- 
sage transmission sends the polling or 
selection sequences contained in the list. 

Polling and selection sequences consist 
of four characters. The first is the ter- 
minal address, which may be any alphabetic 
character; it identifies an individual ter- 
minal and is set by the customer engineer 
when the terminal is installed. In a poll- 
ing sequence, this character must appear in 
uppercase, for example, A. When in a 
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selection sequence, it must be lowercase, 
for example, a., 

The second character is always identical 
to the first. The third character in the 
sequence is a component polling or selec- 
tion character. The characters DC1, DC2, 
and DC 3 select the output devices attached 
to output adapter 1, 2, and 3, respective- 
ly. The characters 5, 6, and 7 poll the 
input devices attached to input adapters 1 
(keyboard), 2, and 3; causes a general 
poll, resulting in receipt of data from any 
ready input device. 

The fourth character in the sequence is 
always ENQ (inquiry), which elicits a 
response from the terminal control unit 
that indicates whether the polled or 
selected component is ready. 



TEMPORARY TRANSMISSION DELAYS 

In communication between the IBM 2770 and 
the central computer, message transmission 
may need to be delayed because of condi- 
tions at the 2770. The 2770 signals the 
central computer that delay is necessary by 
sending one of several data link control 
sequences, th€> specific one depending on 
the reason for the delay. These sequences, 
and the automatic BTAM response or appro- 
priate user program response to each, are 
as follows. 



2770 Unable to Send (STX ENQ) 

When the 277 is unable to send (STX ENQ) 
during transmission of text from the 2770 
to the central computer, the 2770 becomes 
temporarily unable to transmit. It sends a 
TTD sequence (STX ENQ) in lieu of text. 
Upon receiving this sequence, BTAM automat- 
ically transmits a NAK character. Transmis- 
sion of STX ENQ and NAK alternates until (1) 
the 2770 once again is able to transmit, in 
which case it resumes transmitting text, or 
until (2) the BTAM retry count including 
errors as well as TTD's reaches seven, or 
(3) until EOT is transmitted by the 277 
(STX ENQ followed by EOT is a forward abort 
sequence) . In cases 2 and 3 BTAM turns on 
bit 7 of DECFLAGS and posts a completion 
code of X'41'. When a X'41' is posted with 
bit seven set in DECFLAGS, the application 
should transmit EOT and reestablish contact 
at a later time. (If the source of the 
incoming data is an IBM 50 Magnetic Data 
Inscriber cartridge, it may be desirable 
for the user program to send NAK characters 
until a total of about 60 seconds has 
elapsed from the time the STX ENQ sequence 
was received. The MDI cartridge requires 
45 seconds to rewind, and several seconds 
are required for the terminal operator to 
mount a new cartridge so that transmission 
can resume . ) 



2770 Unable to Receive Text (WACK) 

At the time the 2770 receives an ENQ or 
selection characters from the central com- 
puter, or after it has already received one 
or more message blocks, it may be unable 
temporarily to receive text into the buf- 
fer. This condition occurs when the cur- 
rent contents of the buffer are being tran- 
sferred to an output device. When this 
happens, the 2770 sends a WACK sequence 
instead of the usual alternating 
acknowledgment . 

Upon receiving the WACK, BTAM turns on 
bits and 1 of DECFLAGS and posts a com- 
pletion code of X'7F*. The user program 
should check DECFLAGS for this response, 
and if WACK was received, should send an 
ENQ character (as by a WRITE Inquiry 
macro) . The ENQ should be. sent regardless 
of whether the WACK was received in 
response (1) to text or (2) to the initial 
ENQ character (nonswitched point-to-point 
line) or ID ENQ sequence (switched point- 
to-point line). For a multipoint line, 
however, the ENQ should be sent only if the 
WACK was received in response to text. If 
it was received in response to initial 
selection, the user program should resend 
the selection characters, that is, reissue 
the WRITE macro. To determine whether the 
WACK was received in response to text or 
selection, examine the DECTPCOD field of 
the DECB. If it contains X f 06', the WACK 
was received in response to selection. If 
it does not contain X*06*, the WACK was 
received in response to text. 

The user program should be arranged to 
keep responding to WACK sequences in this 
iranner until the 2770 responds normally or 
until the user program wishes to abandon 
communication with the 2770 for the time 
being. In the latter case, the user pro- 
gram should issue the appropriate macro to 
break off transmission. 



2770 Wishes to Transmit (RVI) 

At the time the 2770 receives a selection 
sequence from the central computer (multi- 
point line only) , it may signal the central 
computer that it wishes to transmit instead 
of receive. To do this, it sends an RVI 
sequence instead of an ACK-0 (the normal 
response to selection) BTAM accepts the RVI 
in lieu of the ACK-0, turns on bits 1 and 6 
of DECFLAGS, and posts a completion code of 
X*7F*. The user program should check 
DECFLAGS for this response and proceed as 
follows. 

When the RVI is received in response to 
selection, the program should issue a READ 
Initial macro if it wishes to allow the 
2770 to transmit. 
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TERMINAL FUNCTION CONTROL 

There are six characters in each code 
(EBCDIC and USASCII) that control terminal 
functions. These are sometimes referred to 
as end-to-end control characters (as dis- 
tinguished from data link control 
characters) . 

• EM (end-of-mediuni) 

This character is used to indicate the 
end of data on paper or magnetic tape. 
It is transmitted as data and repro- 
duced in paper tape at the 1018 paper 
tape punch. (It is not sent to the IBM 
50 Magnetic Data Inscriber, as this is 
an input device only. ) 

• IRS (Interchange Record Separator) 

(EBCDIC) 
RS (Record Separator) (USASCII) 
This character is used to indicate the 
end of data in a punched card. When 
the contents of a card are read into 
the buffer, the control unit inserts an 
IRS (RS) character into the buffer fol- 
lowing the last data character read 
from the card. If the contents of a 
buffer are sent to the paper tape 
punch, the IRS (RS) characters are also 
punched in the tape, so that cards can 
be punched from the tape. When sending 
data from the buffer to the card punch 
or printer, each IRS (RS) character 
encountered in data causes the control 
unit to command the card punch to eject 
a card, or the printer to perform the 
new line function. 

• NL (New Line) 

The NL character defines a print line 
when data is to r>e printed. If data 
containing NL characters is sent to a 
card punch or paper tape punch, the NL 
characters are punched. 



(Device Control) 



• DC1 
DC2 
DC 3 

These characters are used to activate 
specific devices attached to the 2772 
control unit. Their use is explained 
under Terminal Polling and Selection. 

• ESC (Escape) 

This character and a defined graphic 
character that follows it are called an 
escape seguence. Escape sequences are 
used to control formatting of data on 
output devices, as explained under 2213 
Printer and 2265 Model 2 Display 
Station. 

• VT (Vertical Tab) 
FF (Forms Feed) 

These two characters are used to con- 
trol formatting on the 2213 printer, as 
explained under 2213 Printer. 



Placing terminal function control 
characters in message text is not a BTAM 
function; they must be placed there by the 
terminal operator, programmer, or preparer 
of input media (for example, cards, tape). 



2213 Printer 

Vertical forms control for the printer may 
be regulated by a carriage control tape 
contained within the printer, or by control 
commands consisting of escape sequences 
(ESC followed by a defined character). An 
escape sequence specifies the number of 
line spaces to be skipped following print- 
ing of the line in which the escape 
sequence appears, or specifies the channel 
number of the carriage control tape that is 
to govern forms motion. The escape 
sequence must be contained in the first two 
positions of a record sent to the printer. 
These two characters are not printed on the 
forms. The escape sequences and their 
corresponding functions are given in Figure 
15. 



1 1 1 |Skip to | 
1 1 1 | Carriage! 
1 | j | Control | 
| EBCDIC | USASCII | Forms Motion | Tape | 
j Sequence! Sequence | After Printing |Channel j 
j. + + x j, 

| ESC / | ESC Q | Single space | | 
j. x x X J, 

J ESC S J ESC R |Double space | | 
f + x x ., 

| ESC T | ESC S | Triple space | | 
^ x x x j, 

| ESC A | ESC A | | 1 j 

j. X + X 4, 

| ESC B | ESC B | j 2 | 

j. X X + 4 

| ESC C ! ESC C | | 3 | 
J. X X X -J 

| ESC D | ESC D | 1 4 ! 
|. X X X 1 

| ESC E | ESC E | | 5 | 

j. x x x j. 

| ESC F | ESC F | | 6 | 
|. + X + J, 

| ESC G J ESC G | | 7 j 
j. X X X J, 

| ESC H | ESC H | | 8 | 
!■ X + + 4 

| ESC I | ESC I | | 9 | 
J. + X + 4, 

| ESC J j ESC J | | 10 | 

j. x + x j. 

| ESC K | ESC K | | 11 | 
f X + + 4. 

| ESC L j ESC L | | 12 | 
L _ J. J. _ J. J 


r T T — T 1 

| ESC M | ESC M |Space suppress | | 

L_ _ X X_ _ X- _ _ J 

Figure 45. IBM 2213 Vertical Forms Control 



Escape Sequences 
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Vertical forms control may also be 
actuated by the Vertical Tab (VT) charac- 
ter, which causes skip-to-channel-2 of the 
carriage control tape and the Forms Feed 
(FF) character, which causes s kip-to- 
channel- 1. These two characters differ in 
effect from the escape sequences in that 
forms motion takes place immediately upon 
detection of the VT or FF character, 
whereas forms motion caused by detection of 
an escape sequence does not occur until the 
entire line containing the escape sequence 
has been printed. 



2265 Model 2 Display Station 

Two 2265 Model 2 Display Station control 
functions are activated by two- character 
escape sequences contained within the roes- 
sage data sent to the display station via a 
Write operation. These functions and their 
associated escape sequences are: 



Erase/Write (ESC u) 

Write at Line Address (ESC • ) . 

The escape sequence must be the first 
two characters following the STX character 
that begins a message or message block. 
Both the ESC U and ESC ' sequences may be 
contained in a single message (though not 
in the same block) . 



| Function 




Escape 


Sequence 


L__ ... 












t 








| Erase Screen 




ESC U 
















| Erase screen 




ESC U 


(text) 




| and display 










j message 










L 




















| Write at 




ESC • 


x (text) 


| Line Address 










j. 


-+- 








| Display Line 










| Number 




Address Code 








15 




12 






lines 


lines 


| 1 




1 




1 


1 2 




2 




2 


1 3 




3 




3 


1 4 




a 




H 


1 5 




5 




5 


1 6 




6 




6 


| 7 




7 




7 


1 8 




8 




8 


1 9 




9 




9 


1 io 




A 




A 


1 11 




B 




B 


| 12 




C 




C 


1 13 




D 






1 l^ 




E 






1 15 




F 







l x_ J 

IBM 2265 Erase and Write-at- 
Line Address Control Characters 



Figure 46. 



Erase/Write : To erase the screen of a dis- Conversational Mode 
play station the station must be selected 
and the program must send: 



STX ESC U (text) ETX or 

STX ESC U (text) ETB. 

The screen is erased, the cursor is 
positioned at the first available display 
position of the screen (upper left corner) , 
and the data represented by (text) is 
displayed. 



Write at Line Address : This control func- 
tion allows the program to select a specif- 
ic line where the data containing the 
escape sequence is to be displayed. The 
program must send: 

STX ESC ■ x (text) ETX or 

STX ESC • x (text) ETB 

where x represents the line address. The 
line address is a hexadecimal code specify- 
ing the display line where the message data 
is to begin. Display line numbers and 
corresponding line addresses are shown in 
Figure U6. 



This special feature enables the 2772 to 
accept a text response to an inquiry 
without having to be selected before 
receiving the response. With this feature, 
the user may include in his BTAM program 
the coding required to initiate a Write 
Continue operation to the 2770 immediately 
following the last block of data received 
from the same 2770 on a Read operation. 
This Write Continue operation may be fol- 
lowed by other Write Continue operations to 
the same 2770. To read more data from the 
2770, the user must issue another READ Ini- 
tial macro to poll the input unit again. 



FIELD-CONTROL OPERATION 

This special feature permits operator or 
program entry of three field modifiers that 
can be entered individually in any given 
character location in the display buffer. 



Protected Data 

Two of the three field modifiers provided 
ty the Field-Control Operation special fea- 
ture serve to identify the beginning and 
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end of a field of data that is to be pro- 
tected. They are: 

• Protected-Data-Field Modifier (ESC Z): 
The presence of this modifier in the 
display buffer identifies the start of 
a field of protected data and prevents 
manual erase or over-write of the data. 



zontal Tab (HT) character to provide for- 
matting. The HT character is stored and 
will be read back to provide printer for- 
matting and/or better communications line 
efficiency. If an HT is sent and there are 
no Tab Field Modifiers, the cursor is posi- 
tioned at the beginning of the next line. 



• End-Field Modifier (ESC 9): The pre- 
sence of this modifier in the display 
buffer identifies the end of a 
protected-data field and automatically 
terminates the field-control operation. 

These field-control modifiers are 
entered into the system via escape (ESC) 
sequences. The characters Z and 9 are 
stored in the display buffer and they are 
reproduced on the display screen as: 

Protected Data Field Modifier — 
(End- Field Modifier — ) 

When the ( and ) symbols are not preceded 
by ESC, they may be used as normal data. 
During a Read or Write operation, if the 
display cursor encounters a Protected-Data- 
Field Modifier it moves over the field 
until it reaches the End-Field Modifier. 
The cursor then locates in the next display 
position beyond the End-Field Modifier and 
normal Read or Write operation continues. 



Tab Set 

The presence of the Tab Set Character Field 
Modifier in the display buffer identifies 
the position as a Tab Set character loca- 
tion. When a Horizontal Tab (HT) is 
received from the central computer or from 
the keyboard, the HT character is stored in 
the first unprotected character space, and 
then the cursor automatically advances to 
one character space beyond the next Tab Set 
character . 

The Tab Set Character Field Modifiers 
are entered into the system via a format 
message. The first data in this message 
should be ESC HT, to set up a tab-set 
sequence. Each HT following this repre- 
sents a Tab Set character. A vertical bar 
is displayed in each line from and includ- 
ing the line containing the cursor to the 
bottom of the screen for each Tab Set char- 
acter. This character cannot be written 
within a protected field. Caution must be 
exercised to see that the cursor is not 
positioned in a protected field when a Tab 
Set character is to be written. The tab- 
set sequence is not terminated until the 
New Line (NL) character is entered. 

Once this format message has been 
stored, messages may be transmitted without 
spaces, as they need contain only the Hori- 



RECORD FORMATS 

The basic 2772 control unit has two 128- 
byte buffers. As a special feature the 
2772 can have buffers of 256 bytes each. 
The basic 2772 can send or receive one mes- 
sage block per transmission. Thus, in non- 
transparent mode, messages appear on the 
line in the format: 



r t r i 

|STX|...text...j ETB (or ETX) j 
i J. x J 



In transmission to the 2772, only the text 
portion of the message is transferred to 
the output device. The definition of text 
depends on the type of device. 



For the paper tape punch, text consists 
of the data characters and any end-to-end 
control characters present in the data. 
For the card punch, any escape sequences, 
NL and EM characters are considered text 
and do not cause ejecting of a card from 
the punch; the IRS (RS), ETB, and ETX do 
cause card ejection. For the printer, the 
NL and IRS (RS) characters and escape 
sequences are not considered part of text. 



In nontransparent mode, the maximum 
record length is 128 characters for the 
basic 2772 and 256 characters for the 2772 
with the Expanded Buffer feature. The STX, 
ETB, ETX, and the device control characters 
(DCx) do not go into the buffer. Records 
exceeding the buffer size cause an I/O buf- 
fer overrun error, which causes the 2772 to 
send a NAK in response to the received 
block. BTAM will retry the Write operation 
seven times, then post the operation com- 
plete with error. 



Each IRS (RS) character in data trans- 
ferred from the buffer to the card punch 
causes the card currently being punched to 
be ejected and a new card fed. This action 
also occurs if no IRS (RS) character has 
been detected by the time 80 consecutive 
data characters have been sent to the 
punch. 



Printing : Data to be sent to the printer 
iray be formatted into print lines of 132 
characters or less by the use of IRS (RS) 
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or NL characters. If neither of these 
characters is detected by the time 132 
characters have been sent to the printer, 
successive data is printed on the next 
line. The new line function also occurs if 
the printer reaches a tab stop. 



Display : Records exceeding the length of 
the display line are not truncated, but are 
continued on the next display line. In 
nontrans parent node, variable length re- 
cords may be sent to the 2772. The number 
of records per transmission is not 
restricted except by buffer size. The STX, 
ETB, ETX, and DCx characters do not enter 
the buffer. All other characters, includ- 
ing escape sequences and end-to-end control 
characters, occupy positions in the buffer. 
In transparent mode, variable length blocks 
may be sent to the 2772. A block consists 
of one record, since end-to-end controls 
are not recognized in transparent mode. 
The length of the block may not exceed the 
buffer size. 



Transmission of Blank Cards 

Basic 2772 : In either transparent or non- 
transparent mode, blank cards are read into 
the buffer and transmitted just as are 
cards containing data. 

2772 with Expanded Buffer Feature : In non- 
transparent mode, data from the card reader 
is packed. That is, each card is read into 
the buffer, then scanned from column 80 
backward until a data character is reached. 
The control unit then inserts an IRS (RS) 
character in the buffer at the next posi- 
tion. The next card is read into the buf- 
fer beginning at the next following posi- 
tion. Thus, card definition is maintained 
while unnecessary blanks at the end of the 
card are deleted. For this reason, the 
2772, when equipped with the Expanded Buf- 
fer feature, does not transmit blank cards, 
in nontransparent mode. In transparent 
mode, data is not packed in the manner 
indicated above, and blank cards are 
transmitted. 
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IBM 2972 GENERAL BANKING TERMINAL SYSTEM — PROGRAMMING CONSIDERATIONS 



Communication between the central computer 
and the station control unit of an IBM 2972 
General Banking Terminal system employs an 
eight- bit transmission code and BSC multi- 
point data link control procedures. The 
makeup of the character set is as follows. 

BSC Data Link Control Characters 

The transmission code bit patterns for the 
data link control characters are identical 
to the EBCDIC bit patterns for the same 
characters. The 2972 station control unit 
can send and can receive and respond func- 
tionally to, these data link control chara- 
cters and sequences: 



Graphic and Terminal Function Control 
Characters 

Graphic characters are the alphabetic and 
numeric characters and the special symbols 
that can be printed on the 2980 teller and 
administrative stations, or that these sta- 
tions can send to the central computer. HT 
(horizontal tab) , NL (new line) , and Pass- 
book Index are examples of terminal func- 
tion control characters. The 2972 station 
control unit passes graphic and control 
characters between the communications line 
and the 2980s connected to the station con- 
trol unit. 



Character 


Bit Pattern (Hex) 


STX 


02 


ETX 


03 


DLE 


10 


ETB 


26 


ENQ 


2D 


SYN 


32 


EOT 


37 


NAK 


3D 


ACK-0 


1070 


ACK-1 


1061 


WACK 


106B 


RVI 


107C 



The 2972 does not send the SOH CX , 01 , > and 
ITB (X*1F*) characters. However, it can 
receive them, but does not respond func- 
tionally to them. (This provides compati- 
bility with other types of remote BSC sta- 
tions that may be attached to the same mul- 
tipoint line.) 



The character sets for the different 
models of the 2980 vary in the specific 
characters they include and in the indivi- 
dual transmission code bit patterns that 
represent the characters. For example, the 
bit pattern X'D3' represents a 6, in numer- 
ic shift, and L, in alphabetic shift, for 
the 2980 Model 1. For the Model 4, howev- 
er, the same bit pattern, X'DS*, represents 
L, in numeric shift, and Q, in alphabetic 
shift. 



BTAM does not provide translation tables 
for user-program translation between EBCDIC 
and transmission codes. Appendix K shows 
the correspondence between each transmis- 
sion code bit pattern and the characters 
that bit pattern represents, for each of 
the models (1, 2, and 4) of the 2980 
stations. 
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IBM 3270 INFORMATION DISPLAY SYSTEM — PROGRAMMING CONSIDERATIONS 



The control units, display stations, and 
printers that make up the IBM 3270 Informa- 
tion Display System are supported by BTAM 
under control of OS/VS. Support for local 
or remote 3270 display systems or both can 
be included in BTAM. For helpful informa- 
tion on programming the 3270, see Intro^ 
£ u 2£ion_to_Pro2ramming__the IBM_3270, GC27- 
6999. 



2 2 .7 0_DEVICES_SUPPORTED 

BTAM supports the following remote 3270 
control units and their attachable devices: 

. 3271 Control Unit, Models 1 or 2 

. 3274 Control Unit Model IC (BSC) 

. 3275 Display Station 

. 3276 Control Unit Display Station 

The remote 3270 control unit must be 
attached to either a 2701 Data Adapter 
Unit or 2703 Transmission Control Unit or 
3704 or 3705 in emulation mode. 

BTAM supports the following local 3270 
Control Units and attachable devices: 

. 3272 Control Unit, Model 1 or 2 

. 3274 Control Unit, Model IB or ID 

The local 3270 control unit must be attached 
to a selector, multiplexer, or block 
multiplexer channel. 

Throughout this publication, local 3270 
refers to a 3272 Model 1 or 2 Control 
Unit or to a 32 74 Model IB or ID Control 
Unit with attachable devices. A remote 
3270 refers to a 3271 Model 1 or 2 Con- 
trol Unit, 3274 Model lC Control Unit, 
3275 Display Station, or 3276 Model 1, 2, 
3, 4 Control Unit with attachable devices. 
Except where noted, references to the 3272 
also apply to the 3274 Model IB and ID. 
References to the 3271 also apply to the 
3274 Model IC and the 3276. Where functions 
apply to some 3270 devices and not others, 
these exceptions are noted. The following 
summerizes thejse exceptions: 



FUNCTION 


APPLIES TO 


Local 


Remote 


Alternate 
Buffer Size 


3274 Models 
IB and ID 


3274 Model 
IC 




Write 

Structured 

Field 


3274 Model ID 


3274 Model IC 
(with Write 
Structured 
Field capabil 


ity) 


Prepare 
to Read 


3274 Model ID 


None. 





The following 3270 control units are supported 
by BTAM as 3272 and 3271 Control Units: 



CONTROL UNIT 


ATTACHMENT COMPATIBLE WITH 


3274 IB, ID 


Local 3272 


3274 IC 


BSC 3271 


3276 1,2,3,4 


BSC 3271 


For more 


information about remote and 


local 3270 configurations, see IBM 3270 


Information 


Display System, Library 


Users Guide . 




3270 CAPABILITIES SUPPORTED 



BTAM supports the following remote and 
local 3270 capabilities: 

• Read modified fields from device buffer 

• Write to device buffer 

• Erase and write to device buffer 

• Transmit structured field data to a 
device 

• Erase and write alternate size device 
buffer 

• Erase all unprotected fields in device 
buffer 

• Read modified fields from device buffer 
from position 

• Read from device buffer 

• Read from device buffer from position 
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In addition, BTAM supports the remote 3270 
capability of copying from the buffer of 
one remote device into the buffer of anoth- 
er remote device on the same control unit. 

A remote 3270 display system can consist 
of the remote 3270 control unit and devices 
attached to nonswitched multipoint BSC 
lines or the 3275 station equipped with the 
Dial feature attached to switched point-to- 
point lines or both. Nonswitched and 
switched systems are discussed separately 
in this chapter. 

For remote 3270 display systems, capabi- 
lities are used through a combination of 
BTAM READ and WRITE macro instructions for 

nonswitched multipoint BSC stations (or 
switched point-to-point BSC stations for 
the 3275 with dial feature) and data link 
and end-to-end control characters in output 
messages. For local 3270 display systems, 
capabilities are used through local types 
of BTAM READ and WRITE macro instructions 
(specified by means of the optype operand). 



BTAM provides additional capabilities for 
application programs to use the large (alter- 
nate) display or printer size of the devices 
attached to the 3274 IB, 1C and ID and the 
3276 1,2,3,4 Control Units. 

BTAM supports the Prepare to Read operation 
in OS/VS1 and 0S/VS2 MVS for the 3274 Model 
ID Control Unit. Prepare to Read permits 
overlap of host and control unit activity 
and also frees both the channel and control 
unit resources. For more information refer 
to IBM 3270 (Local) Information Display 
System — Programming Considerations, Pre- 
pare to Read Operations in this book. 

BTAM supports the Write Structured Field oper- 
ation in 0S/VS1 and OS/VS2 MVS for the 3274 
Model ID Control Unit and the 3274 Model 1C 
Control Unit. Write Structured Field allows 
application programs to transmit structured 
fields to those devices. 

For more information about remote and 
local 3270 capabilities, see IBM 327 

Information Display System, Library 
Users Guide. 



Control 




EBCDIC 


ASCII 


Unit 


Address 


Hexadecimal 


Hexadecimal 


Number 


Character 


Representation 


Representation 





SP 


40 


20 


1 


A 


CI 


41 


2 


B 


C2 


42 


3 


C 


C3 


43 


4 


D 


C4 


44 


5 


E 


C5 


45 


6 


F 


C6 


46 


7 


G 


C7 


47 


8 


H 


C8 


48 


9 


1 


C9 


49 


10 


t <D 


4A 


5B 


11 




4B 


2E 


12 


< 


4C 


3C 


13 


( 


4D 


28 


14 


+ 


4E 


2B 


15 


1 


4F 


21 


16 


& 


50 


26 


17 


J 


Dl 


4A 


18 


K 


D2 


4B 


19 


L 


D3 


4C 


20 


M 


D4 


4D 


21 


N 


D5 


4E 


22 


O 


D6 


4F 


23 


P 


D7 


50 


24 


Q 


D8 


51 


25 


R 


D9 


52 


26 


•' (]) 


5A 


5D 


27 


S 


5B 


24 


28 


* 


5C 


2A 


29 


) 


5D 


29 


30 


* 


5E 


3B 


31 


— ' 


5F 


5E 


Figure 
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Polling List Entries and for 
Identification in Input Mes- 
sages (with Hexadecimal Repre- 
sentations in EBCDIC and ASCII) 



DEFINING COMMUNICATIONS LINE GROUPS 

See "Defining Communications Line Groups" 
in the general section "Defining the Tele- 
processing System," and see Appendix D. 

The UNIT operand of the IODEVICE system 
generation macro instruction must specify 
BSC3 for the nonswitched 3270 display sys- 
tem. The DCB macro instruction operands 
that apply to the nonswitched 3270 display 
system are: DSORG, MACRF, DDNAME, BUFNO, 
BUFL, BUFCB, EXLST, BFTEK, LERB, EROPT, 
DEVD, MODE, and CODE. 



NONSWITCHED REMOTE 3270 DISPLAY SYSTEM 

Nonswitched remote 3270 display stations 
and printers are supported by BTAM as BSC 
stations connected to nonswitched multi- 
point lines using either EBCDIC or ASCII 
transmission code. 



DEFINING AND MODIFYING TERMINAL LISTS 

See "Defining and Modifying Terminal Lists' 
in the general section "Defining the Tele- 
processing System," see "Defining Terminal 
Lists" under the heading "BSC Nonswitched 
Multipoint Operation" in the section "BSC 
Read and Write Operations," and see Appen- 
dix A. 
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EBCDIC 
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Unit 


Address 


Hexadecimal 
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Number 


Character 


Representation 
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_ 


60 




2D 


1 


/ 


61 




2F 


2 


S 


E2 




53 


3 


T 


E3 




54 


4 


U 


E4 




55 


5 


V 


E5 




56 


6 


w 


E6 




57 


7 


X 


E7 




58 


8 


Y 


E8 




59 


9 


Z 


E9 




5C 


10 


(\) 


6A 




7C 


11 


t 


6B 




2C 


12 


% 


6C 




25 


13 
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5F 


14 


y 


6E 




3E 


15 


? 


6F 




3F 


16 





FO 




30 


17 


1 


Fl 




31 


18 


2 


F2 




32 


19 


3 


F3 




33 


20 


4 


F4 




34 


21 


5 
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35 


22 


6 


F6 




36 


23 


7 


F7 




37 


24 


8 
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38 


25 


9 
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39 
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3A 


27 


# 
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23 


28 
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40 


29 


' 
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27 


30 


= 
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3D 


31 


" 


7F 




22 


Figure 48. 
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for 



Defining Terminal Lists 

The DFTRMLST macro instruction is used to 
define terminal lists for the remote 3270 
display system. 

Each control unit has a one- character 
polling address (see Figure 47) and a one 
character selection address (see Figure 
48) . Each display station or printer has 
its own one-character address for specific 
polling and selection (see Figure 49), and 
all devices share a one-character address 
for general polling (see Figure 49). 
Double addressing is used for both control 
unit and device. Each five-character poll- 
ing or selection sequence has the format: 



r T T T T 1 

|xx|xx|yy|yy|ENQ| 
l x — x — x — x J 



where xx is the hexadecimal representation 
in EBCDIC or ASCII of the control unit 
address for polling or selection, yy is the 
hexadecimal representation of the device 
address, and ENQ is X'2D' for EBCDIC or 
X^OS* for ASCII. In the polling list, the 
last entry must be five EOT characters 
(X , 37 i for EBCDIC or X , 04* for ASCII). 



Selection List Entries (with 
Hexadecimal Representations in 
EBCDIC and ASCII) 
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EBCDIC 
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Representation 





SP 


40 


20 


1 


A 


CI 


41 


2 


B 


C2 


42 


3 


C 


C3 


43 


4 


D 


C4 


44 


5 


E 


C5 


45 


6 


F 


C6 


46 


7 


G 


C7 


47 


8 


H 


C8 


48 


9 


1 


C9 


49 


10 


t (0 


4A 


5B 


11 


. 


4B 


2E 


12 


< 


4C 


3C 


13 


( 


4D 


28 


14 


+ 


4E 


2B 


15 


1 


4F 


21 


16 


& 


50 


26 


17 


J 


Dl 


4A 


18 


K 


D2 


4B 


19 


L 


D3 


4C 


20 


M 


D4 


4D 


21 


N 


D5 


4E 
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50 


24 


Q 


D8 


51 


25 


R 


D9 
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28 


* 


5C 


2A 


29 


) 


5D 


29 


30 
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General Poll 




7F 


22 


Figure 49. 


Device 


Addresses for 


Polling 



and Selection List Entries and 
for Identification in Input 
Messages (with Hexadecimal 
Representations in EBCDIC and 
ASCII) 



Examples : To define an open polling list 
for devices 1, 2, and 3 on control unit 7 
using EBCDIC transmission code: 



OPLIST DFTRMLST 



AUTOLST, (C7C7C1C12D, 

C7C7C2C22D,C7C7C3C32D, 

3737373737) 



To define a wraparound polling list for 
devices 1, 2, and 3 on control unit 7 and a 
general poll on control unit 8 using ASCII 



WPLIST DFTRMLST 



AUTOWLST, (4747414105, 
4747424205, 4747434305, 
4848222205,0404040404) 



To define a selection list for devices 
1, 2, and 3 on control unit 7 using EBCDIC 

SLIST DFTRMLST OPENLST, (E7E7C1C12D, 

E7E7C2C2ID,E7E7C3C32D) 



Modifying Terminal Lists 

The CHGNTRY macro instruction is used to 
modify terminal lists for the nonswitched 
3270 display system. (If wraparound poll- 
ing is being done, the RESETPL macro in- 
struction is used first to terminate 
polling. ) 



Example : To suspend the poll on device 3 
(from the first example under "Defining 
Terminal Lists"): 

SPOLL CHGNTRY OPLIST, AUTOLST ,3 , 5 , ,SKIP 



BUFFER MANAGEMENT 

See the general section "Buffer Manage- 
ment." Programmer buffering or dynamic 
buffering can be used for the remote 3270 
display system. 



CODE TRANSLATION 

See the general section "Code Translation," 
and see Appendix E. 

All remote 3270 messages can be trans- 
lated between EBCDIC and ASCII, except for 
those transmitted to devices with Write 
Structured Field capability. The messages 
sent to Write Structured Field devices are 
transmitted in EBCDIC because the Write 
Structured Field operation does not permit 
a one-to-one translation of the data stream 
to ASCII code. To allow all other remote 
3270 messages to be translated between 
EBCDIC and ASCII using the BTAM RASA and 
SASA translation tables, in the I/O inter- 
face code for six-bit structured data in 
all 3270 messages the setting of the two 
high-order bits is determined by the set- 
ting of the six low-order bits in the byte 
(see Figure 50) . Six-bit structured data 
includes the WCC and CCC, attribute char- 
acter, cursor and buffer addresses, remote 
control unit address, remote device address, 
and sense and status bytes; for more infor- 
mation, see IBM 3270 Information Display 
System, Library Users Guide. 

Examples : Line 1 of Figure 52 represents a 
ir ess age received from a display station 
using ASCII transmission code. (If the 
control unit and device addresses are to be 
checked against the entry in the polling 
list, this should be done before transla- 
tion, since the terminal list entries are 
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EBCDIC 

Bits 

23 4567H 



00 
40 


0000 
SP 


01 
50 


0000 

& 


10 
60 


0000 


11 

F0 


0000 



00 
C) 


000) 
A 


0) 
Dl 


0001 

J 


10 
61 


0001 

/ 


11 
Fl 


0001 

1 


00 
C2 


0010 
B 


01 
D2 


0010 
K 


10 
E2 


0010 

s 


11 
F2 


0010 
2 


00 
C3 


0011 
C 


01 
D3 


0011 
L 


10 
E3 


0011 
T 


11 
F3 


0011 
3 


00 
C4 


0100 
D 


01 
D4 


0100 
M 


10 
E4 


0100 

u 


11 
F4 


0)00 
4 


00 
C5 


0101 
E 


01 
D5 


0101 
N 


10 
E5 


0101 
V 


11 

F5 


0101 
5 


00 
C6 


0110 
F 


01 
D6 


0110 
O 


10 
E6 


0110 

w 


11 
F6 


0110 
6 


00 
C7 


0111 
G 


01 
D7 


0111 
P 


10 
E7 


0111 
X 


11 
F7 


0111 
7 


00 
C8 


1000 
H 


01 
D8 


1000 
Q 


10 
E8 


1000 
Y 


11 
F8 


1000 
8 


00 
C9 


1001 
1 


01 
D9 


1001 
R 


10 
E9 


1001 

z 


11 

F9 


1001 
9 


00 
4A 


1010 

c 


01 
5A 


1010 
! 


10 
6A 


1010 


11 
7A 


1010 


00 

4B 


1011 


01 
5B 


1011 
S 


10 
6B 


1011 


11 
7B 


1011 




00 
4C 


1100 

< 


01 
5C 


1100 


10 
6C 


1100 

% 


11 
7C 


1100 


00 
4D 


1101 

( 


01 
5D 


1101 

) 


10 
6D 


1101 


11 
7D 


1101 


00 
4E 


1110 

+ 


01 
5E 


1110 


10 
6E 


1110 

> 


11 
7E 


1110 


00 
4F 


1111 
1 


01 

5F 


1111 


10 
6F 


1111 
? 


11 
7F 


mi 

.. . 



EBCDIC 
He> 



_3 



E 



Graphic 
Character 



Note: The I/O interface code is obtained by overlaying columns 4,5,6, 
and 7 of standard EBCDIC code on columns C,D,E, and F. 

Figure 50. I/O Interface Code for Six-bit 
Structured Data 



in transmission code.) Line 2 of Figure 52 
indicates the characters contained in the 
message. Line 3 shows the message after 
the TRNSLATE macro instruction has been 
used to translate from ASCII to EBCDIC. 
Line 4 indicates the content of the message 
for the problem program. 

Line 1 of Figure 5 3 indicates the con- 
tent of a message from the problem program. 
Line 2 shows the message before the TRNSL- 
ATE macro instruction has been used to 
translate from EBCDIC to ASCII. Line 3 
indicates the characters contained in the 
message. Line 4 represents the message to 
be sent to a display station using ASCII 
transmission code. 



ACTIVATING AND DEACTIVATING THE 
TELEPROCESSING SYSTEM 

See the general section "Activating and 
Deactivating the Teleprocessing System.' 



II NE CONTROL AND MESSAGE TRANSMISSION 

See the general section "Line Control and 
Message Transmission," see "READ Macro 
Instructions" and "WRITE Macro Instruc- 
tions" under the heading "BSC Nonswitched 
Multipoint Operation" in the section "BSC 
Read and Write Operations," and see Appen- 
dixes B and G. 



Read Operations 



Read Modified Fields for Operator Input : 
To poll a device or control unit and, after 
some action by the display station opera- 
tor, to read a message block, use the READ 
TI macro instruction. The polling list 
entry either specified by or in the polling 
list specified by the entry operand deter- 
mines whether a single device or all 
devices on a control unit are polled. 
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• If the operator pressed the ENTER key 
or pressed a PF key, the READ TI macro 
instruction causes a normal read. If 
the device buffer was formatted, the 
fcuffer specified by the inoutarea 
operand contains an index byte and a 
message block with the format: 



r T T T T T 1 

| | cu | device | | cursor | | 
I STX | address | address | AID | address | SBA J 
t x x x x x J 

11 112 1 



r t t r t t — \S — i 

| buffer | | | buffer | | | 
| address | text | SBA|address| text| | 
t x x x x x IL_J 

2 12 

UetbT] 
|\ETXf | 
L J 

If the operator selected detectable 
fields with the selector pen, the mes- 
sage block has the same format except 
that it contains no text. 



TO DO THIS.. . 


USE THESE MACRO INSTRUCTIONS 1 . . . 


WITH THESE DEVICE 
CONTROL CHARACTERS 
IN THE OUTPUT DATA 
STREAM. . . 


CHAR 


HEX (EBCDIC) 


Read Modified 
Fields for 
Operator Input 


READ Initial (TI) 

Then READ Continue (s) (TT) 


Not used 




Read Modified 
Fields Inde- 
pendent of Oper- 
ator Action 


WRITE Initial Conversational (TIV) 


ESC 6 


X*27F6' 


Then READ Continue (s) (TT) 


Not used 




Read Modified 
Fields from 
Position 


WRITE Initial (TI) 


ESC 1 


X'27F1' 


Then WRITE Continue 

Conversational (TTV) 


ESC 6 


X'27F2' 


Then READ Continue (s) (TT) 


Not used 





Read Buffer 


WRITE Initial Conversational (TIV) 


ESC 2 


X , 27F2' 


Then READ Continue (s) (TT) 


Not Used 





Read Buffer 2 f 


WRITE Initial (TI) 


ESC 1 


X'27F1' 


From Position )* 


Then WRITE Continue Conversational (TVT) 


ESC 2 


X'27F2' 


Then READ Continue (s) (TT) 


Not Used 





Write 


WRITE Initial and Reset (TIR) 


ESC 1 


X , 27F1' 


WRITE Initial (TI) and/or WRITE 
Continue (s) (TT) 


ESC 1 


X'27F1' 


Then WRITE EOT (TR) or WRITE 

Continue and Reset (TTR) 


Not used 





Erase and 
Write 3 
Alternate 


Same as for Write 


ESC = 


X'277E' 


Erase and 
Write 


Same as for Write 


ESC 5 


1 X'27F5' 



Figure 51 (Part 1 of 2) . Macro Instructions and Device Control Sequences 

for Nonswitched 3270 Function 
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TO DO THIS. . 



USE THESE MACRO INSTRUCTIONS" 



WITH THESE DEVICE 
CONTROL CHARACTERS 
IN THE OUTPUT 
DATA STREAM . . . 



CHAR 



HEX (EBCDIC) 



Write 

Structured 

Fields 4 



WRITE Initial Transparent Block (TIE) 
and/or WRITE Continue Transparent 
Block (TTE) 



ESC 3 



X'27F3' 



Then WRITE Continue Transparent 

T ext (TTX) 

Then WRITE EOT (TR) 

or 



ESC 3 
"Not~Used" 



X'27F3' 



WRITE Initial Transparent Text (TIX) 



ESC 3 



X'27F3' 



Then WRITE EOT (TR) 



Not Used 



Erase 

Unprotected 

Fields 



WRITE Inital and Reset (TTR) 

or 



ESC ? 



X'276F' 



WRITE Initial (TI) 
Then WRITE EOT (TR^ 



ESC ? 



X'276F' 



Not Used 



Copy 



WRITE Initial and Reset (TIR) 

or 



ESC 7 



X'27F7' 



WRITE Initial (TI) 



Then WRITE EOT (TR) 



ESC 7 
Not Used 



X'27F7' 



1 Typically, a WAIT or TWAIT macro instruction is issued to determine I/O 
completion of each READ or WRITE macro instruction. 

2 In order to effect the Read Modified Fields from Position and Read Buffer 
from Position functions, a WRITE Initial must be issued first to establish 
the screen position by specifying an SBA address, and then WRITE Conversa- 
tional must be issued to send the escape command (it will also read up to 
256 bytes of data) . 

3 Not applicable to devices attached to 3271 or 3275 Control Units. 

4 Applicable only to remote 3274 Model 1C devices with Structured Field 
I capability. 

Figure 51 (Part 2 of 2) . Macro Instructions and Device Control Sequences 

for Nonswitched 3270 Function 



206 



OS/VS BTAM SRL 



r ^ ASCII 
(l) message 

(in hexadecimal) 


02 


47 


41 


27 


44 


48 


11 


44 


20 


4A 


2E 


20 


53 


4D 


49 


54 


48 


03 


/T\ Message 
V-/ characters 


STX 


G 


A 


i 


D 


H 


DC1 


D 


Space 


J 


• 


Space 


S 


M 


1 


T 


H 


ETX 


EBCDIC 
[3j translation 

(in hexodecimal) 


02 


C7 


CI 


7D 


C4 


C8 


11 


C4 


40 


Dl 


4B 


'«. 


E2 


D4 


C9 


E3 


C8 


03 


•->. Message 
\Zs content 


start 

of 

text 


control 

unit: 

7 


device: 
1 


AID: 

ENTER 

key 


cursor 

address: 

0264 


SBA 
order 


buffer 

address: 

0256 


message text: 
J. SMITH 


end 

of 

text 



Figure 52. Sample Input Message (Showing Translation from EBCDIC to ASCII) 



S7\ Message 
^-^ content 


stort 

of 

text 


escape 

command: 

1 


WCC 


SBA 
order 


buffer 

address: 

0064 


SF 
order 


attribute 
byte 


message text: 
ENTER 


end 
of 
text 


Q EBCDIC 
^"^ message 
(in hexadecimal) 


02 


27 


Fl 


C3 


11 


CI 


40 


ID 


60 


C5 


D5 


E3 


C5 


D9 


03 


/J\ Message 
^-^ characters 


STX 


ESC 


1 


C 


DC1 


A 


Space 


{£} 


- 


E 


N 


T 


E 


R 


ETX 


Q ASCII 
translation 
(in hexadecimal) 


02 


IB 


31 


43 


11 


41 


20 


ID 


2D 


45 


4E 


54 


45 


52 


03 



Figure 53. Sample Output Message (Showing Translation from EBCDIC to ASCII) 



If the device buffer was unformatted, 
the buffer specified by the inoutarea 
operand contains an index byte and a 
message block with the format: 



I T — { f"T T T T — ? J-T 1 

| | | |buffer | | l/ETBU 

j STX J | SBA| address | text | |(ETX/| 

l X { J_X X L X f J-X J 

112 1 



r t r 1 t 1 

| | cu | device | | cursor | 
| STX | address | address | AID | address | 

L X X X X J 

11 112 

r -ff-r -i 

I IJETBll 

(text j \ ETX f | 

L -JL..X J 

1 

Data from remote 3270 devices is 
blocked with a nominal length of 256 
bytes (including data link control 
characters) . The actual length of a 
block can be calculated from the 
DECCOUNT field in the DECB. 

Since a response may contain more than 
one block, use READ TT macro instruc- 
tions to read blocks until an EOT is 
received. If a specific poll was used 
and the device buffer was formatted, 
subsequent message blocks have the 
format: 



If a specific poll was used and the 
device buffer was unformatted, subse- 
quent message blocks have the format: 

r r 1 hr 71 

I I l/ETBU 

I STX j text I \ ETX (| 

I X ff.X J 

1 1 

A general poll may result in messages 
from more than one device attached to 
the control unit polled. The last 
block of a message from one device ends 
with an ETX. If a general poll was 
used and the device buffer was for- 
matted, a message block following a 
block ending with an ETB has the 
format : 

r t — f f-T r t t — I f"T 1 

I I I I buffer I I l/ETBH 
j STX j I SBA j address I text I |\ETX/| 
t x__f f_x x x x i ix 1 

112 1 
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The message block following a block 
ending with an ETX has the format: 

I T T T T T 1 

j | cu | device | | cursor | | 
| STX j address | address | AID | address | SBA | 
L J. X j. x jl J 

11 112 1 

r T T T T T~) ) — 1 

(buffer | | | buffer | | | 

j address | text j SBA j address j text | | 

l x x x x x_J l J 

2 12 

f|ETB\] 
l\ETXf| 

L J 

1 

If a general poll was used and the 
device buffer was unformatted* a mes- 
sage block following a block ending 
with an ETB has the format: 

r t H-r 1 

I I l/ETBU 
j STX j text j\ETXJ| 
i x J i_x J 



ing from pressing the ENTER key. The 
cursor address contains the address of 
the last character read from the iden- 
tification card (the LRC character) . 

• If a test request message was entered 
and EROPT=T was not specified in the 
DCB, the buffer specified by the inout- 
area operand contains: 

r T T T T T T 1 

|index| (III II 

jbyte |SOH| % | / | STX j text | ETX j 

11111 1 

• If an error status message was read, 
the buffer specified by the inoutarea 
operand contains: 

r r t t t t t 1 

I index I j | | | cu | device | 
jbyte |SOH| % | R | STX | address) address | 
i x x x x x x J 

11111 1 1 

r t n 

| sense/status | | 
j bytes | ETX | 
i x J 

2 1 



The message block following a block 
ending with an ETX has the format: 



i t t t r 1 

I I cu I device | | cursor | 
| STX j address | address | AID | address | 
l x x x x J 



r -ff- 



l/ETBH 



I text HETX) 
I -^X j 

1 



To terminate a read operation, issue a 
READ TRV macro instruction after receiving 
a message block ending with an ETX. If a 
permanent I/O error occurs, either issue a 
READ TP macro instruction to reread the 
block or issue a WRITE TR macro instruction 
to terminate the operation. 

Examples of READ macro instructions for 
reading modified fields for operator input 
are: 

READ DECB1,TI, DCB1, INBUFl, 256, PNTRY1, 2 
READ DECB2,TT,DCB1,INBUF2,256,,2 



Note : A message block received in 
response to a READ TT macro instruction 
is not preceded by an index byte. 

• If the operator pressed the CLEAR key 
or pressed a PA key, the READ TI macro 
instruction causes a short read. The 
buffer specified by the inoutarea 
operand contains : 



r T T T T T 1 

| index | | cu | device | | | 
| byte | STX j address | address | AID j ETX j 

L X X X X X J 

111 111 

If a card or cards were read by means 
of the operator identification card 
reader, the buffer specified by the 
inoutarea operand contains a message in 
the same format as the message result- 



Read Modified Fields : To select a device 
and, independently of action by the display 
station operator, to read from the device, 
use a WRITE TIV macro instruction with the 
entry operand specifying the selection 
entry of the device and the outarea operand 
specifying a buffer that contains (in EBCD- 
IC or ASCII) : 



r t t t 1 

j STX I ESC I 6 | ETX j 
i x x x J 



Follow the WRITE macro instruction with 
READ TT macro instructions. 

In the first message block, if the AID 
byte contains neither C-' nor C'Y' or if 
the first byte is an SOH, the buffer speci- 
fied by the inoutarea operand contains a 
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message block with one of the formats 
described under "Read Modified Fields for 
Operator Input." Otherwise, the contents 
of the buffer are unpredictable; the mes- 
sage is probably nonexistent or incomplete. 

Examples of WRITE and READ macro 
instructions for reading modified fields 
are: 

WRITE DECB1,TIV, DCE-1, ( INBUF1, OUTBUF) , 

(256,4) ,SNTRY2,3 
READ DECB2,TT,DCB1,INBUF1,256,,3 



Read Modified Fields from Position : To 
select a device and read from the device, 
use a WRITE TI macro instruction with the 
entry operand specifying the selection 
entry of the device and the inoutarea 
operand specifying a buffer that contains 
(in EBCDIC or ASCII) : 

i t t t T-ff — r 1 r n 

| | | | | | | buffer | | 
|STX|ESC| 1 |WCC| |SBA|address|ETXj 
i J. x x x_J ) — x x x J 

1111 12 1 

Any data stream valid for a write operation 
may be used, but the WCC should inhibit 
reset of modified data tags and the last 
buffer address should indicate where the 
read modified operation is to start. 

Follow the WRITE TI macro instruction 
with a WRITE TTV macro instruction with the 
outarea operand specifying a buffer that 
contains (in EBCDIC or ASCII): 



r t t T "I 

|STX|ESC| 2 |ETX| 
I X X X J 

1111 

Follow the WRITE TIV macro instruction with 
READ TT macro instructions. 

If the device buffer was formatted, the 
first message block in the buffer specified 
by the inoutarea operand has the format: 

r t t t t W^~ T — "> 

| | cu | device | | cursor | | | 
| STX | address | address | AID | address | j SF j 

i x x x_ x x "ih x — J 

11 112 1 

r t W hrr -i 

I I I I ETB|| 
j attribute j text | |(ETXj| 
t x x-f L.x J 

1 1 

If the device buffer was unformatted, the 
first message block in the buffer specified 
by the inoutarea operand has the format: 



-ft- 



r T T T T T 

| | cu | device ( | cursor | 

j STX I address | address | AID | address | text | 

l x x x x x ^ J 

11 112 



r 7 T 1 

|(ETBJ| 
IIETXJI 
L J 



I T T T 1 

|STXJESC| 6 |ETX| 
I X X X J 



Follow the WRITE TTV macro instruction with 
READ TT macro instructions. 

Input message blocks are the same as 
those described under "Read Modified 
Fields." 

Examples of WRITE and READ macro 
instructions for reading modified fields 
from position are: 

WRITE DECB1,TI,DCB1,0UTBF1,8,SNTRY2,1 
WRITE DECB2,TTV,DCB1, (INBUF1 ,0UTBUF2) , 

(256, 4), ,1 
READ DECB3,TT,DCB1,INBUF1,256,,1 



Read Buffer : To select a device and read 
from the device, use a WRITE TIV macro in- 
struction with the entry operand specifying 
the selection entry of the device and the 
outarea operand specifying a buffer that 
contains (in EBCDIC or ASCII) : 



If the device buffer was formatted, subse- 
quent message blocks have the format: 

r W /"T — r r t? K7 -i 

I I I I I I I ETB I 
j STX j |SF|attribute|text| |\ETXJ| 
1 x_) 1.x — x x x) ^Lx j 

111 1 

If the device buffer was unformatted, sub- 
sequent message blocks have the format: 

r t 1 J-t- -i 

I I I ETB I 
|STX|text IIETXJI 
1 x J i_x J 

1 1 

Examples of WRITE and READ macro 
instructions for reading a buffer are: 

WRITE DECB1,TIV,DCB1, (INBUF1,0UTBUF) , 

(256,4),SNTRY2,2 
READ DECB2,TT,DCB1,INBUF1,256,,2 

Read Buffer from Position : To select a 
device and read from the device, use a 
WRITE TI macro instruction with the entry 
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operand specifying the selection entry of 
the device and the inoutarea operand speci- 
fying a buffer that contains (in EBCDIC or 
ASCII) : 



WRITE TI 
WRITE TT 



r t t t r-f hr t t 1 

I I I I I I I buffer | | 
|STX|ESC| 1 |WCC| |SBA|address|ETX| 

i x x x - L -^A- J - x x J 

1111 1 2 1 

Any data stream valid for a write operation 
may be used, but the WCC should inhibit 
reset of modified data tags (if their set- 
ting is wanted in the input message) , and 
the last buffer address should indicate 
where the read buffer operation is to 
start. 

Follow the WRITE TI macro instruction 
with a WRITE TTV macro instruction with the 
outarea operand specifying a buffer that 
contains (in EBCDIC or ASCII) : 



r t t t 1 

|STX|ESC| 2 |ETX| 
L X X X J 



WRITE TTR 

with the entry operand of the WRITE TIR or 
WRITE TI macro instruction specifying the 
selection entry of the device and the 
inoutarea operand of the WRITE TIR, WRITE 
TI, WRITE TT, or WRITE TTR macro instruc- 
tion specifying a buffer that contains (in 
EBCDIC or ASCII) : 

r T T T T T T 

|STX|ESC| 1 | WCC | orders and text|ETX| 
i x x x x l I 

1111 1 

For information about the WCC and the 
orders and text that may follow it, see IBM 

3270 Information Display System, Library 
Users Guide . An SBA order sequence should 
follow immediately after the WCC, so that 
the write operation can be retried if an 
error occurs. 



Follow the WRITE TTV macro instruction with 
READ TT macro instructions. 

Input message blocks are the same as 
those described under "Read Buffer." 

Examples of WRITE and READ macro 
instructions for reading a buffer from 
position are: 

WRITE DECB1,TI,DCB1,0UTBF1,8,SNTRY3,3 
WRITE DECB2,TTV,DCB1, (INBUF1 ,OUTBF2) , 

(256, U), ,3 
READ DECB3,TT,DCB1,INBUF1,256, ,3 

Write Operations 

Write Buffer : To select a device and write 
a message block or blocks , use one of the 
following sequences of WRITE macro 
instructions : 

• WRITE TIR 



Examples of WRITE macro instructions for 
writing a buffer are: 

WRITE DECBl,TIR,DCBl,OUTBUF,128, 
SNTRY1, 2 

WRITE DECB1,TI,DCB1,0UTBUF,128, 

SNTRY1,2 
WRITE DECB2,TR,DCB1, ,,,2 

WRITE DECB1,TI,DCB1,0UTBF1,256, 

SNTRY2,3 
WRITE DECB2 , TTR, DCBl , OUTBF2 , 128 , , 3 

WRITE DECB1,TI, DCBl, OUTBF1, 256, 

SNTRY3 , 2 
WRITE DECB2,TT, DCBl, OUTBF2, 256,, 2 
WRITE DECB3,TR,DCB1,,,,2 

WRITE DECB1,TI, DCBl, OUTBFl, 256, 

SNTRY2, 1 
WRITE DECB2,TT, DCBl, OUTBF2, 256,, 1 
WRITE DECB3, TTR, DCBl, OUTBF3, 128,, 1 



• WRITE TI 
WRITE TR 

• WRITE TI 
WRITE TTR 

• WRITE TI 
WRITE TT 



WRITE TR 



Erase and Write Buffer : To select a 
device, clear its buffer to nulls (binary 
zeros) , and write a message block or 
blocks, use one of the sequences of WRITE 
macro instructions listed under "Write Buf- 
fer" with the entry operand of the WRITE 
TIR or WRITE TI macro instruction specify- 
ing the selection entry of the device and 
the inoutarea operand of the WRITE TIR, 
WRITE TI, WRITE TT, or WRITE TTR macro in- 
struction specifying a buffer that contains 
(in EBCDIC or ASCII): 
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r t t t t r 1 

|STX|ESC| 5 |WCC| orders and text|ETX| 
l x x x x x 1 



Examples of WRITE macro instructions for 
erasing and writing a buffer are the same 
as those given under "Write Buffer. " 

Erase Write Alternate ; To select a device, 
invoke its alternate buffer size, clear its 
buffer to nulls (binary zeros) , and write 
one or more message blocks, use one of the 
sequences of WRITE macro instructions 
listed under "Write Buffer" with the entry 
operand of the WRITE TIR or WRITE TI macro 
instructions specifying the selection entry 
of the device and the inoutarea operand of 
the WRITE TIR, WRITE TI, WRITE TT, or 
WRITE TTR macro instruction specifying a 
buffer that contains: 

, r T — - t T t t 

! STX I ESC ! = ! WCC ! D RDERS AND TEXT \ ETX ! 



* X'7E' in EBCDIC 



Examples of WRITE macro instructions for 
invoking alternate buffer sizes, erasing 
and writing a buffer are the same as those 
given under "Write Buffer." This command 
does not apply to the 3271 Control unit or 
the 3275 Display Station. 



Programming Notes ; 

1. The alternate buffer mode will remain 
in effect until an Erase/Write command 
(ESC 5) is sent from the host (via the 
application or Test Request processing) , 
Operation of the CLEAR key for displays 
and Power-On for both displays and 
printers will cause the device to enter 
default buffer mode. 

2. Default and Alternate buffer sizes for 
the 3278 Display Station and 3287 and 
3289 Printers are: 



buffer mode should return the device to 
its default buffer size before the 
application terminates. This will 
reduce the possibility of starting a 
second application (which may not be 
aware of alternate buffer sizes) with 
the device in a buffer size other than 
the one expected. 



Write Structured Field; This operation 
causes a remote 3274 Model 1C with Write 
Structured Field capability to enter 
Write Structured Field mode. This oper- 
ation transfers a data stream containing 
structured fields to a specified device, 
but will not cause any specific device 
action. The structured field contains a 
type field which will cause a device 
action. 

Unlike other remote 3270 operations, Write 
Structured Field requires data transparency 
because full eight bit bytes describe many 
of the device actions. Data transparency 
means that data, including normally restrict- 
ed data- link line-control characters are 
treated as specific bit patterns. Thus any 
bit pattern can be transmitted as information 
data and not as line-control data. To enter 
transparent mode, use Write transparent ma- 
cros. If contact has not previously been es- 
tablished with the selected device, a WRITE 
TIE or WRITE TIX is issued with the entry 
operand specifying the address of the device's 
entry in an addressing terminal list. If 
contact is already established a WRITE TTE 
or WRITE TTX is issued, and the entry operand 
is not applicable and should be omitted. In 
both cases, the area operand specifies an 
output area containing: 



DLE 


STX 


ESC 


3* 


STRUCTURED FIELD (S) 



* X'F3' in EBCDIC 

** The DLE ETX or DLE ETB characters are 
supplied by BTAM when the application 
program uses BTAM transparency macro 
instructions. 





1 


Mo 
2 


del 
3 


4 


Default 
Alternate 


480 
960 


1920 
1920 


1920 
2560 


1920 
3440 



3. All commands except Erase/Write and 
Erase/Write Alternate are based on the 
current (last invoked) buffer size. Any 
application that invokes alternate 



To terminate Write Structured Field trans- 
mission, a WRITE TR macro is issued. 

An example of the Write Structure Field 
operation is: 



SENDMSG WRITE 



ENDWRT 



WRITE 



DECB1 , TIX, DCBl , OUTBUF , 
300,SNTRY1,2 
DECB1,TR,DCB1, , , ,2 



IBM 3270 Information Display System — Programming Considerations 211 



PROGRAMMING NOTES : 

1. Any application program using Write 
Structured Field for a remote 3270 
should, before terminating, return 
the device to its 3270 (default) 
mode. This will avoid starting a 
second application program, which 
may not use Write Structured Field, 
with the device in Write Structured 
Field mode. To reset Write Struct- 
ured Field mode, issue an Erase 
Write Alternate or Erase/Write com- 
mand with a WCC of .1 

BTAM will automatically reset Write 
Structured Field mode during Request- 
for Test (RFT) processing, because 
BTAM issues an Erase/Write command 
with a WCC of .1 

2. Write Structured Field data can not 
be translated to ASCII code. 

Erase Unprotected Fields : To select a 
device and set all unprotected fields in 
its buffer to nulls (binary zeros) , use the 
WRITE TIR macro instruction or the WRITE TI 
and WRITE TR macro instructions with the 
entry operand of the WRITE TIR or WRITE TI 
macro instruction specifying the selection 
entry of the device and the inoutarea 
operand specifying a buffer that contains 
(in EBCDIC or ASCII): 



I ~T T T 1 

|STX|ESC| ? |ETX| 
i x x x J 



For more information about the results of 
this operation, see IBM 3270 Information 

Display System, Library Users Guide . 

Examples of WRITE macro instructions for 
erasing all unprotected fields are: 

WRITE DECB1,TIR,DCB1,0UTBUF,4,SNTRY1,2 



I T T T T T 1 

I I I I I device | | 
|STX|ESC| 7 JCCCJ address |ETX| 

L L X X X X J 

1111 1 1 

For more information about the CCC and the 
device address that follows it, see IBM 

3270 Information Display System, Library 
Users Guide. 



Examples of WRITE macro instructions for 
copying into a buffer are: 

WRITE DECB1,TIR,DCB1,0UTBUF, 6,SNTRY1,2 

WRITE DECB1 , TI , DCB1, OUTBUF, 6 , SNTRY1 , 2 
WRITE DECB2,TR,DCB1,,,,2 



Programming Notes : 

If the response to a READ TI, READ TT, 
WRITE TIV, or WRITE TTV macro instruction 
is a message block ending with an ETB, fol- 
low with a READ TT macro instruction, not a 
WRITE TT or WRITE TTV macro instruction. 



If a WRITE TI macro instruction is used 
to erase unprotected fields, follow with a 
WRITE TR macro instruction, not a WRITE TT. 
WRITE TIV, or WRITE TTV macro instruction. 



If a WRITE TI or WRITE TT macro instruc- 
tion is used to start a printer, follow 
with a WRITE TR macro instruction, not a 
WRITE TT, WRITE TIV, or WRITE TTV macro 
instruction. 



ERROR RECOVERY PROCEDURES AND ERROR 
RECORDING 

See the general section "Error Recovery 
Procedures and Error Recording," and see 
Appendixes B and C. 



WRITE DECB1, TI, DCB1, OUTBUF, 4, SNTRY1, 2 
WRITE DECB2,TR,DCB1, , ,,2 



Copy : To select a device and copy into its 
buffer the contents of the buffer of anoth- 
er device on the same control unit, use the 
WRITE TIR macro instruction or the WRITE TI 
and WRITE TR macro instructions with the 
entry operand of the WRITE TIR or WRITE TI 
macro instruction specifying the selection 
entry of the device and the inoutarea 
operand specifying a buffer that contains 
(in EBCDIC or ASCII): 



Error Conditions 

An error status message should be read from 
the remote 3270 device if: 

• A WRITE TI, WRITE TIR, or WRITE TIV 
macro instruction receives an RVI 
sequence in response to selection (com- 
pletion code is X*7F'; bits 1 and 6 are 
on in the DECFLAGS field of the DECB) . 

• A WRITE TI, WRITE TIR, or WRITE TIV 
macro instruction receives an EOT in 
response to text (completion code is 
X'Ul'; bit 1 is on in the DECFLAGS 
field; an EOT is in byte 1 of the 
DECRSPN field of the DECB) . 
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A WRITE TIV or READ TI macro instruc- 
tion receives a text block ending with 
an ENQ (completion code is X'tH*; bit 1 
is on in the DECFLAGS field). 



To receive the error status message, the 
problem program should issue a READ TI 
macro instruction using the polling entry 
of the device for which completion was 
posted. See Appendix C for a description 
of the error status message and suggested 
actions based on its contents. 



Exceptional Conditions 

If the completion code is X'7F' and bit 6 
is on in the DECFLAGS field of the DECB, 
an error status message was received in 

response to a READ TI macro instruction 
(or in response to a READ TT macro instruc- 
tion if a general poll was used) . 

If the completion code is X'7F* and bits 
and 1 are on in the DECFLAGS fields of 
the DECB, a WACK was received in response 
to a WRITE TI or WRITE TT macro instruc- 
tion. If the write operation started a 
printer, this is a normal completion. A 
WRITE TR macro instruction must follow to 
reset the line. 



RETRY OPTIONS 

See the BSC3 retry options in the general 
section "Suggested Retry Options for BSC 
Read and Write Operations." 



ONLINE TESTING 

See "Online Testing for Binary Synchronous 
Communications Lines" in the general sec- 
tion "Online Testing." 

To receive standard IBM maintenance for 
a remote 3270 display system, the online 
testing facility must be available. 



SWITCHED REMOTE 3270 DISPLAY SYSTEM 

IBM 3275 Display Stations equipped with the 
dial feature are supported by BTAM as BSC 
stations connected to switched point-to- 
point lines using either EBCDIC or ASCII 
transmission code. 



The UNIT operand of the IODEVICE system 
generation macro instruction must specify 
BSC2 for the switched 3275 display station. 

The DCB macro instruction operands that 
apply to the switched 3275 display station 
are: DSORG, MACRF, DDNAME, BUFNO, BUFL, 
BUFCB, EXLST, BFTEK, LERB, EROPT= C, T, and 
E, DEVD=BS, MODE, CODE. 



DEFINING AND MODIFYING TERMINAL LISTS 

See "Defining and Modifying Terminal Lists" 
in the chapter "Defining the Teleprocessing 
System," see "Defining Terminal Lists" and 
"Defining Terminal List (SWLST) Expanded ID 
Verification" under the heading "BSC 



Switched Point-to-Point Operation" in the 
chapter "BSC Read and Write Operations," 
and see Appendix A. 



DFTRNLST Macro 

The DFTRMLST macro instruction is used to 
define terminal lists for the switched 3275 
display station. In a switched 3275 system 
the terminal list contains numbers to be 
dialed and the unique identification (ID) 
number to be received from each 3275. The 
terminal list consists of one or more 
entries, one entry for each 3275 being 
defined. Entries in the terminal list are 
referred to when a connection-initiating 
READ or WRITE macro instruction is coded. 

Three list types may be used for the 
switched 3275: BSCLST, SWLST, and WTLIST. 
The calling and answering list options and 
the associated READ or WRITE macros are 
described under "BSC Switched Point-to- 
Point Operation" in the "BSC Read and Write 
Operations" section. 

ID Verification 

ID verification must be requested in pro- 
gramming input/output with a switched 3275. 
BTAM verifies that an identification (ID) 
number received from the remote device is 
the same as a number furnished in a termi- 
nal list defined in the application pro- 
gram. This assures that communication 
between CPU and the switched 3275 will take 
place only with previously defined 3275s. 



DEFINING COMMUNICATIONS LINE GROUPS 

See "Defining Communications Line Groups" 
in the chapter "Defining the Teleprocessing 
System," and see Appendix D. 
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The ID for a particular 3275 with the 
dial feature is determined by IBM and the 
user and is hardwired into the 3275; it is 
always four characters in length. The 
first character (lower case "f" for EBCDIC; 
upper case "F" for ASCII) provides terminal 
type identification and is assigned by IBM. 
The other three characters are assigned by 
the customer or by IBM. Graphic characters 
only can be assigned. The assignment is 
transparent to the code (EBCDIC or ASCII). 
The graphic assignments that can be used 
appear in the IBM 3270 Information Display 
System Library Users Guide. 

The switched 3275 always sends its ID on 
both a CPU calling operation and a CPU an- 
swering operation. The CPU may or may not, 
at the user's option, transmit an ID during 
a calling operation or an answering opera- 
tion. Since a 3275 cannot verify an ID 
from the CPU, this facility is not useful 
for switched 3275 applications. If a CPU 
ID is used, it cannot exceed 15 characters 
and roust not be used except when establish- 
ing initial contact. The possible ID and 
control character sequences are summarized 
in Figure 53. 
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H 



Type of Terminal 
List 



Calling from CPU 



Answering from CPU 



Transmission 
Sequence 



CPU sends ID ENQ or 
ENQ 3275 Dial sends 
ID ACK-0 



3275 Dial sends ID 
ENQ CPU sends 
ID ACK-0 or ACK-0 



Figure 54. ID and Control Character 

Sequences for Calling or An- 
swering Terminal Lists 



LINE CONTROL AND MESSAGE TRANSMISSION 

In switched point-to-point operations, sev- 
eral types of READ and WRITE macro instruc- 
tions are used to make initial connection 
between the CPU and the remote station. 
Some of these macro instructions do no more 
than make the connection; others make the 
connection and then, as part of the same 
operation, read or write a message block. 
Following the READ or WRITE in which con- 
nection is established, other types of READ 
and WRITE macro instructions are used to 
carry on the input/output operations. 



Modifying Terminal Lists 

The CHGNTRY macro instruction is used only 
to change the value of a control byte in an 
answering list of the SWLST format for a 
switched 3275. See "CHGNTRY Macro Instruc- 
tion" in the chapter "Defining the Tele- 
processing System." 



BUFFER MANAGEMENT 

See the chapter "Buffer Management. " Pro- 
grammer buffering or dynamic buffering can 
be used for any remote 3270 system, includ- 
ing a switched 3275. 



CODE TRANSLATION 

See the chapter ' 
Appendix E. 



'Code Translation" and 



The TRNSLATE macro can be used to 
translate switched 3275 messages between 
EBCDIC and ASCII codes when ASCII transmis- 
sion is used. To use the TRNSLATE macro, 
the BTAM translation tables must be 
assembled in the application program by use 
of the ASMTRTAB macro instruction. 

Bytes containing binary information (the 
WCC, attribute character, cursor and buffer 
address, and sense/status bytes) must be 
encoded in EBCDIC, translated to ASCII on 
output, and translated to EBCDIC on input 
with standard BTAM translation tables. The 
standard BTAM translation tables for BSC 
are RASA for incoming messages and SASA for 
outgoing messages. 



ACTIVATING AND DEACTIVATING THE 
TELEPROCESSING SYSTEM 

See the chapter "Activating and Deactivat- 
ing the Teleprocessing System." 



The types of READ and WRITE macros used 
for making a connection are: 



• READ Connect (TO 

• READ Connect with Tone (TCW) 

• READ Initial ,(TI) 

• WRITE Connect (TO 

• WRITE Initial (TI) 

• WRITE Initial Conversational (TIV) 



All READ and WRITE macros applicable to 
the switched 3275 are shown in Figure 55. 
A discussion of the function and the chan- 
nel program for each macro instruction type 
is given under the heading "BSC Switched 
Point- to- Point Operation" in the chapter 
"BSC Read and Write Operations." 



To perform operations at the switched 
3275, refer to: 



Figure 30, which specifies the READ or 
WRITE macro instruction sequence and 
terminal list required to make a con- 
nection and read or write text for any 
calling or answering situation (auto- 
matic or manual, expanded ID verifica- 
tion if desired) . 



2. Figure 55, which gives the macro in- 
struction sequence and the two- 
character ESC (command) sequence 
required to control the 3275. If the 
3275 is already connected to the 
central computer. Figure 55 also lists 
the READ or WRITE Continue macro 
required to transmit the ESC sequence 
to the 3275. 
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I— 



To do this. . . 



t 1 

With this two- 
character 3275 
command sequence 
in the output 
data stream. . . 



Use these macro instruction sequences.. 



Sequencej Hex 



Read Modified Fields 
for Operator Input 



READ Connect, READ Initial, or READ Continues to 
read the first or only block of a message. 



Not used 



Then one or more READ Continues to read succes- 
sive blocks until EOT is received. 



| 

Read Modified Fields 
Independent of 
Operator Action 



WRITE Initial Conversational or WRITE Continue 
Conversational to write ESC 6 and read the 
first message block. 



ESC 6 



X'27F6 f 



Then READ Continues until the buffer has been 
read and EOT is received. 



Not used 



Read Modified Fields 
from Position 



Write Initial or WRITE Continue to set the 
position from which to read. 



ESC 1 



X f 27Fl' 



WRITE Continue Conversational to write ESC 6 and 
read the first or only message block. 



ESC 6 



X , 27F6 t 



Then one or more READ continues to read succes- 
sive blocks until EOT is received. 



Not used 



Read Buffer 



WRITE Initial Conversational or WRITE Continue 
Conversational to write ESC 2 and read the first 
message block. 



ESC 2 



X f 27F2' 



Then READ Continues until the buffer has been 
read and EOT is received. 



Not used 



Read Buffer from 
Position 



WRITE Initial or WRITE Continue to set the 
position from which to read. 



ESC 1 



X , 27F1* 



WRITE Continue Conversational to write ESC 2 and 
read the first message block. 



ESC 2 



X'27F2* 



Then READ Continues to read successive blocks 
until EOT is received. 



Not used 



Write 



WRITE Initial or WRITE Continue or WRITE Connect* 
followed by WRITE Continue to write the first or 
only message block. 



ESC 1 



X , 27F1' 



WRITE Continues as desired to write subsequent 
message blocks. 



ESC 1 



X , 27F1' 



WRITE Reset or WRITE Reset Monitor to return the 
line to control mode. 



Not used 



Figure 55 (Part 1 of 2). Macro Instruction Sequences to Perform Read and Write Functions 

at the Switched 3275 
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T 1 

With this two- 
character 3275 
command sequence 
in the output 
data stream... 



To do this . . . 



Use these macro instruction sequences. 



T' 

Sequence| 



Hex 



Erase and Write 



WRITE Initial or WRITE Continue or WRITE Connect* 
followed by WRITE Continue to write the first or 
only message block. 

WRITE Continues as desired to write subsequent 
message blocks. 



ESC 5 JX^FS' 



+ 

ESC 1 |X* 27F1 1 
I 



Erase Unprotected 
Fields 



WRITE Reset or WRITE Reset Monitor to return the |Not used| 
line to control mode. 

WRITE Initial or WRITE Continue or WRITE 
Connect* followed by WRITE Continue to erase all 
unprotected fields in the buffer. 



-1 



ESC ? |X f 27F6 f 



WRITE Reset or WRITE Reset Monitor to return the 
line to control mode. 



Not used | 



I 

♦If WRITE TC, WRITE TT is required (for calling the 3275), place the ESC sequence in 

the output data stream of the WRITE TT. (WRITE TC connects but does not write a text 
I message.) 

L ''. : 

Figure 55 (Part 2 of 2). Macro Instruction Sequences to Perform Read and Write Func- 
tions at the Switched 3275 



Read Operations 

Read Modified Fields for Operator Input ; 
To connect a 3275 and, after some action by 
the display station operator, to read a 
message block, use the READ TI, TC, or TCW 
macro instruction for the particular 
switched system as described under "BSC 
Switched Pbint-to-Point Operation" in the 
chapter "BSC Read and Write Operations. " 
If the connection was previously made, use 
the READ TT macro instruction to read a 
message block. The entry operand on con- 
nection operations specifies the name of a 
DFTRMLST macro instruction that defines the 
terminal list. The entry operand is not 
coded in READ or WRITE macro instructions 
issued after connection is made. 



al read. If the 3275 buffer was for- 
matted, the buffer specified by the 
inoutarea operand contains a message 
block with the format: 



r T T ■- T T T T 1 

| | (cursor | | buf f er | | | 
I STX | AID | address | SBA | address | text | SBA j 
i x x j j x x_ J 

112 12 1 

r t r 1 1 t t 

| buffer | | jf.ETB\| 
j address j text j METXfj 
i x x ^ f x J 

2 1 



No 3275 command (ESC code) is required 
to read modified fields; the normal opera- 
tion of the 3275 reads only modified 
fields. A maximum of 256 bytes of data are 
read as the result of one READ macro in- 
struction. READ Continues are required to 
read additional 256-byte blocks until an 
ETX is detected indicating the end of the 
message. An additional READ TT is required 
to read an EOT, which restores the data 
link to control mode. 

• If the operator pressed the ENTER key 
or pressed a PF key, the READ TI, TC, 
or TCW macro instruction causes a norm- 



If the operator selected detectable 
fields with the selector pen, the mes- 
sage block has the same format except 
that it contains no text. 

If the 3275 buffer was unformatted, the 
buffer specified by the inoutarea 
operand contains a message block with 
the format: 



■u 



r t t t 

I I Icursor | 

| STX | AID | address | text |(ETXjj 

i x x x ^ I — x j 

112 1 



l/ETBU 

II 
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Data from remote 3270 devices is 
blocked with a nominal length of 256 
bytes (including data link control 
characters) . The actual length of a 
block can be calculated from the 
DECCOUNT field in the DECB. Since a 
response may contain more than one 
block, use READ TT macro instructions 
to read blocks until an EOT is 
received. If the 3275 buffer was for- 
matted, subsequent message blocks have 
the format: 

r t — U — t t r t — / 1 — i 

I I I | buffer | || 
|STX| JSBAJ address | text j | 
l x„ 1 1 __x x x x__{ J __j 

1 12 

r 7 T 1 

| ETB | 
|(ETX)| 
t J 

1 

If the 3275 buffer was unformatted, 
subsequent message blocks have the 
format: 



r t 

; i 

|STX|text 
i x 



■u 
■II 



ETB j j 
ETX)| 
J 



If an error status message was read, 
the buffer specified by the inoutarea 
operand contains: 



r T-T-T T T 1 

| III | sense/status | | 
|SOH|S|R|STX| bytes |ETX| 
i x_x_x x x J 

1111 2 1 

To terminate a read operation, issue a 
READ TRV macro instruction after receiving 
a message block ending with an ETX. If a 
permanent I/O error occurs, either issue a 
READ TP macro instruction to reread the 
block or issue a WRITE TR macro instruction 
to terminate the operation. 

Examples of READ macro instructions for 
reading modified fields for operator input 
are: 

READ DECB1,TI,DCB1,INBUF1,256,PNTRY1,2 
READ DECB2,TT,DCB1,INBUF2,256,,2 



Read Modified Fields : To connect a 3275 
and, independently of action by the display 
station operator, to read from it, use a 
WRITE TIV macro instruction with the entry 
operand specifying the name of the terminal 
list and the outarea operand specifying a 
buffer that contains (in EBCDIC or ASCII): 



The last block of a message from the 
3275 ends with an ETX. 

If the operator pressed the CLEAR key 
or pressed a PA key, the READ TI, TC, 
TCW, or TT macro instruction causes a 
short read. The buffer specified by 
the inoutarea operand contains: 



r t t 1 

| STX | AID | ETX | 
t X x j 

111 

If a card or cards were read by means 
of the operator identification card 
reader, the buffer specified by the 
inoutarea operand contains a message in 
the same format as a message resulting 
from pressing the ENTER key. The cur- 
sor address contains the address of the 
last character read from the identifi- 
cation card (the LRC character) . 

If a test request message was entered 
and EROPT=T was not specified in the 
DCB, the buffer specified by the inout- 
area operand contains: 



r T""T-T T-T-T-T 1 

j SOH j % j | / j STX| X | Y j N | ETX | 
i x_x_x x_x_x_x J 

1 11 1 221 1 



r t t-t 1 

|STX|EOC|6|ETXJ 
i x x_x J 

1 111 

Follow the WRITE macro instruction with 
READ TT macro instructions. 

In the first message block, if the AID 
byte contains neither C'-' nor C'Y* or if 
the first byte is an SOH, the buffer speci- 
fied by the inoutarea operand contains a 
message block with one of the formats 
described under "Read Modified Fields for 
Operator Input." Otherwise, the contents 
of the buffer are unpredictable; the mes- 
sage is probably nonexistent or incomplete. 

Examples of WRITE and READ macro 
instructions for reading modified fields 
are: 



WRITE 



READ 



DECB1,TIV,DCB1, (INBUF1,0UTBUF) , 

(256,4),SYNTRY2,3 

DECB2 , TT, DCB1 , INBUF1 , 256 , , 3 



Read Modified Fields from Position : To 
connect a 3275 and read from it, use a 
WRITE TI macro instruction with the entry 
operand specifying the name of the terminal 
list and the inoutarea operand specifying a 
buffer that contains (in EBCDIC or ASCII) : 
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■T - T- 



r-M— i 



I buffer I 



| STX | ESC | 1 | WCC | | SBA | address | ETX | 
i J X_X x ) ) x x x J 

1111 1 2 1 

Any data stream valid for a write operation 
may be used, but the WCC should inhibit 
reset of modified data tags and the last 
buffer address should indicate where the 
read modified operation is to start. 

Follow the WRITE TI macro instruction 
with a WRITE TTV macro instruction with the 
outarea operand specifying a buffer that 
contains (in EBCDIC or ASCII) : 



r t t - t 1 

JSTX|ESC|6|ETX| 
L X X_X J 

1 111 

Follow the WRITE TTV macro instruction with 
READ TT macro instructions. 

Input message blocks are the same as 
those described under "Read Modified 
Fields." 

Examples of WRITE and READ macro 
instructions for reading modified fields 
from position are: 

WRITE DECB1,TI,DCB1,0UTBF1,8,SNTRY2,1 
WRITE DECB2,TTV, DCB1 , (INBUF1,0UTBUF2) , 

(256, 4), ,1 
READ DECB3,TT,DCB1,INBUF1,256,,1 

Read Buffer ; To connect a 3275 and read 
from it, use a WRITE TIV macro instruction 
with the entry operand specifying the name 
of the terminal list and the outarea 
operand specifying a buffer that contains 
(in EBCDIC or ASCII) : 



r T T - T ., 

|STX|ESC|2|ErX| 
i x x_x J 

1 111 

Follow the WRITE TIV macro instruction with 
READ TT macro instructions. 

If the 3275 buffer was formatted, the 
first message block in the buffer specified 
by the inoutarea operand has the format: 

r T T T 1 1 T T T T 

I I leursor III | | 
| STX | AID j address | | SF j attribute | text | 
l x x x ^ ^ — x x x J 

112 11 

f-N— tt— ;i 
| IjETB 

| | ( ETX 
t~{f_l -J 

1 



If the 3275 buffer was unformatted, the 
first message block in the buffer specified 
by the inoutarea operand has the format: 

r t t t 1( — t; 7 

| j | cursor | 

j STX j AID j address | text 

l X X x 1 {. 



etb) j 

ETXJI 

Li 



If the 3275 buffer was formatted, subse- 
quent message blocks have the format: 

r T { t~ T T T T 1 1 TT Tl 

II II II I etb) I 

I STX j I SF| attribute! text I | ) ETX j 
i j ^ ) — x — x x x J ) xi 1j 

111 1 

If the 3275 buffer was unformatted, subse- 
quent message blocks have the format: 

r T 1 1 TT TT 

I I I etb)| 

STX text I ETX I 

t_-x h_iL_L 

i i 

Examples of WRITE and READ macro 
instructions for reading a buffer are: 

WRITE DECB1,TIV,DCB1, (INBUFl,OUTBUF) , 

(256,4),SYNTRY2,2 
READ DECB2,TT,DCB1,INBUF1,256,,2 

Read Buffer from Position : To connect a 
3275 and read from it, use a WRITE TI macro 
instruction with the entry operand specify- 
ing the name of the terminal list and the 
inoutarea operand specifying a buffer that 
contains (in EBCDIC or ASCII) : 

r T T-T T 1 1 T T T 1 

I I I I I I Ibuffer | | 
j STX j ESC j 1 j WCC | | SBA | address | ETX j 
t j X_X— j ) J x x x J 

1111 1 2 1 

Any data stream valid for a write operation 
may be used, but the WCC should inhibit 
reset of modified data tags (if their set- 
ting is wanted in the input message) , and 
the last buffer address should indicate 
where the read buffer operation is to 
start. 

Follow the WRITE TI macro instruction 
with a WRITE TTV macro instruction with the 
outarea operand specifying a buffer that 
contains (in EBCDIC or ASCII) : 



|STX|ESC|2|ETX| 
i x x_x I 

1 111 



Follow the WRITE TTV macro instruction with 
READ TT macro instructions. 
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Input message blocks are the same as 
those described under "Read Buffer. " 

Examples of WRITE and READ macro 
instructions for reading a buffer from 
position are: 

WRITE DECB1,TI, DCB1,0UTBF1, 8, SNTRY3, 3 
WRITE DECB2 ,TTV,DCB1 , (INBUF1 r 0UTBF2) , 

(256,4), f 3 
READ DECB3, TT, DCB1, INBUF1, 256, , 3 

Write Operations 



and write a message block using one of the 
sequences of WRITE macro instructions 
listed in Figure 55 with the entry operand 
of the WRITE TC or WRITE TI macro instruc- 
tion specifying the name of the terminal 
list and the inoutarea operand of the WRITE 
TI or WRITE TT macro instruction specifying 
a buffer that contains (in EBCDIC or ASCII) 



r T T-T T T T 

|STX|ESC| 5 |WCC| orders and text | ETX | 
l x x_x x x J 



Write Buffer : To connect a switched 3275 
and write a message block or blocks, use 
the appropriate sequence of WRITE macro 
instructions described under "BSC Switched 
Point-to-Point Operation" in the chapter 
"BSC Read and Write Operations" and in 
Figure 55. 

The entry operand of the WRITE TC or 
WRITE TI macro instruction specifies the 
name of the terminal list and the inoutarea 
operand of the WRITE TI or WRITE TT macro 
instruction specifies a buffer that con- 
tains (in EBCDIC or ASCII) : 



I T T-T T T 1 

|STX|ESC|1|WCC| orders and text | ETX | 
i x x_x x x_ J 



Examples of WRITE macro instructions for 
erasing and writing a buffer are the same 
as those given under "Write Buffer. " 

Erase Unprotected Fields : To connect a 
327 5 and set all unprotected fields in its 
buffer to nulls (binary zeros) , use one of 
the sequences of WRITE macro instructions 
listed in Figure 55 with the entry operand 
of the WRITE TC or WRITE TI macro instruc- 
tion specifying the name of the terminal 
list and the inoutarea operand of the WRITE 
TI or WRITE TT macro instruction specifying 
a buffer that contains (in EBCDIC or 
ASCII) : 



r t t-t 1 

I STX | ESC j ? j ETX | 
L X X_X J 



For information about the WCC and the 
orders and text that may follow it, see IBM 

3270 Information Display System, Library 
Users Guide. An SBA order sequence should 
follow immediately after the WCC, so that 
the write operation can be retried if an 
error occurs. 

The line must be reset to control mode 
to allow the terminal operator to request 
control of the line when he is ready. 
Since WRITE TR will allow the operator only 
nine seconds to respond before timeout 
occurs, a WRITE TRM can be used to wait for 
terminal response. If WRITE TRM is used, 
the programmer should use system time faci- 
lities to determine when terminal operator 
response time has become too long. 

Examples of WRITE macro instructions for 
writing a buffer are: 

WRITE DECB1,TI,DCB1,0UTBUF,128,SNTRY1,2 
WRITE DECB2,TR,DCB1,,,,2 

WRITE DECB1 , TI , DCB1 , OUTBF1 ,256, SNTRY3 - 2 
WRITE DECB2,TT,DCB1,0UTBF2, 256, , 2 
WRITE DECB3 , TR , DCB1 , , , , 2 

Optype TRM can be used in place of TR in 
these examples. 

Erase and Write Buffer : To connect a 3275, 
clear its buffer to nulls (binary zeros) , 



For more information about the results of 
this operation, see IBM 3270 Information 

Display System, Library Users Guide. 



An example of WRITE macro instructions 
for erasing all unprotected fields is: 

WRITE DECBl,TI,DCBl,OUTBUF,U,SNTRYl,2 
WRITE DECB1 , TR , DCB1 , , , , 2 

Optype TRM can be used in place of TR in 
this example. 

Operator Considerations 

The terminal operator can not make a suc- 
cessful connection if the 3275 STATUS indi- 
cator is on at the time he plans to dial 
the CPU. The operator should be instructed 
to turn off the STATUS indicator by turning 
the power off and then on again. If the 
error is recurrent, it will recur after a 
successful connection is made. 

It is preferable to control disconnect- 
ing from the application program rather 
than depending on the terminal operator to 
complete the input/output session by 
operating the DISCONNECT switch. (Refer to 
"Programming Notes" in this section for the 
case in which the 3275 has no more data to 
send to the CPU.) However, if the applica- 
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tion depends on the terminal operator to 
end a session, the DISCONNECT switch sends 
a DLE EOT sequence to the CPU. If the data 
set associated with the TCU attached to the 
CPU has an automatic disconnect feature, 
disconnection occurs, and the line is dis- 
abled. If the data set at the CPU does not 
have this feature, the program must issue a 
WRITE Disconnect upon recognizing the DLE 
EOT in the inout data stream or DECRESPN 
field of the DECB. The WRITE Disconnect 
sends a DLE EOT to the device and the line 
is disabled. 

Programming Notes ; If a message block end- 
ing with an ETB is received in response to 
a READ TI, READ TT, READ TC, READ TP, READ 
TRV, READ TCW, WRITE TIV, WRITE TTV, or 
WRITE TQ, do not follow with WRITE TT or 
WRITE TTV. if the text is received without 
error, the next operation should always be 
READ TT macro instruction. 

If a WRITE TI is used to erase unpro- 
tected fields, do not follow with WRITE TT 
or WRITE TTV. If the operation completes 
without error, the next operation should 
always be WRITE TR or WRITE TRM. 

If a WRITE TI or WRITE TT is used to 
start a printer (WCC specifies "start 
print") , do not follow with WRITE TT or 
WRITE TIV. If the operation completes 
without error (WACK response to text 
received) , the next operation should always 
be WRITE TR or WRITE TRM. 

If a switched 3275 has no more data to 
be read (completion code of X'm* and 
timeout) , the next operation should be a 
WRITE TD, WRITE TQ, or WRITE TRM. (Refer 
to the chapter "Suggested Retry Options for 
BSC Read and Write Operations.") 



• A WRITE TI, TIV, TT, or TTV macro in- 
struction receives an EOT response to 
write text (completion code is X'41*; 
bit 1 is on in the DECFLAGS field of 
the DECB; EOT is in byte 1 of the 
DECRESPN field of the DECB) 

To receive the error status message, the 
problem program should take the following 
steps : 

1. Issue a WRITE TRM to write EOT and 
read ENQ (the 3275 must bid for the 
line) . 

2. Issue READ TT to read the error status 
message. 

3. Issue another READ TT to acknowledge 
receipt of the error status message 
and receive EOT. 

4. Examine the sense/status bits and pro- 
ceed accordingly. See Appendix C for 
a description of the error status mes- 
sage and suggested actions based on 
its contents . 

Exceptional Conditions 

If the completion code is X^F* and bit 1 
is off and bit 6 is on in the DECFLAGS 
field of the DECB, an error status message 
was received in response to a READ TI, READ 
TT, READ TC, or READ TCW macro instruction. 

If the Completion code is X'7F' and bits 
and 1 are on in the DECFLAGS field of the 
DECB, a WACK was received in response to a 
WRITE TI or WRITE TT macro instruction. If 
the write operation started a printer, this 
is a normal completion. A WRITE TR or 
WRITE TRM macro instruction must follow to 
reset the line. 



ERROR RECOVERY PROCEDURES AND ERROR 
RECORDING 



RETRY OPTIONS 



See the chapter "Error Recovery Procedures 
and Error Recording," and see Appendixes B 
and C. 



See the switched 3275 BSC2 retry options in 
the chapter "Suggested Retry Options for 
BSC Read and Write Operations. " 



Error Conditions 

An error status message should be read from 
the switched 3275 if: 

• A READ TI (Auto Call) or WRITE TI, TIV, 
or TC macro instruction receives an ID 
NAK response to a CPU call to a 
switched 3275 (completion code is 
X'7F*; bit 1 is on in the DECFLAGS 
field of the DECB) 



ONLINE TESTING 

See "Online Testing for Binary Synchronous 
Communications Lines" in the chapter 
"Online Testing." 

To obtain standard IBM maintenance for a 
switched 3275 display system, the online 
testing facility must be available. 



A WRITE TQ macro instruction receives a 
NAK response to ENQ (completion code is 
X* 41* ; NAK is in byte 1 of the DECRESPN 
field of the DECB) 



IOCAL 3270 DISPLAY SYSTEM 

The functions provided by BTAM for remote 
stations have been extended to support 
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Figure 56. Sample Local 3270 Display Systems Showing Device Addresses 



local 3270 display stations and printers as 
local devices using EBCDIC code. 



IODEVICE UNIT=2377,ADDRESS=231, 
IODEVICE UNIT=3286,ADDRESS=233, 



DEFINING THE LOCAL 3270 DISPLAY SYSTEM 

Identifying Local 3270 Devices 

The control unit and devices in a local 
3270 display system are identified as local 
during system generation. The IODEVICE 
system generation macro instruction 
operands that apply to the local 3270 dis- 
play system are: UNIT, ADDRESS, MODEL, and 
FEATURE. For more information about the 
IODEVICE system generation macro instruc- 
tion, see Appendix D. For more information 
about models and features of the local 3270 
display system, see IBM 3270 Information 
Display System, Library Users Guide. 

Example : The following system generation 
macro instructions are used to identify the 
local 3270 display systems shown in Figure 
55: 



IODEVICE UNIT=3277,ADDRESS=221, 

IODEVICE UNIT=3286,ADDRESS=222, 

IODEVICE UNIT=3277,ADDRESS=225, 

IODEVICE UNIT=3284,ADDRESS=227, 

IODEVICE UNIT=3277,ADDRESS=22E, 



Grouping Local 3270 Devices 

local 3270 devices are grouped together in 
the same way as remote terminals. Each 
local 3270 device is equivalent to a com- 
munication line. Each group of local 3270 
devices is equivalent to a line group. 

Local 3270 devices may be grouped during 
system generation by means of the UNITNAME 
macro instruction. Or line groups may be 
specified during program execution by means 
of the UNIT parameter of the DD statement. 

Local 3270 devices making up a line 
group are associated with one DCB. The 
DDNAME in the DCB must be the same as the 
name of the DD statement for the line 
group. A line group can contain up to 60 
devices. A line group need not include all 
the devices on a control unit; it can 
include devices from several control units. 
Each local 3270 device is identified by its 
relative line number (RLN) . The relative 
line numbers are determined by the order in 
which devices are grouped during system 
generation or program execution. 
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Group 3 



Figure 57. Line Group and Relative Line 
Numbers for Example 1 



Example 2 ; To define (during program 
execution) the line groups and relative 
line numbers shown in Figure 58, see 
"Example 2" under "Defining Communications 
Line Groups" in the general section "Defin- 
ing the Teleprocessing System." (Address 
221 would be coded in place of 021, 227 in 
place of 027, etc.) 

For a description of the DCB macro in- 
struction, see "Defining Communications 
Line Groups" in the general section "Defin- 
ing the Teleprocessing System." The DCB 
macro instruction operands that apply to 
the local 3270 display system are: DSORG, 
MACRF, DDNAME, BUFNO, BUFL, BUFCB, EXLST, 
EROPT, and READYQ. 

The local 3270 device can be identified 
in a READ or WRITE macro instruction by 
means of the DCB and the relative line num- 
ber; no terminal list is needed. There- 
fore, the DFTRKLST macro instruction is not 
used for the local 3270 display system. 
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Figure 58. Line Group and Relative Line 
Numbers fox Example 2 



Example 1 ; To define (during system 
generation) the line groups and relative 
line numbers shown in Figure 5 7 for the 
local 3270 display systens shewn in Figure 
56, see "Example 1" under "Defining Com- 
munications Line Groups" in the general 
section "Defining the Teleprocessing Sys- 
tem. " (Address 221 would be coded in place 
of 021, 222 in place of 022, etc.) 



BUFFER MANAGEMENT 

See the general section "Buffer Manage- 
ment." Dynamic buffering cannot be used 
for the local 3270 display system. The 
REQBUF and RELBUF macro instructions can be 
used for manipulating buffer pools. 



CODE TRANSLATION 

Since only EBCDIC code is used, code trans- 
lation does not apply to the local 3270 
display system. 

In the I/O interface code for six-bit 
structured data in all 3270 messages, the 
setting of the two high- order bits is 
determined by the setting of the six low- 
order bits in the byte (see Figure 47) . 
Six-bit structured data includes the WCC, 
attribute character, and cursor and buffer 
addresses; for more information, see IBM 
3270 Information Display System/ Library 
Users Guide . 



ACTIVATING AND DEACTIVATING THE LOCAL 3270 
DISPLAY SYSTEM 

See the general section "Activating and 
Deactivating the Teleprocessing System." 
The OPEN and CLOSE macro instructions are 
used to activate and deactivate line groups 
of local 3270 devices. The LOPEN macro in- 
struction is used to activate a specific 
local 3270 device when the OPEN macro in- 
struction has been unsuccessful. 
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ATTENTION INTERRUPTIONS AND READ INITIAL 
OPERATIONS 

When the operator of a local 3270 display 
station carries out certain actions, such 
as pressing the ENTER or CLEAR key, pres- 
sing a PF or PA key, or selecting a detect- 
able field with the selector pen, an I/O 
interruption, called an attention interrup- 
tion, occurs. If a DCB has been opened for 
a line group that includes the display sta- 
tion, the attention interruption is reco- 
rded for the display station. If a DCB has 
not been opened, the attention interruption 
is ignored. 

The READ TI macro instruction for the 
local 3270 display system includes the deb 
operand, which specifies a DCB, and the rln 
operand, which specifies a local 3270 dis- 
play station in the line group associated 
with the DCB. When a READ TI macro in- 
struction is issued, it causes a check 
(beginning with the display station speci- 
fied by the rln operand) of whether an 
attention interruption has been recorded 
for any of the local 3270 display stations 
in the specified line group. 

If an attention interruption has 
occurred, a read initial operation is 
started to read a message from the display 
station from which the attention interrup- 
tion came. When the message has been 
received, the READ macro instruction is 
posted complete, and the relative line num- 
ber of the display station is placed into 
the DECPOLPT field of the DECB. Only one 
attention interruption is serviced for each 
READ TI macro instruction, and only one 
message is read. After a READ TI macro in- 
struction has been issued, the problem pro- 
gram cannot issue another READ or WRITE 
macro instruction specifying the same DCB 
until either the read initial operation has 
been posted complete or the read request 
has been canceled ty means of the RESETPL 
macro instruction. Attention interruptions 
that occur between read initial operations 
are recorded for the display stations and 
serviced by later READ TI macro 
instructions. 

If no attention interruption has 
occurred for the display stations asso- 
ciated with the DCB (when a READ TI macro 
instruction is issued) , a read request 
(that is, a pending read initial operation) 
is recorded for the line group. When an 
attention interruption comes froir one of 
the display stations, the pending read ini- 
tial operation is started for that display 
station, and the read request is cleared 
for the line group. If READYQ is specified 
a test for any device end interruptions 
is made before recording a read request 
for the line group. If one is- found 
READYQ processing will be initiated and 



the READ TI will be posted as stated 
under the section DEVICE END INTERRUPTS 
and BTAM READYQ. If no device end has 
been recorded then the read request will 
be recorded as usual. 

CHGNTRY Macro Instruction 

A special form of the CHGNTRY macro in- 
struction is used in handling attention 
interruptions from the local 3270 display 
station. A CHGNTRY macro instruction with 
the SKIP operand is used to have a display 
station skipped, so that a read initial 
operation is not started (that is, an EXCP 
iracro instruction is not issued) for that 
display station when a READ TI macro in- 
struction is issued, even though an atten- 
tion interruption has occurred. (If, when 
a READ TI macro instruction is issued, all 
display stations in the line group are to 
be skipped, a pending read initial opera- 
tion is recorded for the line group.) A 
CHGNTRY macro instruction with the ACTIVATE 
operand is used to have a display station 
activated, so that a read initial operation 
is started when a READ TI macro instruction 
is issued, and an attention interruption 
has occurred. If, when the display station 
is activated, a pending read initial opera- 
tion has been recorded for the line group 
and an attention interruption has been 
recorded for that display station, the 
pending read initial operation is started 
(that is, an EXCP macro instruction is 
issued) . 

Note : This form of the CHGNTRY macro in- 
struction affects only read initial opera- 
tions; it does not affect other local 3270 
read or write operations. 



I Name 



Y 

| [symbol] | CHGNTRY 
I I 

I 1 



| Operat ion j Operand 



|dcbaddr,ATTLST, 
| listposition, , 
| (SKIP 
| i ACTIVATE 
.X__ 



debaddr 

specifies the address of the DCB asso- 
ciated with the line group that 
includes the local 3270 display sta- 
tion to be skipped or activated. 

ATTLST 

specifies that the relative line num- 
bers of the local 3270 display sta- 
tions in the line group associated 
with the DCB are to be treated as an 
attention list. 

listposition 

specifies the relative line number of 
the local 3270 display station to be 
skipped or activated. 

SKIP 

specifies that the local 3270 display 
station is to be skipped; that is, an 
attention interruption that has been 
recorded for the display station is to 
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be ignored if a READ TI macro instruc- 
tion is issued. 

ACTIVATE 

specifies that the local 3270 display 
station is to be activated; that is, a 
read initial operation is to be 
started if an attention interruption 
has been recorded for the display sta- 
tion when a READ TI macro instruction 
is issued. 

Return Codes ; When this form of the 
CHGNTRY macro is used, the return codes 
have the following meanings: 

Code Meaning 

X'00* The requested action was or has 
been performed successfully. 

X'08' The requested action was not per- 
formed, because the RLN was too 
high or BTAM found an invalid 
control block. 

RESETPL Macro Instruction 

A special form of the RESETPL macro in- 
struction is used for the local 3270 dis- 
play system to cancel a read initial opera- 
tion that is pending (because a READ TI 
macro instruction was issued when an atten- 
tion interruption had not occurred) . 

r t t 1 

| Name | Operation | Operand | 

j 4 + ^ 

| [symbol! | RESETPL | decbaddr [ , ATTENT 1 | 

L- X -L J 

decbaddr 

specifies the address of the DECB for 
the pending read initial operation 
that is to be canceled. 

ATTENT 

specifies that cnly the instructions 
required to cancel a pending read ini- 
tial operation for a local 3270 dis- 
play system are to be generated by 
this macro instruction. 

If no second operand is specified, 
instructions are generated to deter- 
mine the line type, and the proper 
instructions for that line type are 
executed. 

Note ; If POLLING or ANSRING is speci- 
fied as the second operand, instruc- 
tions for the local 3270 display sys- 
tem are not generated. 

Programming Notes ; The RESETPL macro in- 
struction does not halt read initial opera- 
tions that have been started; it does pre- 
vent the outstanding READ TI macro instruc- 
tion from having any subsequent attention 
interruptions serviced. If a read initial 
operation is pending (that is, it has not 



been started) , the IOBs are marked free, 
and a completion code of X'48' is posted in 
the ECB. If a read initial operation has 
been started, the IOBs for active devices 
are not marked free, and a completion code 
is not posted in the ECB by the RESETPL 
macro instruction. 

Follow the READ TI macro instruction 
with a WAIT macro instruction with the ECB- 
LIST operand (or a TWAIT macro instruction) 
that specifies multiple ECBs, the ECB in 
the DECB specified by the READ TI macro in- 
struction and another ECB. To allow the 
RESETPL macro instruction to be issued to 
cancel the read initial operation, post the 
other ECB. Provided that the RESETPL macro 
instruction gave a return code of X'OO' or 
X*04', follow the RESETPL macro instruction 
with a WAIT macro instruction that speci- 
fies the ECB in the DECB specified by the 
READ TI macro instruction. A completion 
code of X*7F* indicates that a read initial 
operation had been started and that it com- 
pleted successfully. Other READ and WRITE 
macro instructions can then be issued. 

Return Codes ; When this form of the 
RESETPL macro instruction is used, the 
return codes have the following meanings; 

00 This code is set when the pending read 
initial operation for the specified 
DECB was canceled successfully. 

04 This code is set when a read initial 
operation for the specified DECB was 
started and will complete normally (see 
"Programming Notes" above) . 

08 This code is set for an illegal 

request. BTAM found that the speci- 
fied DECB is not associated with a 
local 3270 display system. 

0C This code is set for an unsuccessful 
request, the DCB was not open or BTAM 
found an invalid control block. 

10 This code is set when the last macro 
instruction for the line group was not 
a RDTI 

READ AND WRITE OPERATIONS 

See "Read and Write Macro Instructions" and 
Figure 20 in the general section "Line Con- 
trol and Message Transmission," see "READ 
Macro Instructions" and "WRITE Macro 
Instructions" under the heading "Local IBM 
3270 Display System" in the section "Local 
Read and Write Operations," and see Appen- 
dixes B and G. 

Read Operations 

Read Modified Fields for Operator Input ; 
To read a message from a display station 
after an attention interruption has come 
from it as the result of some action ty the 
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display station operator, use the READ TI 
macro instruction. The rln operand speci- 
fies which display station in the line 
group should be checked first for an atten- 
tion interruption. 



If the operator pressed the ENTER key 
or pressed a PF key, READ TI macro in- 
struction causes a normal read. If the 
device buffer was formatted, the buffer 
specified by the inoutarea operand con- 
tains a message with the format: 

r t t t t r T 

I I cursor | | buffer | | | 
| AID J address | SBA | address | text | SBA | 
i x x x x x J 

12 12 1 

r r r-lh 

| buffer | | | 

| address j text J | 

L_- X X HH 

2 

If the operator selected detectable 
fields with the selector pen, the mes- 
sage block has the same format except 
that it contains no text. 

If the device buffer was unformatted, 
the buffer specified by the inoutarea 
operand contains a message with the 
format: 



~th 



r t t- 

| | cursor | 

| AID | address | text | 

t_x x -} t J 

1 2 

The length of the message can be calcu- 
lated from the DECCOUNT field in the 
DECB, which contains the residual 
count. If the residual count is zero, 
the READ TMP macro instruction may be 
used to continue reading data. 

• If the operator pressed the CLEAR key 
or pressed a PA key or if a card was 
extracted from the badge reader, the 
READ TI macro instruction causes a 
short read. The buffer specified by 
the inoutarea operand contains: 



r t 

| AID | 

L J 



If a card or cards were read by means 
of the operator identification card 
reader, the buffer specified by the 
inoutarea operand contains a message in 
the same format as a message resulting 
from pressing the ENTER key. The cur- 
sor address contains the address of the 



last character read from the identifi- 
cation card (the LRC character) . 

• If a test request message was entered 
and EROPT=T was not specified in the 
DCB, the buffer specified by the inout- 
area operand contains: 

r t t t t 1 

|SOH| % | / |STX|text| 
i x x x x J 



The relative line number of the display 
station from which the message was read is 
placed into the low-order byte of the 
DECPOLPT field of the DECB. 

To cancel the read initial operation 
requested by a READ TI macro instruction 
(if the operation is pending), issue the 
RESETPL macro instruction specifying the 
DECB from the READ TI macro instruction. 

Do not issue a READ TI macro instruction 
specifying a DCB associated with a line 
group that contains only printers, since 
the local 3270 printer cannot generate 
attention interruptions. 

An example of a READ macro instruction 
for reading modified fields for operator 
input is: 

READ DECB1,TI,DCB1,INBUF1,300,,2 

Read Modified Fields : To read a message 
from a device independently of action by 
the display station operator, use the READ 
TM macro instruction. 

If the AID byte in the message contains 
neither c*-' nor C'Y* or if the first byte 
is an SOH, the buffer specified by the 
inoutarea operand contains a message with 
one of the formats described under "Read 
Modified Fields for Operator Input." 
Otherwise, the contents of the buffer are 
unpredictable; the message is probably non- 
existent or incomplete. 

The length of the message can be calcu- 
lated from the DECCOUNT field in the DECB, 
which contains the residual count. If the 
residual count is zero, the READ TMP macro 
instruction may be used to continue reading 
data. The relative line number of the 
device from which the message was read is 
placed into the DECPOLPT field of the DECB. 

An example of a READ macro instruction 
for reading modified fields is: 

READ DECB1,TM,DCB1,INBUF1,300,,3 

Read Modified Fields from Position : To 
read a message from a device, use the READ 
TMP macro instruction with the entry 
operand specifying an area that contains: 
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r t t 1 

| | | buffer | 
|WCC| SBA | address j 
t x x J 

11 2 

The VICC should inhibit reset of modified 
data tags, and the buffer address should 
indicate where the read modified operation 
is to start. Data transfer begins with the 
first modified field at or following the 
buffer address specified. 

Input messages are the same as those 
described under "Read Modified Fields." 

An example of a READ macro instruction 
for reading modified fields from position 
is: 

READ DECBl, TMP , DCB1 , INBUF1, 300, ENTRY1, 1 



The WCC should inhibit reset of modified 
data tags (if their setting is wanted in 
the input message) , and the buffer address 
should indicate where the read buffer 
operation is to start. 

Input messages are the same as those 
described under "Read Buffer." 

An example of a READ macro instruction 
for reading a buffer from position is: 

READ DECB1,TBP,DCB1,INBUF1,300,ENTRY2,3 



Write Operations 

Write Buffer : To write a message to a 
device, use the WRITE TI macro instruction 
with the inoutarea operand specifying a 
buffer that contains: 



Read Buffer : To read a message from a 
device, use the READ TB macro instruction. 
If the device buffer was formatted, the 
buffer specified by the inoutarea operand 
contains a message with the format: 

r t t~5 (~T — t r T _ 5fi 

| .{cursor | " | | | | ' | 

| AID | address | | SF| attribute | text | | 
i x X.-/C1X — x x X_T(lJ 

12^1 1 uIr 

If the device buffer was unformatted, the 
buffer specified by the inoutarea operand 
contains a message with the format: 



r T T _^ 

| | cursor | | 
| AID | address | text | 
l x x _ y/J 

1 2 

The length of the message can be calcu- 
lated from the DECCOUNT field in the DECB, 
which contains the residual count. If the 
residual count is zero, the READ TBP macro 
instruction may be used to continue reading 
data. The relative line number of the 
device from which the message was read is 
placed into the DECPOLPT field of the DECB. 



r t t 

j WCC | orders and text| 
t x J 

1 

For information about the WCC and the 
orders and text that may follow it, see IBM 

3270 Information Display System/ Library 
Users Guide . An SBA order sequence should 
follow immediately after the WCC, so that 
the write operation can be retried if an 
error occurs. 

An example of a WRITE macro instruction 
for writing a buffer is: 

WRITE DECB1,TI,DCB1,OUTBUF,300,,2 

Erase and Write Buffer : To clear its buf- 
fer to nulls (binary zeros) and write a 
message to a device, use the WRITE TS macro 
instruction with the inoutarea specifying a 
buffer that has the same contents as 
described under "Write Buffer." 

An example of a WRITE macro instruction 
for erasing and writing a buffer is: 

WRITE DECB1,TS,DCB1,OUTBUF,300, ,2 



An example of a READ macro instruction 
for reading a buffer is: 

READ DECB1,TB,DCB1,INBUF1,300,,2 

Read Buffer from Position : To read a mes- 
sage from a device, use the READ TBP macro 
instruction with the entry operand specify- 
ing an area that contains: 

r t T T 

I I I buffer | 
| WCC j SBA | address | 
l x x j 

1 1 2 



Erase and Write Alternate Buffer : To place 
the selected device (display or printer) 
into a mode of using the alternate buffer 
size for that device, clear the buffer to 
nulls (binary zeros) and write a message 
to a device, use the WRITE TSA macro 
instruction with the inoutarea specifying 
a buffer that has the same contents as 
described under "Write Buffer" . This 
macro instruction does not apply for 
devices attached to a 3272 Control Unit. 
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An example of a WRITE macro instruction 

for invoking alternate buffer size, erasing, 

and writing a buffer is: 

WRITE DECB^TSAfDCBlfOUTBUF^OO,^ 

Programming Notes : 

1. The alternate buffer mode will remain in 
effect until an Erase/Write is sent (via 
a Write TS macro, Test Request processing 
OPEN macro or LOPEN macro) from the host. 
Operation of the CLEAR key for displays 
and Power-On for both displays and 
printers will also set the buffer size 

to its default buffer to be erased to 
nulls. 

2. The default and alternate buffer sizes 
for the 3278 Display Station or 3287 
or 3289 Printers are: 







Model 






! ' 1 
1 . 2 J 3i 4 






i 1 __ |_ 


Default 


1 — 


i l i 
480 ] 1920]1920'1920 


Alternate 




960 ; 1920]2560|3440 



I 



3. All commands except Erase/Write and 

Erase/Write Alternate are based on the 
current (last invoked) buffer size. 
Any application that invokes alternate 
buffer size should return the device 
to its default buffer size before the 
application terminates. This will 
reduce the possibility of starting a 
second application (which may not be 
aware of alternate buffer sizes) with 
the device in a buffer size other than 
the one expected. 



Except for the optype, operands for this 
macro are the same as those for the WRITE 
Erase macro instruction. The optype for 
the WRITE Structured Field macro is TSF. 

An example of the WRITE Structured Field is: 

WRITE DECB1,TSF,DCB1,0UTBUF, 

300,, 2 

Programming Note : Any application program 
which uses Write Structured Field mode for 
a local 3274 Model ID should, before termi- 
nating, return the device to its local 3270 
(default) mode. This will avoid starting 
a second application program, which may not 
use Write Structured Field, with the device 
in Write Structured Field mode. To reset 
Write Structured Field mode, issued an Erase 
Write Alternate or Erase/Write command with 
a WCC of .1 

BTAM OPEN and LOPEN routines and Request- 
for-Test (RFT) processing will issue an 

Erase/Write command with a WCC of .1 , 

thus reseting Write Structured Field mode 
for local 3274 Model ID devices. 



Erase Unprotected Fields : To set all 
unprotected fields in the buffer of a 
device to nulls (binary zeros), use the 
WRITE TUS macro instruction with the inout- 
area operand specifying any real address 
and the inoutlength operand specified as 
one. 

For more information about the results 
of this operation, see IBM 3270 Information 

Display System, Library Users Guide. 

An example of a WRITE macro instruction 
for erasing all unprotected fields is: 

WRITE DECB1,TUS,DCB1,0UTBUF,1, ,2 



Write Structured Field : This operation 
transfers a data stream containing struc- 
tured fields to a specified device. The 
Write Structured Field macro instruction 
is supported in OS/VS1 and OS/VS2 MVS and 
applies only to those local devices with 
structured field capability, that is, de- 
vices attached to a 3274 Model ID Control 
Unit. Devices unable to support structured 
fields, that is, those attached to a 3272 
or 3274 Model IB Control Unit, will reject 
the Write Structured Field with a command 
reject error. This instruction will not 
cause any specific device action; however, 
the structured field contains a type field 
which will cause a device action. For more 
information on structured fields see IBM 
3270 Information Display System Library 
Users Guide. 



Note : Write operations to local 3270 
printers are not posted complete until 
device end is sent by the device. Separate 
DECBs are recommended for printer opera- 
tions to allow the application to perform 
I/O operations to other devices while print 
operations are in progress. The separate 
DECBs avoid extended waiting for completion 
of a print operation. 



PREPARE TO READ OPERATIONS 

The. Prepare to Read operation applies to 

local 3274 Model ID devices in OS/VS1 and 

OS/VS2 MVS. Prepare to Read does not apply 

to the 3272, 3274 Model IB, or remote 3270 
Control Units. 
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Display systems with Prepare to Read capa- 
bility communicate with a host program so 
that at selection time of a particular 
display or printer, the next program action 
(for example Read Modify, Read Buffer) is 
known by the display system. The display 
system performs initialization sequences 
while the host prepares and issues the next 
action. This overlap of host and control 
unit activity frees the channel and control 
unit resources. 

Prepare to Read does not have to be speci- 
fied because the 3274 Model ID will operate 
in default mode, using the previously de- 
fined (local 3270) select command. 

To use Prepare to Read select commands, the 
devices attached to a 3274 Model ID must be 
specified (in OS/VS1 or OS/VS2 MVS operating 
systems) as supporting the Prepare to Read 
select commands. Specifying FEATURE^P TREAD 
in the IODEVICE macro sets an indicator in 
the Unit Control Block (UCB) . If the indi- 
cator is on, BTAM constructs channel pro- 
grams containing the Prepare to Read select 
commands. If the indicator is off, BTAM 
continues to use the local 3270 (default) 
select command. The result is that BTAM 
application programs do not require modifi- 
cation to use the Prepare to Read select 
commands. For more information, see Appen- 
dix D, System Generation. 

Only the following Read/Write macros can 
generate channel programs containing the 
Prepare to Read Select commands: 



Read Buffer from Position 



(TBP) 



Read Macro Instructions 
Read Modified from Position 



(TMP) 



If Prepare to Read has been specified, the 
following channel program will be built 
for Read Modified from Position: 

1. Select Read Modified from Position 
Command 

2. Write Command (to set buffer 
address) 

3. Read Modified Command 



Read Buffer 



(TB) 



If Prepare to Read has been specified, the 
following channel program will be built for 
Read Buffer: 

1. Select Read Buffer Command 

2. Read Buffer Command 



If Prepare to Read has been specified, the 
following channel program will be built for 
Read Buffer from Position: 

1. Select Read Buffer from Position 
Command 

2. Write Command (to set buffer 
address) 

3. Read Buffer Command 
Write Macro Instructions 

Write Initial (TI) 

If Prepare to Read has been specified, the 
following channel program will be built for 
Write Initial: 

1. Select Write Command 

2. Write Command 



The remaining Read/Write macro instructions 
use the local 3270 select command regardless 
of Prepare to Read specification. 

DEVICE END INTERRUPTS AND BTAM READYQ 

When a device of a local 3270 Display 
System recorded as powered off, is 
powered on, a non-related device end I/O 
interruption occurs. If the DCB has 
been opened for the line group containing 
this device and the not ready condition 
has been recorded the device end will be 
recorded, indicating the device ready 
condition. 

If the READYQ option was specified, 
the current or next READ TI macro 
instruction for this line group will 
have its DECB posted with a completion 
code indicating the read initial 
operation was cancelled by a RESE TPL, 
the DECFLAGS- field will contain a 
X'FO' indicating READYQ was activated 
by a device becoming ready (which 
cancels the RD TI) , and the relative 
line number (rln) of the device is 
placed in the DECPOLPT field, inform- 
ing the user which device has become 
ready. If attention interrupts have 
been received from the line group 
they are handled before device end 
interrupts so the user application 
must be prepared to issue a READ TI 
macro for each attention interrupt 
received plus one READ TI for each 
device as it becomes ready. 
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When the user application has been 
notified that a device that was 
turned off at open time has become 
ready it would be appropriate to 
issue an LOPEN macro or an ERASE/ 
WRITE macro to that device. 



ERROR RECOVERY PROCEDURES AND ERROR 
RECORDING 

See the general section "Error Recovery 
Procedures and Error Recording," and see 
Appendix B. 



RETRY OPTIONS 

See the local 3270 retry options in the 
general section "Suggested Retry Options 
for Local Read and Write Operations. " 



ONLINE TESTING 

See "Online Testing for Local 3270 Display 
System" in the general section "Online 
Testing." 

To receive standard IBM maintenance for 
a local 3270 display system, the online 
testing facility must be available. 



SYSTEM GENERATION 

See Appendix D for information about the 
operands that must be included in the 
IOCONTRL and IODEVICE system generation 



nracro instructions when generating an 
operating system that includes BTAM support 
for the remote 3270 display system or the 
local 3270 display system or both. 

For information about other operands and 
other system generation macro instructions 
and about the system generation process, 
see the OS/VS1 or OS/VS2 system generation 
reference manual. 



ONLINE TESTING 

Test programs for the 3270 display system 
can be run under OS/VS using the Online 
Test Executive Program (OLTEP) . For local 
3270 control units and devices, an online 
test program and a BTAM application program 
can be executed concurrently; only the con- 
trol unit or device being tested is 
unavailable to the application program. 
For remote 3270 control units and devices, 
a BTAM application program must end use of 
the line before an online test program can 
be executed. 

For more information about OLTEP, see 
OS/VS OLTEP, GC28-0636. 



CONVERSION 

For information about converting from 2260 
display stations to the 3270 display sys- 
tem, see IBM 2260 BTAM and 2260 GAM to IBM 
3270 BTAM Conversion Guide, GC27-6975. 
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IBM 3650 RETAIL STORE SYSTEM 



BTAM supports binary synchronous communica- 
tion with the 3650 Retail Store System. 
The 3650 system is designed to provide re- 
tail merchandisers with a store system 
that controls terminals handling point-of- 
sale transactions, data entry and inquiry, 
report printing, and merchandise marking 
applications. A store can operate either 
on an interactive or batch basis with 
applications in the host computer. 



Devices in the system include the 3651 
Store Controller Model 50, 3275 Model 3, 
3653 Point of Sale terminal, and the 3657 
Ticket-Unit terminal. With BTAM support, 
the 3650 system attaches to an IBM 3704 or 
3705 Communications Controller that runs in 
emulation mode. For detailed information 
on the 3650 Retail Store System, see IBM 
3650 Subsystem Definition P ro grammer * s 
GuT3e7~GC30-30237 
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IBM 3660 SUPERMARKET SYSTEM 



BTAM supports binary synchronous communica- 
tion with the 3660 Supermarket System. The 
3660 system provides complete supermarket 
checkout functions, as well as specific 
data capture and store support procedures. 
Grocery merchandise is marked with the 
Universal Product Code Symbol (A and E) . 
Devices in the system include the 3666 
Checkout Scanner, the 3663 Supermarket 
Terminal, and the 3651 Store Controller 
Model 60. When loaded with data (such as 



prices) , operator authorizations, and cus- 
tomer data (for check authorization, if 
desired) , the 3660 system can perform all 
checkout functions on a closed in -store 
loop system. With BTAM support, the 3660 
system attaches to an IBM 3704 or 3705 
Communications Controller that runs in 
emulation mode. For detailed information 
on the IBM 3660 Supermarket System, see IBM 
3660 Supermarket System Programmer's GuideT 
GC30-30257 
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IBM 3735 PROGRAMMABLE BUFFERED TERMINAL 



The 3735 Programmable Buffered Terminal is Detailed information about the facili- 

a stand-alone programmable terminal. The ties that the 3735 provides is found in IBM 

3735 contains a communication interface and 3735 Programmer's Guide , GC30-3001, which 

the controls necessary to use the BTAM BSC describes the methods and facilities neces- 

facilities to transmit properly assembled sary to design, write, and generate form 

and structured Form Description programs to description programs, 
any terminal in the network and to receive 
messages and data from the 3735 terminals. 
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IBM 3741 MODEL 2 DATA STATION, IBM 3747 DATA CONVERTER 



BTAM supports binary synchronous communica- 
tion with the IBM 3741 Data Station and the 
IBM 37 47 Data Converter equipped with the 
BSC adapter for point-to-point switched or 
nons witched lines. For information con- 
cerning the IBM 3741 Data Station and the 
IBM 3747 Data Converter, see the IBM 3741/ 
3742 Data Stations Reference Manual , GA21- 
9151, and the IBM 3747 Data Converter 
Reference Manual , GA21-9153. Support under 



BTAM is supplied by specifying UNIT=BSC1 
(nonswitched point-to-point) , UNIT=BSC2 
(switched point-to-point) , or BSC3 
(multipoint) in the IODEVICE macro instruc- 
tion. A detailed description of the macro 
instructions supported, ID verification, 
error recovery, and other programming 
information may be found in IBM 3740 BTAM/ 
TCAM Programmer's Guide , GC21-5071. 
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IBM 3750 SWITCHING SYSTEM {WORLD TRADE USERS ONLY) 



BTAM supports binary synchronous communica- programming information for the 3750 is in 
tion with the IBM 3750 Switching System on 3750 Switching System Application Proqram- 
a nons witched point-to-point line. BTAM roer's Guide . GC11-6000. 
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IBM 3780 DATA COMMUNICATION TERMINAL 



The IBM 3780 is similar in operation to the 
IBM 2770 (see the section "IBM 2770 Data 
Communication System — Programming Consi- 
derations"). The 3780, however, does not 
necessarily have component selection. A 
3780 without component selection will fold 
and print component selection characters 
received on a point-to-point line. It will 
not respond if component selection charac- 
ters are received on a multipoint line; 
therefore, each polling and addressing 
character sequence should be three charac- 
ters long and omit the component selection 
character. A 3780 with component selec- 
tion, required with the 3781 Card Punch, is 
similar in operation to a 2770 with com- 
ponent selection. 

Information about the 2770 in the sec- 
tions "BSC Read and Write Operations" and 



"Online Testing" 
3780. 



generally applies to the 



For more information about 3780 system 
configurations, transmission codes, and 
operating characteristics (including poll- 
ing and selection and message formats), see 
Component Information for the IBM 3780 Data 
Communication Terminal , GA27-3063. 



Note : BTAM supports the space compression/ 
expansion feature of the 3780 only to the 
extent of passing messages containing com- 
pressed data. The application program must 
do the processing required to make the 
space compression/expansion feature 
operational. 
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IBM 5275 DIRECT NUMERICAL CONTROL STATION 



BTAM supports the 5275 Direct Numerical 
Control Station in an identical manner to 
tne 3275 Display Station. If the 5275 is 
connected on nonswitched lines, use the 
nonswitched 3270 discussion in "IBM 3270 
Information Display System (Remote)" in 
this general section, "BSC Device-Dependent 
Considerations." If the 5275 is connected 
on switched lines, use the switched 3275 
discussion. Additional information on pro- 
gramming the 3270 is described in Introduc- 
tion to Programming the IBM 3270 , GC27- 



6999; in general, this information applies 
also to the 5275. The 5275 itself is 
described in 5275 Direct Numerical Control 
Station Introduction and Component Descrip- 
tion. GA3U-0016. 



Only EBCDIC transmission code is sup- 
ported with the 5275. 

This information is for planning pur- 
poses only until the 5275 is available. 
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ERROR RECOVERY PROCEDURES AND ERROR RECORDING 



BTAM provides facilities 
covery procedures (ERP) 
variety of error conditi 
ing message transmission 
recover from those condi 
sidered recoverable, so 
can continue. In additi 
tic and recovery capabil 
ery procedures : 



called error re- 
that diagnose a 
ons that occur dur- 

and attempt to 
tions that are con- 
that transmission 
on to the diagnos- 
ities, error recov- 



• Provide to the user program information 
about errors from which ERP could not 
recover, so that the program can act 
accordingly. 

• Accumulate in special data sets, called 
the Statistical Data Recorder (SDR) and 
the Outboard Recorder (OBR) , counts of 
certain kinds of errors; these are use- 
ful to the Customer Engineer in analyz- 
ing line and equipment troubles. Mote t 
Timeout, data check, and intervention 
required are not recorded in OBR or SDR; 
they can optionally be recorded in the 
LERB. 

• Notify the operator at the central com- 
puter console (or some other console, 
if the system has the Multiple Console 
Support facility) of certain kinds of 
errors . 

In addition to these ERP-provided func- 
tions, BTAM provides the capability of 
accumulating in a set of counters, collec- 
tively called a line error recording block 
(LERB) , running totals of certain kinds of 
error conditions, and printing these totals 
at the central computer console (or some 
other console, if the system has the Mul- 
tiple Console Support facility) . These 
capabilities are provided by the LERB and 
LERPRT macro instructions. 

Error recovery procedures handle errors 
arising from conditions at remote stations, 
on communications lines, and at transmis- 
sion control units. The action with which 
ERP routines respond to an error condition 
depends on the kind of error, the type of 
I/O command (Poll, Read, Write, etc.) 
being executed when the error occurred, and 
the type of remote station involved. ERP 
routines analyze the error condition, con- 
sidering each of these factors, and per- 
forms the appropriate action. Error condi- 
tions are considered to be in one of two 
categories: irrecoverable and not irrecov- 
erable. Errors that are not irrecoverable 
may be temporary or permanent. An irrecov- 
erable error is one that is inherently in- 
capable of being corrected by program 
action; that is, some form of human inter- 



vention is required. (An exception to this 
is the buffer-unavailable condition, which 
may occur when dynamic buffering is in use 
and the buffer pool becomes depleted. This 
condition (indicated by bit 4 in DECFLAGS) , 
though not recoverable by ERP, can be anti- 
cipated by the user program, which can re- 
quest retransmission of the lost message.) 

ERP does not attempt to recover such 
errors. When an irrecoverable error 
occurs, ERP sets indicators denoting the 
nature of the error in the data event con- 
trol block (DECB) for the line involved in 
the I/O operation, notifies the operator at 
the central computer console by message 
IEA000I (see Appendix C for the format of 
this message) , and records the occurrence 
of the error in the Outboard Recorder (OBR) . 

If an error is not inherently irrecover- 
able, ERP routines attempt to recover from 
it, usually by reissuing the i/6 command 
for which the error occurred or issuing 
other appropriate I/O commands to clear the 
condition. If ERP routines succeed in 
clearing the condition, the error is said 
to be temporary. BTAM records its occur- 
rence in the Statistical Data Recorder 
(SDR) , and the user program continues norm- 
ally. If ERP routines are unsuccessful in 
clearing the condition, the error is said 
to be permanent. BTAM records its occur- 
rence in the Outboard Recorder (OBR) , sets 
bits indicating the nature of the error in 
the DECB for the line involved in the I/O 
operation, and notifies the operator at the 
central computer console, by means of mes- 
sage IEA000I. Note ; Timeout, data check, 
and intervention required are not recorded 
in OBR or SDR; they can optionally be re- 
corded in the LERB. 

BTAM error recovery procedures attempt 
to clear error conditions up to two times, 
for operations on start-stop lines, and up 

| to seven times on BSC lines. Thus, per- 
manent error conditions are indicated in the 
DECB after the I/O operation has been 

| attempted three times (start-stop) or eight 
times (BSC) . Irrecoverable errors are 
indicated in the DECB after only one attempt, 
since such errors are not retried. 

Once an error condition has occurred and 
the ERP facility is trying to recover from 
it, any subsequent errors that may occur 
during the retries are not indicated in the 
DECB to avoid obscuring the original error 
condition. Neither are subsequent errors 
recorded in the SDR, OBR, or LERB, nor are 
they indicated to the console operator. 
This ensures that only errors occurring 
during I/O operations issued by the user 
program are recorded. 
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Error recovery procedures are divided 
into basic functions and additional 
functions. 



BASIC FUNCTIONS 

• When an error occurs during an I/O 
operation that does not involve trans- 
mission of message text (these are 
called nontext errors), ERP retries the 
operation . 

• ERP records each occurrence of a tem- 
porary error in the Statistical Data 
Recorder, and each occurrence of a per- 
manent or irrecoverable error in the 
Outboard Recorder. 

• ERP provides, in the data event control 
block for the line involved, informa- 
tion on (1) permanent errors, (2) irre- 
coverable errors, and (3) errors occur- 
ring during transmission of message 
text (called Read Text and Write Text 
errors) for which ERP does not attempt 
recovery. Recovery of Read Text and 
Write Text errors is an additional ERP 
function, described below. 

• ERP sends a message to the operator at 
the console of the central computer (or 
some other console, if the system has 
the Multiple Console Support facility) 
for each permanent and irrecoverable 
error. 

Basic ERP functions are optional for 
line groups involving start-stop terminals, 
but they are required for line groups 
involving BSC stations. To obtain these 
basic functions for start-stop terminals, 
code EROPT=E in the DCB macro for the line 
group, or omit the EROPT operand. To omit 
the basic functions, code EROPT=N (valid 
only for start-stop line groups) . 

Coding EROPT=N prevents certain ERP rou- 
tines from being included in the system, 
with a consequent saving in storage space. 
It is recommended that EROPT=N be coded for 
line groups for AT6T 83B3 and WU 115A ter- 
minals, for the reasons given in the 
explanation of the EROPT operand in Figure 
7. 



ADDITIONAL FUNCTIONS 

• When an error occurs during execution 
of a Read Text command (called a Read 
Text error) , ERP will optionally retry 
the operation unless dynamic buffering 
is in use. This function is optional 
for the IBM 1050, 2740 (with the Record 
Checking feature), and 2260; it is 
unavailable for other start- stop ter- 



minals; and it is always required for 
BSC stations. 

• When an error occurs during execution 
of a Write Text command (a Write Text 
error) , ERP will optionally retry the 
operation unless dynamic buffering is 
in use. This function is optional for 
start-stop terminals, and results in an 
additional copy of the message text for 
each retry (except for messages sent to 
a card punch or tape punch of an IBM 
1050 with the Line Correction feature, 
or to a 2260 with the Line Address fea- 
ture) ; it is always required for BSC 
stations. 

• ERP will optionally record, in the line 
error recording block, each occurrence 
of a data check, timeout, or interven- 
tion required error. 

These three additional functions are speci- 
fied as follows. To provide recovery 
attempts for Read Text errors (start-stop 
terminals) , code EROPT=R in the DCB macro 
for the line group involved; to provide for 
recovery from Write Text errors (start-stop 
terminals), code EROPT=W. These EROPT 
parameters are ignored if dynamic buffering 
is specified for the line group, or if they 
are specified for a type of terminal for 
which recovery is not available. (It is 
not necessary to explicitly specify recov- 
ery attempts for Read Text and Write Text 
errors for BSC stations; the function is 
always performed for BSC.) 

To provide for recording of errors in 
the line error recording block, code EROPT= 
C in the DCB macro, code a LERB macro to 
define the LERB, and code the name of the 
LERB macro in the LERB operand of the DCB. 

Note : Errors occurring during transmission 
of test messages by the online test facili- 
ty are not recorded in the LERB. 

LERB (Line Error Recording Block) Macro 
Instruction 

IERB defines for each line in a line group 
an area of storage called a line error 
recording block. This block consists of a 
group of counters in which are kept cumula- 
tive totals of data check, intervention 
required, and nontext time-out errors, and 
of the number of transmissions. There are 
two sets of these counters for each com- 
munications line. The contents of one set, 
called the threshold counters, are incre- 
mented each time a transmission or an error 
occurs, until one of the counters (exclud- 
ing the transmission counter) reaches its 
threshold value, which is determined by the 
LERB macro. When the threshold value is 
reached, the contents of all four thres- 
hold counters are printed at the console 
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of the central computer (message IEC801I; 
see Appendix C for the format). The con- 
tents of the threshold counters are added 
to the other set of counters, called cu- 
mulative counters or accumulators, and the 
threshold counters are reset to zero. 

Note: When the transmission counter reaches 
Its~"threshold, the contents of the thres- 
hold counters are added to the cumulative 
counters (or accumulators) and the thres- 
hold counters are reset to zero. Message 
IEC801I is not printed on the console. 

The contents of the accumulators are 
printed, and both sets of counters are 
optionally reset to zero when you issue a 
LERPRT (Line Error Recording Print) macro 
instruction. 

| Name | Operation! Operand | 

^ x x 1 

I symbol I LERB |nlines[ , { ( [trans met) | 
I J | [, datack], [, intreq] j 
I j j t , nontto] )>...) j 
t x x J 

symbol 

is the name of the first line error 
recording block defined by this macro. 
It must be specified; it must also be 
coded in the LERB operand of the DCB 
macro for the line group. 

nlines 

specifies the number of lines compos- 
ing the line group for which the LERB 
macro is defining these blocks. The 
allowable range of values is 1 to 255. 

transmct 

specifies the transmission count 
threshold: the number of consecutive 
transmissions that when reached causes 
the contents of the threshold counters 
to be added to the cumulative counters 
and the threshold counters are reset 
to zero. Message IEC801I does not 
appear on the console when the trans- 
mission threshold is reached. You may 
specify from 1 to 255; if you omit the 
operand, 255 is assumed. 

da tack 

specifies the data check error count 
threshold: the number of data checks 
that when reached causes the contents 
of the threshold counters to be 
printed, and the counters reset to 
zero. You may specify from 1 to the 
value of transmct. If you omit the 
operand, either 10 or the value of 
transmct, whichever is lower, is 
assumed. 

intreq 

specifies the intervention required 
error count threshold: the number of 
intervention required errors that when 



reached causes the contents of the 
threshold counters to be printed, and 
the counters reset to zero. You may 
specify from 1 to the value of 
transmct. If you omit the operand, 
either 5 or the value of transmct, 
whichever is lower, is assumed. 

nontto 

specifies the nontext timeout error 
count threshold: the number of non- 
text timeout errors that when reached 
causes the contents of the threshold 
counters to be printed and the count- 
ers reset to zero. You may specify 
from 1 to the value of transmct. If 
you omit the operand, either 5 or the 
value of transmct, whichever is lower, 
is assumed. 

Of these operands, only nlines is manda- 
tory. If you code only this operand, the 
default threshold counts of 255, 10, 5 and 
5 are assumed for each of the lines in the 
line group. If you code threshold counts 
for one line, the same counts are assumed 
for all successive lines for which you do 
not code threshold counts; the counts are 
effective until you code another set of 
threshold counts . 

Example : 

LG1LERB LERB 10,,, (200, 20,, 7),,, 
(240,20,25,10) 

This LERB macro provides line error record- 
ing blocks for ten lines: 

• The first two lines have assumed 
threshold values of 255 (transmct) , 10 
(datack), 5 (intreq), and 5 (nontto). 

• The next three lines have explicit 
transmct, datack, and nontto threshold 
values of 200, 20, and 7, and an 
assumed intreq threshold value of 5. 

• The remaining five lines have explicit 
threshold values of 240, 20, 25, and 
10. 

Omit the parentheses if you omit all 
the suboperands (transmct, etc.) for a 
line, as has been done for lines 1, 2, 
4, 5, 7, 8, 9 and 10 in the example. 
Also omit trailing commas (as for lines 
7, 8, 9, and 10 above). 

LERPRT (Line Error Recording Print) Macro 
Instruction 

LERPRT causes the current contents of the 
cumulative counters (accumulators) for a 
line to be printed at the console of the 
central computer or, in systems with Mul- 
tiple Console Support, at some other user- 
designated console. (The message number is 
IEC802I; see Appendix C for the format.) 
As explained under the LERB macro, the con- 
tents of the four threshold counters for 
the line are added to the accumulator each 
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time one of the threshold counters reaches 
its threshold value. The contents of the 
threshold counters are also added to the 
accumulators (and the threshold counters 

are reset) when you issue the LERPRT macro. 
You may also specify in LERPRT that the 
threshold counters and accumulators for the 
line be reset to zero. 

CAUTION: Issue a LERPRT macro for a line 
only if the line group containing that line 
is open. 

r t t 1 

| Name | Operation | Operand I 

j. + + * 

J [symbol] | LERPRT | dcbaddr [, rln] t, cidJ | 

III I 

I I I r. CLEAR=YES l | 

| | | I , CLEAR=NO J | 

L J. X J 

dcbaddr 

specifies the address of the DCB for 
the line group containing the line for 
which the contents of the accumulators 
are to be printed. 

rln 

specifies the relative line number of 
the line involved, rln cannot exceed 
the number of lines contained in the 
line group (as indicated in the nlines 
operand of the LERB macro) . If you 
omit this operand, all nonzero values 
of the accumulators for all lines in 
the group are printed. 

cid 

(applicable only to systems having the 
Multiple Console Support facility) 

specifies the address of a byte con- 
taining the identification of the con- 
sole at which the message is to be 
printed. If you omit this operand 
when the system includes the multiple 
console support facility, the message 
is printed at consoles having a rout- 
ing code of 8. If you specify an in- 
valid console ID, the message is 
printed at consoles having a routing 
code of 1. 

CLEAR=YES 

specifies that the threshold counters 
and accumulators be reset to zero 
after the contents of the accumulators 
are printed. If you omit this 
operand, CLEAR=YES is assumed. 

CLEAR=NO 

specifies that the threshold counters 
and accumulators are not to be reset 
after the contents of the accumulators 
are printed. 

ERROR DETECTION AND ANALYSIS 

To determine what action to take when an 
error occurs requires that the error condi- 



tion be analyzed. This is true whether 
error recovery is to be performed by ERP 
routines or by the user program. If BTAM 
ERP is used, all error analysis and reco- 
very attempts are performed before the Read 
or Write operation is posted as complete in 
the event control block (ECB) for the line. 
All user program analysis and recovery 
attempts, whether in addition to BTAM ERP 
actions or in place of them, occur after 
the Read or Write operation is posted as 
complete. Thus the user program analysis 
and recovery routine should receive control 
following each completion of a Read or 
Write operation. 

As mentioned previously, BTAM sets 
various error indicators in the DECB. Some 
of these are set before ERP routines gain 
control, others are set by the ERP rou- 
tines. The DECB fields containing error 
indicators are: 

• DECSDECB. This is the address of the 
event control block, which is the first 
full word of the DECB. The first byte 
contains the completion code for the 
operation. 

• DECFLAGS. A one-byte field containing 
flags that BTAM sets at the conclusion 
of a Read or Write operation. Some of 
these flags represent not errors but 
exceptional conditions of interest to 
the user program. These flags are set 
regardless of whether the operation was 
completed successfully. 

• DECERRST. A one-byte field containing 
flags indicating the kind of I/O error 
that occurred. These flags are set 
only in the event of a true I/O error 
(as opposed to an exceptional condi- 
tion) as indicated in the event control 
block bv a completion code of X'Ul'. 

• DECCSWST. A halfword field containing 
the status indicators set in the chan- 
nel status word (CSW) at the conclusion 
of the Read or Write operation. 

• DECSENSO. A one-byte field containing 
the sense information returned by the 
transmission control unit at the con- 
clusion of the I/O operation that 
resulted in a Unit Check error. 

Refer to Appendix B for the meaning of 
the various bits settings in these fields. 

USER PROGRAM ANALYSIS PROCEDURE 

A recommended procedure for checking the 
results of a Read or Write operation is as 
follows. 

First determine whether the operation 
was completed successfully or unsuccessful- 
ly. A completion code of X'7F f in the 
event control block (DECSDECB) indicates 
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successful completion, and a code of X'41* 
indicates unsuccessful completion. A third 
completion code, X*48*, indicates that the 
Read or Write operation was halted as a 
result of issuing a RESETPL or CLOSE macro 
while the operation was in progress. 



Normal Completion 

If the completion code is X*7F* , check the 
DECFLAGS field. If it contains all zeros, 
no exceptional "condition has occurred, and 
the program can execute whatever Read or 
Write operation would normally follow the 
completed operation. If DECFLAGS does not 
contain all zeros, check each of the appro- 
priate flags to determine the exceptional 
condition, then take suitable action. 



Abnormal completion 

If the completion code is X'Ul", determine 
the nature of the I/O error as follows. 
Check the DECFLAGS and DECERRST fields. If 
DECERRST does not contain all zeros, check 
the appropriate bits from among bits 0-4. 
(Bit 2 is applicable unless BTAM ERP rou- 
tines are not present in the system; bit 3 
is applicable only if the TCU is an IBM 
2701.) 

If both DECFLAGS and DECERRST contain 
all zeros, check the bits in the CSW status 
field, DECCSWST, in the order indicated in 
the priority column of Figure 59. If the 
Unit check bit is on, check the sense bits 
in DECSENSO in the order indicated in 
Figure 60. Then take appropriate action. 
These last two fields, DECCSWST and 
DECSENSO, contain the same information as 
was checked by the ERP routines, if the 
system includes the ERP facility. 

The preceding discussion mentioned 
checking the "appropriate" bits; this sim- 
ply means those bits that could possibly be 
set in a given situation. For example, it 
would be appropriate to check bit of 
DECFLAGS only if you were analyzing the 
result of an operation on a BSC line, as 
bit is not used in start-stop operations. 

Many factors are involved in determining 
what action is suitable in response to a 
given kind of error or exceptional 
condition. 

For exceptional conditions occurring in 
conjunction with a successful completion of 
a Read or Write operation, the guestion is 
not of retrying an operation that failed, 
but rather of determining what kind of Read 
or Write operation should be executed next. 
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Some of the factors to be considered in 
determining what program action to take in 
the event of an error or exceptional condi- 
tion are the type of Read or Write opera- 
tion (for example Read Initial, Write Con- 
tinue) and the specific command (for 
example Poll, Read Text, Write Response) 
being executed when the error occurred, and 
the type of remote station or line 
involved. The characteristics of the app- 
lication determine other factors to be con- 
sidered. In any event, it is inadvisable 
to pursue the same procedure that the BTAM 
ERP facility does, for any given error con- 
dition. The tables and explanations are 
intended to show what BTAM ERP has already 
done to recover or to guide you in writing 
your own recovery procedures; they are not 
intended to suggest user analysis actions 
after error recovery has been attempted. 
The next section suggests, for BSC lines, 
appropriate macros to issue after BTAM 
posts exceptional or error conditions. 

In general, BTAM error recovery proce- 
dures anticipate all of the possible condi- 
tions from which recovery may be possible, 
and, in each case takes appropriate action 
to achieve recovery. For this reason, use 
of the BTAM-provided error recovery proce- 
dures is highly recommended, since it saves 
much coding effort for the application pro- 
grammer. In many applications, the appro- 
priate action for the user program to take 
when ERP fails to recover is simply to 
ignore the error condition and resend the 
same message text with the next Read or 
Write operation, or to defer further opera- 
tions on the line until an equipment fai- 
lure or abnormal condition can be 
corrected. Usually, it is appropriate for 
the program to notify the operator at the 
central computer console or teleprocessing 
console of the condition. 



so that this field has a different 
value at the end of the Read or Write 
operation from the value it initially 
had. No other user- specif ied DECB 
field is modified by ERP. 

• DECCMCOD indicates the specific type of 
channel program command on which the 
error occurred. 

• DECTPCOD indicates the TP Operation 
Code associated with the command. Each 
BTAM channel command contains this 
code, in byte five of the channel com- 
mand word (CCW) . This code, which is 
not present in CCWs for other (non-TP) 
environments, has no effect on channel 
operations. It is in effect an exten- 
sion of the command code, and identi- 
fies the purpose of the command. 

The meanings of the bits in each of 
these fields are given in Appendix B. In 
these descriptions, and in the descriptions 
of the BTAM ERP actions below, references 
are made to types of I/O operations, equip- 
irent conditions, and indicators that are 
not defined elsewhere in this publication, 
as they relate to the operational details 
of specific types of transmission control 
units and related equipment. Understanding 
of these references and writing of an error 
recovery routine requires a knowledge of 
the functional complexities of this equip- 
ment, which is beyond the scope of this 
publication to impart. Information on 
transmission control units may be found in 
the publications listed under that heading 
in the Preface of this manual. 



BTAM ERP ERROR ANALYSIS AND RECOVERY 
ACTIONS 



The remainder of this chapter provides 
detailed explanations of what actions BTAM 
error recovery procedures perform for each 
of the error and exceptional conditions, 
and for each of the commands and types of 
remote stations for which the error can 
occur. This information is provided for 
users wishing to write their own error ana- 
lysis and recovery routines, for use either 
in place of or in addition to the BTAM- 
provided ERP facility. As mentioned pre- 
viously, an error analysis routine usually 
must consider the type of Read or Write 
operation and the type of channel command 
on which the error or exceptional condition 
occurred. Three fields in the DECB contain 
this information: 

• DECTYPE indicates the kind of Read or 
Write operation being executed. 

Note ; Certain error conditions cause 
BTAM ERP to modify the DECTYPE field. 



BTAM routines analyze error and exceptional 
conditions by examining the status field of 
the channel status word (CSW) and, in the 
case of a Unit Check error, by examining 
the sense information provided by the TCU 
at the end of the I/O operation. 

More than one indication may be set in 
the CSW when an error condition occurs. 
Generally, only one of these indicators 
properly describes the condition; other 
indicators reflect secondary effects. 
Similarly, TCU errors can cause more than 
one sense bit to be set. To ensure that 
the primary condition is recognized and 
acted upon, priority schemes determine the 
order in which status and sense bits are 
tested. 

Tables and explanations of actions are 
shown separately for start-stop and BSC 
operations, as the actions differ consider- 
ably for these two categories. 
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"Should-Not-Occur" Errors 

Among the error conditions causing BTAM to 
pass control to ERP are those which are 
undefined for a particular command or com- 
bination of hardware conditions. An over- 
run error, for example, has no meaning for 
a Write command. 

In some instances, however, ERP can 
recover even from undefined errors. Con- 
sider, for example, a lost data error 
occurring on a Dial command issued for a 
start-stop line. Although this condition, 
like lost data on a Write command, is not 
defined (and is therefore not mentioned in 
the publications for the IBM 2701, 2702, 
and 2703) , ERP does try to recover by reex- 
ecuting the Dial command (see Figure 65 and 
ERP action 20.) After two unsuccessful 
retries, ERP disables the line, notifies 
the operator, and records the error in the 
Outboard Recorder. 



Note that ERP does not attempt recovery 
when a lost data error occurs on a Write 
command; rather, ERP immediately indicates 
a "should-not-occur" error has occurred. 
In Figure 65, Write falls in the "all other 
commands" category; see action 11. 



Figure 61 shows for various commands the 
error conditions OS/VS BTAM ERP considers 
to be "should-not-occur" errors and there- 
fore do not attempt recovery. 



START- STOP ERROR RECOVERY PROCEDURES 

In Figures 64-71, parentheses following the 
name of a command contain the TP operation 
code of the command, as appearing in the 
DECTPCOD field of the DECB at completion of 
a Read or Write operation. 



r T T T T T r T T - T ., 

| Error Condition | Write | Read | Inhibit | Prepare | Sense | Disable | Enable | Dial | Poll | 



Lost Data 

Timeout 

Intervention Required 

Bus Out Check 

Data Check 

Overrun 

Unit Exception 




• * 



• « 



• 9 



^-Should-not-occur error only for start-stop lines. 

a Not a should-not-occur error for any Write command that sends transparent text (BSC 
lines) or for a 2260/2848 (start-stop lines). 

3 Should- not-occur error only for Write operations on BSC lines. 

*»Should-not-occur error only if TCU is a 2701 for start-stop lines; always a should- 
not-occur error for BSC lines. 

s Should-not-occur error only if TCU is a 2701. 

•Not a should-not-occur error if TCU is a 2703, and user program issued RESETPL 
macro . 

Figure 61, Should-Not -Occur Error Conditions Posted by BTAM ERP 
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Command 

Write or Poll (03) 

2741 

83B3 or 115A (Telegraph adapter type I) 

all other terminals 

Read 

Read response to addressing (06) 

Terminal adapter type I 

2740 

all other terminals 

All other types of adapters 

Read response to text (20) 

2740 with station control £ checking, or 2260 

Write text retries specified (EROPT=w) 
Write text retries not specified 

all other terminals 

All other Reads 

All other commands 

Figure 64. Unit Exception ~ Start-Stop 
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Read Text (11) 
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Read response to text (20) 

Dial (01) 

All otner commands 

Figure 65. Lost Data — Start-Stop 
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Command 

Write 

2260 or 2265 (Terminal Adapter Type III) 
cill other terminals 

Read (or Inhibit) 

Read response to addressing (06) 

83B3 

all other terminals 

Read ID response (07) 

Read response to polling (05) 

First command is Disable 
First command is not Disable 

Read Index (0A) 

First command is Disable 
First command is not Disable 

Read text (11) 

Read response to text (20) 

Write text retries specified (EROPT=W) 
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Figure 66. Timeout — Start-Stop 
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j. 

Write or Break (23) 
Read (or Inhibit) 

Read Index (OA) 

Read response to polling (OA) 

Operation is Write TTV 
Operation is not Write TTV 

Read response to text (20) 

Read text retries specified (EROPT=R) 

Operation is Write Continue 
Operation is not Write Continue 

Read text retries not specified 

All other Reads 

Dial (01) 

Prepare (01) 

2741 

All other terminals 

Poll (03) 

All other commands 

Figure 67. Intervention Required — Start-Stop 
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24 
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39 
40 

61 
36 

24 

41 (SNO) 



Action | 
4 

46 



I 

Figure 



Command 
Write 

prior to Write text 

Write text (11) 

Write text retries specified (EROPT=W) 

Failing command is last command or next 
command is not Read response to text 

Next command is Read response to text 

Write text retries not specified 

following Write text 

Dial (01) 

Poll (03) 

All other commands 

68. Bus Out Check — Start-Stop 
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45 
44 
45 
46 
46 
11 (SNO) 
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Command Action 

Write 

83B3, 115A, or TWX Model 33,35 Telegraph adapter type I or II 
Error occurred during text transfer 






Figure 6 9 



Write retries specified (EROPT=W) 
Write retries not specified 

Error did not occur during text transfer 

World Trade Telegraph terminals (WTT Adapter) 

Read (or Inhibit) 

Read ID response (07) 

Read response to polling (0A) or any other Read 
command prior to text transfer 

First command in channel program is Disable 
First command in channel program is not Disable 

Read text (11) 

Dynamic buffering is used 

Dynamic buffering is not used 

Read text retries specified (EROPT=R) 

Operation is Read Repeat 

Operation is Write Continue Conversational 

All other operations 

Read text retries not specified 

Read response to text (20) 

Operation is Write Continue 
All other operations 

Remote terminal is 2740 with 2760 feature, and operation 
is Write Tio, TCO, or TVO 

Poll (03) 

Ml other commands 

Data Check — Start- Stop 



21 
39 

24 

37 

48 



49 
50 



51 



24 
53 
54 

51 



48 




52 


(SNO) 


55 




56 




52 


(SNO) 
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Command 

Read 

Read Index (OA) 

Read response to text (20) 

All other Reads 

Dynamic buffering is used 

Dynamic buffering is not used 

Read text retries are specified (EROPT=R) 
Read text retries are not specified 

Poll (03) 

TCU is 2702 
TCU is not 2702 

Inhibit (11) 

Read text retries are specified (EROPT=R) 
Read text retries are not specified 



All other commands 
Figure 70. Overrun — Start- Stop 
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57 
58 

59 



60 




59 




57 




11 


(SNO) 


60 




59 




11 


(SNO) 



Command 



Action 
11 (SNO) 
9 



Poll (03) 

All other commands 



Figure 71. Command Reject — Start-Stop 



ERROR RECOVERY ACTIONS FOR START-STOP 
OPERATIONS 

In the descriptions of the actions per- 
formed by BTAM error recovery procedures, 
the phrase "if applicable," applied to the 
action of recording occurrences in the line 
error recording block (LERB), means that 
the error is so recorded only if it is a 
data check, intervention required, or non- 
text time-out error, and if you have speci- 
fied that errors be recorded by appropri- 
ately coding the EROPT and LERB operands of 
the DCB macro instruction. 



The phrase "ERP notifies the console 
operator" means that ERP writes message 
IEA000I to the console of the central com- 
puter or to some other console if the Mul- 
tiple Console Support facility is in use. 
This allows the operator to take whatever 
action is necessary to correct the condi- 
tion. See Appendix C for the format of 
this message. 



The phrase "ERP posts the operation as 
complete-with-error" means that ERP sets 
the post flag in the ECB for the line to 
indicate conclusion of the operation, and 
sets a completion code of X'Ul* in the ECB, 
to indicate that an I/O error occurred. 



If the Channel Check Handler (CCH) of 
the Recovery Management Support faci- 
lity has been included in the operat- 
ing system during system generation, 
ERP forces a permanent error condition 
by setting the Unit Check and Equip- 
ment Check sense bits in the sense 
byte. This causes ERP for this condi- 
tion to notify the console operator. 
Operations can proceed normally for 
line groups using other channels. If 
the CCH facility is not included in 
the operating system,, the condition is 
recorded in the System Environment 
Recorder (SER) and the Supervisor 
enters Wait state, as the error is too 
serious to allow further operations. 
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2 ERP sets the should-not-occur bit (bit 
1) in DECERRST, posts the operation 
complete-with-error , notifies the con- 
sole operator, and records the occur- 
rence in the OBR. 

3 If the error occurred on a Read com- 
mand, ERP posts the operation 
complete-with-error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. If the error did 
not occur on a Read command, ERP sets 
the should-not-occur bit (bit 1) in 
DECERRST, posts the operation 
complete-with-error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. 

H ERP notifies the console operator. 

The error is probably a program error. 

5 ERP notifies the console operator. 
The error is caused by control unit 
failure, and the communications line 
involved should be considered 
inoperative. 



7 ERP restarts the channel program at 
the Write or Poll command. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error and records the occurrence in 
the OBR. 

8 ERP executes a Break command, then 
restarts the channel program. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error, notifies the console operator, 
and records the occurrence in the OBR. 

The error indicates that data is being 
received from the line without a 
command. 

9 ERP executes a Read Skip command. If 
the Read Skip is successful, ERP 
restarts the channel program at the 
failing command. On the third occur- 
rence of the error, ERP posts the 
operation complete-with-error, noti- 
fies the console operator, and records 
the occurrence in the OBR. 

The error indicates that data is being 
received from the line without a 
command. 

10 The Unit Exception condition is normal 
for a 2740 and indicates receipt of a 
positive or negative response (circle 
Y or circle N) . If circle Y was 
received, ERP turns off the Unit 
Exception bit and restarts the channel 
program at the next command. If 
circle N was received, ERP posts norm- 



al completion with or without error. 
Receipt of a character other than 
circle Y or circle N is a should-not- 
occur condition; ERP sets the should- 
not-occur bit (bit 1) in DECERRST and 
posts the operation complete-with- 
error. 

11 ERP sets the should-not-occur bit (bit 
1) in DECERRST, posts the operation 
complete-with-error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. 

12 ERP executes a Write Continue channel 
program to re send the same message 
text. On the third occurrence of this 
error, ERP posts the operation 
complete-with-error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. 

The error indicates a buffer overflow. 

13 ERP posts the operation complete-with- 
error. 

1H ERP restarts the channel program at 
the failing command. On the third 
occurrence of this error, ERP disables 
the line, posts the operation 
complete-with-error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. 

15 ERP restarts the channel program. On 
the third occurrence of the error, ERP 
posts the operation complete-with- 
error, notifies the console operator, 
and records the occurrence in the OBR. 

16 ERP executes a Break command, posts 
the operation complete-with-error, 
notifies the console operator, and 
records the occurrence in the OBR. 

The error indicates that the input 
message was larger than the input area 
specified in the READ macro. 

17 ERP executes a Read Skip command, 
posts the operation complete-with- 
error, notifies the console operator, 
and records the occurrence in the OBR. 

The error indicates that the input 
message was larger than the input area 
specified in the READ macro. 

18 ERP sets the should-not-occur bit (bit 
1) in DECERRST and posts the operation 
complete-with-error. 

19 ERP executes a Read Skip command, 
posts the operation complete-with- 
error, and notifies the console opera- 
tor, and records the occurrence in the 
OBR. 
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20 ERP restarts the channel program at 
the Dial command. On the third occur- 
rence of the error, ERP disables the 
line, posts the operation complete- 
with-error, notifies the console 
operator, and records the error in the 
OBR. 

The error indicates that the Dial com- 
mand was sent to a line that was 
already in the "off- hook" condition. 

21 ERP builds and executes a Reset chan- 
nel program. The error occurrence is 
recorded in the LERB (if applicable). 

22 ERP sets the should- not-occur bit (bit 
1) in DECERRST, posts the operation 
complete-with-error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. The occurrence is 
recorded in the LERB (if applicable) . 

23 ERP restarts the channel program at 
the third command. On the third 
occurrence of the error, ERP posts the 
operation complete-with-error and 
notifies the console operator. Each 
occurrence is recorded in the LERB (if 
applicable) . 

24 ERP restarts the channel program. On 
the third occurrence of the error, ERP 
posts the operation complete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 
the LERB (if applicable). 

25 ERP restarts the channel program at 
the failing command. On the third 
occurrence of the error, ERP posts the 
operation complete-with-error and 
notifies the console operator. Each 
occurrence is recorded in the LERB (if 
applicable) . 

26 ERP restarts the channel program to 
resend the polling sequence. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 
the LERB (if applicable) . 

27 ERP posts the operation complete-with- 
error. The error indicates that no 
text was received or that the elapsed 
time between successive text charac- 
ters exceeded about 28 seconds (the 
intercharacter timeout interval) . 

28 ERP restarts the channel program at 
the third command. On the third 
occurrence of the error, ERP posts the 
operation complete-with-error. 

29 ERP restarts the channel program at 
the failing command. On the third 



occurrence of the error, ERP posts the 
operation complete-with-error and 
notifies the console operator. Each 
occurrence is recorded in the LERB (if 
applicable) . 



The error indicates that the data set 
(modem) is failing to disconnect. 



30 ERP sets the should-not-occur bit (bit 
1) in DECERRST, posts the operation 
complete-with-error, and notifies the 
console operator. 

31 ERP restarts the channel program at 
the failing command. On the third 
occurrence of the error, ERP posts the 
operation complete-with-error and 
notifies the console operator. Each 
occurrence of the error is recorded in 
the LERB (if applicable) . 

The error indicates that the remote 
station is not answering, when dialed, 
in the time allotted. 

32 ERP restarts the channel program to 
resend the polling sequence. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 
the LERB (if applicable) . 

The error indicates that no response 
was received from the remote station. 

33 ERP sets the should-not-occur bit (bit 
1) in DECERRST and posts the operation 
complete-with-error. The occurrence 
is recorded in the LERB (if 
applicable) . 

34 ERP sets the retry count to maximum 
and posts the operation complete-with- 
error. The occurrence is recorded in 
the LERB (if applicable) . 

The error indicates that the addressed 
line has not been enabled. 

35 ERP restarts the channel program at 
the third command to resend the poll- 
ing sequence. On the third occurrence 
of the error, ERP posts the operation 
complete-with-error and notifies the 
console operator. Each occurrence is 
recorded in the LERB (if applicable). 

36 ERP restarts the channel program at 
the beginning. On the third occur- 
rence of the error, ERP posts the 
operation complete-with-error and 
notifies the console operator. Each 
occurrence is recorded in the LERB (if 
applicable) . 



252 OS/VS BTAM SRL 



37 

38 
39 

40 



41 



42 
43 
44 



45 



46 



47 
48 



ERP posts the operation complete-with- 
error and notifies the console opera- 
tor. The occurrence is recorded in 
the LERB (if applicable). 



ERP posts the operation complete-with- 
error and notifies the console 
operator . 

ERP restarts the channel program at 
the failing command. On the third 
occurrence of the error, ERP posts the 
operation complete- with- error and 
notifies the console operator. 

The error indicates that the Automatic 
Calling Unit power is off or that the 
addressed line is not connected to an 
Autocall adapter. 

ERP sets the should- not- occur bit (bit 
1) in DECERRST, posts the operation 
complete-with-error, and notifies the 
console operator. The occurrence is 
recorded in the LERB (if applicable). 



the LERB (if applicable) . 
1.) 



(See Note 



ERP posts the operation complete-with- 
error, notifies the console operator, 
and records the occurrence in the OBR. 

The error is a parity error within 
either the command or the text data. 

ERP records the error occurrence in 
the SDR and restarts the channel pro- 
gram at. the failing command. On the 
third occurrence of the error, ERP 
posts the operation coroplete-with- 
error, notifies the console operator, 
and records the occurrence in the OBR. 

The error is a parity error within 
either the command or the text data. 

ERP records the error occurrence in 
the SDR and restarts the channel pro- 
gram. On the third occurrence of the 
error, ERP posts the operation 
complete-with- error, notifies the con- 
sole operator, and records the occur- 
rence in the OBR. 

The error is a parity error within 
either the command or the text data. 



ERP restarts the channel program. On 
the third occurrence of the error, ERP 
posts the operation coroplete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 



49 ERP restarts the channel program at 
the third command. On the third 
occurrence of the error, ERP posts the 
operation complete-with- error and 
notifies the console operator. Each 
occurrence is recorded in the LERB (if 
applicable). (See Note 1.) 

50 ERP restarts the channel program to 
res end the polling sequence. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 
the LERB (if applicable) . (See Note 
1.) 

51 ERP posts the operation complete-with- 
error. The occurrence is recorded in 
the LERB (if applicable). (See Note 
1.) 

52 ERP sets the should-not-occur bit (bit 
1) in DECERRST, posts the operation 
complete-with -error, and notifies the 
console operator. (See Note 1.) 

53 ERP restarts the channel program at 
the Read Conversational part. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 
the LERB (if applicable). (See Note 
1.) 

54 ERP builds and executes a Read Repeat 
channel program. On the third occur- 
rence of the error, ERP posts the 
operation complete- with- error and 
notifies the console operator. Each 
occurrence is recorded in the LERB (if 
applicable). (See Note 1.) 

55 ERP restarts the channel program at 
the Write EOA PRE o command. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error and notifies the console opera- 
tor. Each occurrence is recorded in 
the LERB (if applicable) . (See Note 
1.) 

56 ERP restarts the channel program to 
resend the polling sequence. On the 
third occurrence of the error, ERP 
posts the operation complete-with- 
error. Each occurrence is recorded in 
the LERB (if applicable) . 

57 ERP restarts the channel program to 
resend the polling sequence. On the 
third occurrence of the error, ERP 
posts the operation complete-with — 
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error and notifies the console 
operator. 

58 ERP restarts the channel program at 
the failing command. On the third 
occurrence of the error, ERP posts the 
operation complete-with-error and 
notifies the console operator. 

59 ERP posts the operation complete-with- 
error, notifies the console operator, 
and records the occurrence in the OBR. 

60 ERP builds and executes a Read Repeat 
channel program and records the error 
occurrence in the SDR. On the third 
occurrence of the error, ERP posts the 
operation complete-with-error, noti- 
fies the console operator, and records 
the occurrence in the OBR. 

61 ERP issues Write EOT and restarts the 
channel program at the failing 
command . 

Note 1 ; The error is one of the following: 

• A VRC (parity) error was detected in 
one or more of the received characters. 

• An LRC error was detected; that is, the 
LRC character received from the remote 
station did not match the LRC value 
generated by the transmission control 
unit. 

• A negative response was received as a 
response to text. 

• «The communication line was in the 

"space" condition at stop-bit time, 
indicating that the TCU was out of 
synchronism. 



BSC ERROR RECOVERY PROCEDURES 

The BTAM Channel End/ Abnormal End Appendage 
receives control from the supervisor fol- 
lowing an I/O interruption or after an ERP 
routine issues a SVC 15 with no retry spec- 
ified (that is, with bit 2 of IOBFLAG1 set 
to zero). When it receives control, the 
appendage makes an analysis of such things 
as the CSW information, the condition code, 
the operation in progress, the response 
received, etc., in order to determine the 
specific action to be performed based on 
the conditions existing. 

The appendage passes control back to the 
supervisor as follows: 

• At + Register 14 - the channel pro- 
gram is posted complete, and the requ- 
est element is made available. This is 
the so-called "normal return. " 



• At ji + Register 14 - the channel pro- 
gram is not posted complete, but the 
request element is made available. 
This return is made for online test or 
when a SAD (Set Address) or Enable 
error occurs. 

• At 8 ♦ Register 14 - the channel pro- 
gram is not posted complete, and its 
request element is placed back on the 
request queue so the program can be 
retried. This return is used when the 
channel program is to be restarted. 

The supervisor then determines where 
control is to be passed next; if the IOB 
exception bit is on (bit 5 in IOBFLAGl=l) 
and the DCB indicates that basic error 
recovery procedures are provided (that is, 
bit 7 in DCBERROP=0) for this line group, 
control is passed to the BSC ERP control 
routine. The control routine also receives 
control from the supervisor following an 
I/O interruption when an ERP channel pro- 
gram has been initiated, and the ERP rou- 
tines, rather than the Channel End/Abnormal 
End Appendage, are to analyze the results 
of the operation. 

The BSC ERP control routine determines 
which ERP routine is to receive control, 
causes it to be loaded if necessary, and 
transfers control to it. Recovery actions, 
as indicated in the tables following, are 
then performed. 



ERROR RECOVERY ACTIONS FOR BSC OPERATIONS 

By using Figure 72 , you can locate the set 
of conditions for which you wish to deter- 
mine the ERP action. In some cases, it 
will be necessary to consult more than one 
table to trace the complete sequence of the 
actions, as when ERP sets up a special 
return code to indicate the existence of a 
specific situation as it goes through a 
multistep recovery procedure. 
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You should note that the tables sum- 
marize the actions performed by ERP; 
details such as incrementing the retry 
count and testing for a need for LERB reco- 
rding are not shown. 

In the tables, the values in parentheses 
following each command, for example. Read 
Text (11) , is the TP operation code for 
that command, in hexadecimal. 

Where the phrase "proceed with error 
posting" appears, see Figure 86 to deter- 
mine the actions taken by the Error Post 
routine. 



Figure 73 serves as an entry point for 
tracing the ERP-initiated recovery actions. 
In many cases, it refers to another table 
for further definition of recovery actions. 
Figures 85 and 86 indicate the result of 
control being passed to the Special Return 
routine and the Error Post routine, 
respectively. 



Two examples of the use of thp tables 
are as follows: 

Example 1 : The accumulated block check 
character (bcc) does not match the bcc 
received following the ETB or ETX ending a 
text block, on a Read Text command, causing 
a status indication of Channel End/Device 
End/Unit Check, with Data Check indicated 
in the sense byte. 

Step 1 - Refer to the Unit Check section of 
Figure 73. Since Channel End and 
Device End are on, you are 
referred to Figure 77 to find 
further actions based on the 
results of the ERP analysis of the 
sense information. 

Step 2 - Refer to Figure 77, which refers 
you to Figure 81. 

Step 3 - Refer to Figure 81, where the ERP 
actions for various commands are 
described. Since the error 
occurred on a Read Text command, 
the ERP action taken depends on 
whether or not dynamic buffering 
is being used. Assuming that it 
is not, ERP will build a channel 
program to write NAK and then 
transf er-in-channel (TIC) back to 
the Read Text command. ("Failing 
CCW" refers to the CCW on which 
the interrupt occurred. ) 



Example 2 : A transmission causes an 
incoming ETB or ETX character to be dis- 
torted so that it is not recognized as a 
control character, the bcc characters are 



considered data characters and sent into 
main storage, exhausting the count in the 
Read Text CCW. The status indication is 
Channel End/Device End/Unit Check, with 
lost Data indicated in the sense byte. 



Step 1 - Same as in example 1. 



Step 2 - Refer to Figure 77, which, for a 

Lost Data condition, refers you to 
Figure 82. 



Step 3 - Refer to Figure 82, which indi- 
cates that, assuming dynamic buf- 
fering is not being used, a spe- 
cial return code (X , 82 t ) is set up 
in IOBWORK ♦ 1 (one of the two 
locations in the Input/Output 
Block (IOB) where special codes 
are placed for later analysis by 
the Special Return routine) . Then 
a channel program is generated to 
read the ENQ that the transmitting 
station will send when it does not 
receive a response to the block of 
text. When the channel program 
ends as a result of receiving the 
ENQ, the ERP Special Return rou- 
tine is entered. 



Step 4 - Refer to Figure 85, Part B, which 
indicates that ERP builds a chan- 
nel program to write NAK and then 
restarts the original channel pro- 
gram at the Read Text command. 



LOCAL 3270 DISPLAY SYSTEM ERROR RECOVERY 
PROCEDURES 

ERRORS DETECTED BY THE DEVICE OR CONTROL 
UNIT AND CHANNEL DATA CHECK ERRORS 

Error Conditions 

Figure 87 lists error conditions according 
to the bits that are on in the CSW and 
sense byte. 



Recovery Actions 

Figure 88 indicates (by error condition and 
failing command) the recovery actions taken 
by BTAM error recovery procedures. 



The recovery actions are: 

1. Permanent error 

The request is marked as a permanent 
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error condition. The operation is 
terminated, the error is logged in 
the system error log, and a message 
is issued to the console operator in- 
dicating the failing device, opera- 
tion, and conditions. 

2. Should not occur 

The request is marked as a nonrecover- 
able error condition. The operation 
is terminated. 

3. Nonrecoverable error 

The request is marked as a nonrecover- 
able error condition. The operation 
is terminated. The error is logged in 
the system error log. 

4. Intervention required 

If the failing status includes Channel 
End, action 2 is taken. If Channel 
End is not present, a Write CCW is 
created to resend the Write Control 
character to print the buffer contents. 

5. Retry failing CCW 

Restart the channel program on the 
failing CCW. When the retry count 
exceeds the number for the error con- 
dition and command, action 1 is taken. 

6. Retry channel program 

Restart the channel program on the 
first CCW in the chain. When the 
retry count exceeds three, action 1 is 
taken. 

7. Busy 

The request is held until the device 
is ready. Then the operation is 
retried. 

ERRORS DETECTED BY THE CHANNEL (EXCEPT 
CHANNEL DATA CHECK ERRORS) 



Error Conditions 

Figure 89 lists error conditions according 
to the bits that are on in the ERPCODES 
field, which is byte seven of the Error 
Recovery Procedure Interface Block (ERPIB) 
built by the Channel Check Handler. 



Note ; Channel data checks are handled as 
though they were device-detected errors. 
Channel control checks and interface con- 
trol checks are processed only if the Chan- 
nel Check Handler is in the system. 



Recovery Actions 

Figure 90 indicates (by error condition and 
failing command) the recovery actions taken 
by BTAM error recovery procedures. If a 
diagnostic command is found in the failing 
CCW chain, action 1 is taken. 



The recovery actions are: 

8. Permanent error 

The device is unable to recover and 
the request is marked as a permanent 
error condition. The operation is 
terminated and the error is logged in 
the system error log. Unless the 
failing device is the console, a 
message is issued to the console op- 
erator identifying the failing device, 
operation, and conditions. 

9. Should not occur 

A message is issued to the console 
operator. Action 8 is taken. 

10. Nonrecoverable error 

A message is issued to the console op- 
erator. Action 8 is taken. 

11. Retry failing command 

The failing command is retried. If 
the retry count exceeds three, action 
8 is taken. Note: a Write command is 
retried only if the second character 
in the data stream is an SBA. This 
is to ensure cursor integrity. 

12. Conditional retry 

Retry the failing command (taking 
action 8 if the retry count exceeds 
three) , unless the command is the 
first in a CCW string (in which case 
action 10 is taken). 

13. Sequence code 5 procedure 

If the CSW was stored after a Start 
I/O instruction was issued, follow 
sequence code 3 procedure. If the CSW 
was stored after an I/O interruption 
and the device status is valid, take 
action 1 1 . 

14. TIC command 

If the command preceding the TIC is 
command- chained, retry the failing CCW 
pointed to by the TIC (taking action 8 
if the retry count exceeds three) . If 
the command preceding the TIC is data- 
chained, retry the first CCW with data 
chaining in the CCW string. 
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j Status 



Attention 
Status Modifier 
Control Unit End 
Busy 



j Action 
+ 

1. Set "Should Not Occur" bit in DECERRST. 

2. Update statistics table. 

3. See Figure 86 for further actions. 



Start I/O 

Condition Code = 1 
(CSW Stored) 
j 

Channel Data 
Check 
| 

Program Check 
Protection Check 
Chaining Check 



1. Update statistics table. 

2. See Figure 86 for further actions. 



1. Update statistics table. 

2. See Figure 74 for further actions. 



■H 



1. Set indicator to cause recording of 
occurrence in the Outboard Recorder (OBR) . 

2. Notify the console operator. 



Unit Check 



I 

Start I/O Condition 

Code = 3 

(Not operational) 



1. If Channel End and Device End status bits are both 
off, update the statistics table. See Figure 86 for 
further actions. 

2. If Channel End and Device End status bits are not both 
off, analyze the sense information. See Figure 77 for 
actions resulting from this analysis. 



1. Write operator message - "IEC0804A xxx CONTROL UNIT 
NOT OPERATIONAL, REPLY CONT OR POST" where xxx is the 
line address of the line involved. 

2. If reply is "CONT" retry the failing channel program; 
if reply is "POST", post ECB complete with permanent 
I/O error; if reply is neither "CONT" nor "POST" , 
repeat the message. 



Unit Exception 
Figure 73. Status Analysis 



This status bit can be turned on by equipment or by BTAM. 
See Figure 84 for action taken when this status bit is on. 



— BSC 



j Command 
I 



| Action 



| Write Text (11) 



Indicate a permanent I/O error, then proceed with 
error posting. 



-H 



JAny Write except 
| Write Text 



--+ 



If retry limit (7) has been reached, proceed with error 
posting; if not, retry the failing CCW. 



| Read Text (11) 

| (Dynamic Buffering 

| Not Used) 

j 

JRead Text (11) 

I (Dynamic Buffering Used) 

| Read ENQ (OB) 
I 



If retry limit (7) has been reached, proceed with error 
posting; if not. Write NAK and TIC to the failing CCW. 



-+ 



| Read Response to ENQ (OC) 



Indicate a permanent I/O error, then proceed with error 
posting. 

If retry limit (7) has been reached, proceed with error 
posting; if not, retry the failing CCW. 

Write ENQ and TIC to failing CCW. 

^ 



| Read Response to 

| Text (25) 

|. 



Write ENQ and TIC to failing CCW. 



I All other Reads 



Set up special return code X^O* in IOBWORK+1 and generate 
a channel program to read a response. 



Figure 74. Channel Data Check — BSC 



Error Recovery Procedures and Error Recording 257 



h 



I 

Read Text (11) 
(Dynamic Buffering 
not used) . 



Command 

Write Text (11) 
(Dynamic Buffering 
not used) 



| Action 

+ 

Write ENQ and TIC to the CCW following the failing CCW 
(the Read Response to Text command). 



Set up special return code X'80* in IOBWORK+1 and generate 
a Read response channel program. 



Read or Write Text 
(11) (Dynamic 
Buffering used) 
| 

Any command not 
during text transfer 
(that is, any TP-Op code 
other than 11) 



Indicate permanent I/O error, then proceed with error 
posting. 



If retry limit has been reached, indicate a permanent I/O 
error and proceed with error posting; if not, restart the 
channel program. 



-H 



Figure 75. Equipment Check — BSC 



Command 



h 



| Action 



^ 



Read Response to Text (25) 



| 

Any command with 
a Special Return 
code of X*0H* 



If retry limit (7) has keen reached, indicate a permanent 
I/O error, then proceed with error posting; if not, set up 
special return code X'04* in IOBERRCT+1 and write DLE ENQ. 



H 



Check for Channel End and Device End status only. If both 
bits are on, clear the special return indicator and return 
to the supervisor; if not, indicate permanent I/O error, 
then proceed with error posting. 



All other commands 



l_. 



Indicate permanent I/O error, then proceed with error 
posting. 



-H 



j 



Figure 76. Command Reject — BSC 
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I Command 

k 

Dial (01) 



j Action 
4 

If retry limit (7) has been reached, indicate a permanent 
I/O error, then proceed with error posting; if not, dis- 
able the line and TIC to the first CCW. 



Poll (03) 



If retry limit (7) has been reached, indicate a permanent 
I/O error, then proceed with error posting; if not, 
restart the channel program at the first CCW and start 
polling with the failing station. 



Write — Prior to 
Text Transfer 

(TP-Op code less 
than 10) 



Check to see if this is a Write EOT command (TP-Op Code 
(02). If so, restart the channel program at the failing 
CCW; if not, restart the channel program at the CCW 
following the failing CCW. 



Write — During 
Text Transfer (11) 



k 

All other Writes 



Check to see if the residual count is equal to the 
original count. If so, restart the channel program at the 
failing CCW; if not indicate a permanent I/O error, then 
proceed with error posting. 



h- 



Check to see if this is the last CCW in the channel pro- 
gram. If so, restart the channel program at the failing 
CCW; if not, restart the channel program at the CCW fol- 
lowing the failing CCW. 



Any Read Command 



h 



Check to see if the residual count is equal to the origi- 
nal count. If so, restart the channel program at the 
failing CCW; if not, indicate a permanent I/O error then 
proceed with error posting. 



I All other commands 



Restart the channel program at the failing CCW. 



Figure 78. Bus Out — BSC 



Command 



t- 



j Action 



Read ENQ (08) 



If retry limit (7) has been reached, indicate a permanent 
I/O error, then proceed with error posting; if not, 
restart the channel program at the failing CCW. 



Read Response to ENQ (OC) 



If retry limit (7) has been reached, indicate a permanent 
I/O error, then proceed with error posting; if not, 
restart the channel program at the CCW preceding the fail- 
ing CCW. 



Read Response to Text (25) 



If retry limit (7) has been reached, indicate I/O error, 
then proceed with error posting; if not, generate a chan- 
nel program to Write ENQ, then TIC to the failing CCW. 



Read Text (11) 



h 



If dynamic buffering is specified, indicate a permanent 
I/O error, then proceed with error posting; if not (and if 
retry attempts have not been exhausted) , generate a chan- 
nel program to Write NAK, then TIC to the failing CCW. 



All other commands 
Figure 79. Overrun 



Set "should not occur" bit in DECERRST, indicate a per- 
manent I/O error, then proceed with error posting. 



— BSC 
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Command 



h 



j Action 

4 

Each of the actions described below is preceded by a test 
to see whether the retry limit (7) has been reached. If 
so, a permanent I/O error is indicated, then ERP proceeds 
with error posting; if not, the action listed below for 
the appropriate command is performed. Except for the Dial 
command, the actions listed below apply only to a non- 
switched line. If an error occurs on any command other 
than Dial, for a switched line, ERP indicates a permanent 
error and proceeds with error posting. 



Dial (01) 



Generate a channel program to perform a Disable, then TIC 
to the failing CCW. 



Prepare (01) 



~+ 



Restart the channel program at the first CCW. 



Poll (03) 



Restart the channel program at the first CCW and start 
polling with the failing station. 



Read Text (11) 
(Dynamic Buffering 
Not Used) 



Set up special return code X'81* in IOBWORK+1 and generate 
a Read ENQ channel program. If this a Read Initial 
operation on a multipoint line, set up for the Special 
Return routine to retry the Read using the second Read 
command (that is, the one following the Read Index); if 
not a Read Initial on a multipoint line, set up for it to 
retry the Read using the failing CCW. 



Read Text (11) 
(Dynamic Buffering Used) 



Indicate a permanent I/O error, then proceed with error 
posting. 



Write Text (11) 



j 

| All other commands 

i 



If the residual count is equal to the original count, 
restart the channel program at the failing CCW; if not, 
indicate a permanent I/O error, then proceed with error 
posting. 



Restart the channel program at the failing CCW. 



Figure 80. Intervention Required — BSC 
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(Command 

j. 

Read ENQ (013) 



| Action 

4 

If the retry limit (7) has been reached, indicate a per- 
manent I/O error, then proceed with error posting; if not, 
restart the channel program at the failing CCW. 



Read Response to ENQ (0C) 



If the retry limit (7) has keen reached, indicate a per- 
manent I/O error, then proceed with error posting; if not, 
restart the channel program at the CCW preceding the fail- 
ing CCW. 



Read ID Response (07) 



If the retry limit (7) has been reached, indicate a per- 
manent I/O error, then proceed with error posting; if not, 
restart the channel program at the preceding CCW if it is 
a Write ID ENQ CCW. If other than a Write ID ENQ CCW, 
restart at the failing CCW. 



Read Response to Text (25) 



If the retry limit (7) has been reached, indicate a per- 
manent I/O error, then proceed with error posting; if not, 
generate a channel program to Write ENQ, then TIC to the 
failing CCW. 



■H 



Read Text (11) 
(Dynamic Buffering 
Not Used) 



If the retry limit (7) has been reached, indicate a 
permanent I/O error, then proceed with error posting; if 
not, set up special return code X'82' in IOBWORK+1 and 
generate a channel program to Write NAK, then TIC to the 
failing Read CCW. (TIC to the previous CCW if it is a 
Read response to text; otherwise, TIC to the Read text 
CCW.) 



y 

Read Text (11) 

(Dynamic Buffering Used) 



Indicate a permanent I/O error has occurred then proceed 
with error posting. 



All other commands 



BSC 



Set "should not occur" bit in DECERRST, indicate a per- 
manent I/O error has occurred, then proceed with error 
posting. 



Figure 81. Data Check — 
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Command 



h 



Acticn 

Unless otherwise specified, each of the actions described 
below is preceded by a test to see whether the retry limit 
(7) has been reached. If so, a permanent I/O error is 
indicated, then ERP proceeds with error posting; if not, 
the action listed below for the appropriate command is 
performed. 



Dial (01) 



Generate a channel program to perform a Disable, then TIC 
to the failing CCW. 



I 

Prepare (01) 
h 



Restart the channel program at the failing CCW. 



Read ENQ (OB) 



If the CCW is part of a Write Reset channel program set 
the retry count to seven, indicate permanent I/O error, 
then proceed with error posting; if not, restart the chan- 
nel program at the failing CCW. 



Read ID Response (07) 



Set up a special return code X'83' in IOBWORK+1 and gener- 
ate a channel program to Read Response (with count=2) . 



Read Response to ENQ (OC) 



Generate a channel program to Read Skip and set up for 
later restart of the channel program at the CCW preceding 
the failing CCW. 



Read Response to Text (25) 



j 

Read Text (11) 
(Dynamic Buffering 
Not Used) 



Set up special return code X*83* in IOBWORK+1 and generate 
a channel program to perform a Read Skip. 



| 

Read Text (11) 

(Dynamic Buffering Used) 



Set up special return code X f 82' in IOBWORK+1 and generate 
a channel program to Read ENQ (with count =2). If this 
command is part of a Write Conversational channel program, 
set up for the special return routine to restart the chan- 
nel program at the CCW preceding the failing CCW instead 
of at the failing CCW. If this command is part of an 
Autopoll operation, set up special return of X'82' in 
IOBWORK+1 and generate a Write NAK, then TIC to the 
failing Read Text. 



The retry limit test is not performed. Set special return 
code X'lA* in IOBERRCT+1, set the retry count to seven, 
and generate a channel program to perform a Read Skip. 



All other commands 



i x. 

Figure 82. Lost Data — BSC 



The retry limit test is net performed. Set the "should 
not occur" bit (in DECERRST) and generate a channel pro- 
gram to perform a Read Skip. Set the retry count to seven 
and set special return code X'lA' in IOBERRCT+1. 
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I Command 



h 



| Action 
4 

Unless otherwise specified, each of the actions described 
below is preceded by a test to see if the retry limit (7) 
has been reached. If so, a permanent I/O error is indi- 
cated, then ERP proceeds with error posting; if not, the 
action listed below for the appropriate command is 
performed. 



Dial (01) 
Disable (01) 

I 

Read Response 
to EOT (OB) 
Read ENQ (OB) 



Restart the channel program at the failing CCW. 



For a failing read ENQ command; 

If the operation is a Read Initial (X*01') for a switched 
line, restart the channel program at the Read ENQ command; 
if a Read Initial for a nonswitched line, restart the 
channel program at the preceding command. 

If the operation is a Read Initial Inquiry (X*19') restart 
the channel program at the preceding command. 

If the operation is a Read Inquiry (X'15 1 ), and no retries 
are requested, set the retry count to seven, then proceed 
with error posting. If it is a Read Inquiry and retries 
are requested, restart the channel program at the failing 
command. 

If the Read ENQ appears in an operation other than one of 
the foregoing, restart the channel program at the failing 
command. 

For a failing Read Response to EOT command, (The operation 
is a Write Reset) ; 

Set the retry count to seven and proceed with error 
posting. 



Read Response to ENQ (0C) 



Restart the channel program at the CCW preceding the fail- 
ing CCW. 



Read Response 
to polling (0A) 



Set up a special return code of X'82' in IOBWORK+1 and 
generate a Write NAK, then TIC to the Read Text CCW that 
follows the read index. (The data area address of the 
Read Text CCW is decremented by 1, and the length is 
incremented by 1.) For dynamic buffering, set the RETRY 
count to 7, and proceed with error posting. 



Read Response 

to Addressing (06) 



Restart the channel program at the first CCW. 



H 



Read ID Response (07) 



If the maximum retry count has not been reached: If this 
is the calling station, restart the channel program at the 
CCW preceding the failing CCW; if it is the answering sta- 
tion, restart at the failing CCW. 

If the maximum retry count has been reached: If this is 
the calling station, set special return code X*8C in 
IOEWORK+1 and Write DLE EOT, then disable the line; if 
this is the answering station, disable the line and TIC to 
the Enable CCW. 



Figure 83 



Timeout — BSC 
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Command 



| Action 



(Read Text (11) 

| (Dynamic Buffering 

j Not Used) 



JRead Text (11) 

j (Dynamic Buffering Used) 



If this is a polling operation, adjust CCW address and 
count (if necessary) to keep index byte location from 
being overlaid, set up return code X'82' in IOBWORK+1 and 
generate a channel program to Write NAK, then TIC to the 
failing Read Text; if not autopoll operation, setup return 

1 code X'81' and generate a channel program to read ENQ 

! followed by NOP . 

j. 

The retry limit test is not performed. Indicate a 
permanent I/O error, then proceed with error posting. 



(Read Response to Text (25) 
I 



j. 

j Write Transparent 
| Text (11) 



Set special return code X'86* in IOBWORK+1 and generate a 
channel program to write ENQ, then TIC to the failing CCW. 



H 

| All other commands 

I 



Generate a channel program to Write DLE ENQ, then TIC to 
the failing CCW. 



The retry limit test is not performed. Set "should not 
occur" bit (in DECERRST), indicate a permanent I/O error, 
then proceed with error posting. 



Figure 83 (Part 2 of 2). 


Timeout — 


BSC 




| Command 

j. 


| Action 
— + 




1 
j 



Write ENQ (03) | If NAK or RVI was received, set improper response (X^O*) 

| in DECFLAGS and restart the channel program at the CCW 
| preceding the failing CCW. If neither NAK nor RVI was 
| received, set special return code X*8H* in IOBWORK+1 and 
| generate a channel program to Read ENQ, with count=2. 

+ 

Write Response to ENQ (08) | Set up special return code X # 80' in IOBWORK+1 and generate 

| a channel program to Read Response (with count=2). 
+ 

Write Text (11) | Set special return code X'88' in IOBWORK+1 and generate a 

J channel program to Read Response (with count=2) and TIC to 
| the failing CCW. 


Write Response to | Set up special return code X'80' in IOBWORK+1 and generate 
Text (08) | a channel program to Read Response (with count=2). 


Write EOT (21) | If the operation is a write reset, restart the channel 

| program at the next CCW; if not, set special return code 
| X'87' in IOBWORK+1 and generate a channel program to Read 

| Response, with count=2. 

4. _ _ _ . 


Write WACK (01) | Set up special return code X'80' in IOBWORK+1 and generate 

| a channel program to Read Response (with count = 2). 


All other Writes | Set "should-not-occur" bit (in DECERRST), indicate a per- 

| roanent I/O error, then proceed with error posting. 


Poll (03) | If the failing CCW is the first one in the channel pro- 

| grair, set special return code X'88' in IOBWORK+1 and gen- 
| erate a channel program to Read ENQ (with count=2) ; if 
| not, set up to start polling, beginning with the failing 
| station, and restart the channel progran at the first CCW. 

j. 


_ .j. — _ 

Any Read command | If this is the first time through ERP, perform the action 

| described below for the specific type of Read command; if 
| not, turn off the ' ERP-in-control* indicator and restart 
| the channel program. If two consecutive RVIs are 
| received, proceed with error posting. 



I X 

Figure 84. Unit Exception — BSC 
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i Comma nd 

j. 

Read ENQ (OB) 



Action 

If EOT was received, proceed with err 
determine whether the retry limit (7) 
If it has, indicate a permanent I/O e 
with errcr posting; if not, restart t 
the failing CCW. 



or posting; if net, 

has been reached. 
rror, then proceed 
he channel program at 



Read Response to ENQ (00 



If the retry limit (7) has not been r 
RVI was received, indicate improper r 
DECFLAGS and restart the channel prog 
CCW. If the retry limit has not been 
NAK nor RVI was received, set special 
I0B"W0RK->1. and generate a channel prog 
count=2. If retry limit has been rea 
nianent I/O error, then proceed with e 



cached, and NAK or 
esponse (X'HO') in 
ram at the preceding 
reached, and neither 
return code X'9U' in 
ram to Read ENQ, with 
ched, indicate a per- 
rror posting. 



Read ID Response (07) 



If the operation is a Write Connect: 
valid ID was received, restart the ch 
CCW preceding the failing CCW. If af 
is still received, post the operation 
7 retries an invalid ID is still rece 
and disable the line. 



If ID NAK or an in- 
annel program at the 
ter 7 retries ID NAK 

normally. If after 
ived, Write CLE EOT 



If the operation is a Read Connect: If an invalid ID was 
received, restart the channel program at the failing CCW, 
until the retry count of 7 is reached; thereafter, disable 
the line. For any other condition, or any other character 
received, set ' shcuid-not-occur' bit (in DECERRST) , indi- 
cate a permanent I/O error, then proceed with error 
posting. 



Read Text (11) 



1. If ENQ was not the last character received, set 

"should-not-occur" bit (in DECERRST, indicate a per- 
manent I/O error, then proceed with error posting. 

2. If ENQ was received and dynamic buffering is being 
used, proceed with error posting. 

3. If ENQ was the only character received, dynamic buf- 
fering is not being used, the CCW preceding the fail- 
ing CCW is a Write Response to Text (TP-Op code 08), 
and the retry limit (7) has not been reached: 
Restart the channel program at the CCW preceding the 
failing CCW (that is, at the Write Response to Text 
CCW). 

4. If ENQ was the only character received, dynamic buf- 
fering is not being used, the CCW preceding the fail- 
ing CCW is a Read Response to Text (TP-Op Code 25), 
and the retry limit has not been reached: 

Generate a channel program to Write NAK and TIC to 

the CCW preceding the failing CCW (that is, at the 

Read Response to Text CCW, which is part of a Write 
Conversational channel program) . 

5. If ENQ was the only character received, dynamic buf- 
fering is not being used, and the CCW preceding the 
failing CCW is neither a Write Response to Text (08) 
or a Read Response to Text (25) : 

Set the "should-not-occur" bit (in DECERRST) , indi- 
cate a permanent I/O error, then proceed with error 
posting. 



Figure 84 (Part 2 of 3). Unit Exception — BSC 
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Command 



h 



| Action 



Read Text (11) (continued) 



j. 

Read Response to Text (25) 



1. If ENQ preceded ty one or more characters was 

received, dynamic buffering is net being used, and 
the retry limit has not teen reached: 

Generate a channel program to Write NAK and TIC to 
the failing CCW. 

7. In 3, 4, and 6 above, if all conditions are met 
except that the retry limit has been reached, indi- 
cate a permanent I/O error, then proceed with error 
posting. 

8. If the original count, minus one, does not equal the 
residual count and an SOH % message was received, 
proceed with error posting. 

9. If STX ENQ was received and dynamic buffering was not 
specified, indicate X'Ol' in DECFLAGS, set special 
return code X'89* in IOBWORK+1, and generate a chan- 
nel program to Write NAK and TIC to the failing CCW. 
If dynamic buffering was specified, proceed with 
error posting after indicating X'Ol* in DECFLAGS. 



l 

All other commands 



If NAK was received: If dynamic buffering is used, pro- 
ceed with error posting; if not, restart the channel pro- 
gram at the Write Text CCW. 

If ENQ was received: If the operation is a Write Inquiry, 
indicate contention (X'10') in DECFLAGS and restart the 
channel program at the failing CCW. If the operation is 
not a Write Inquiry, set special return code X*86* in 
I0BW0RK+1 and generate a channel program to Write ENQ and 
TIC to the failing CCW. 

If neither ENQ nor NAK was received, set special return 
code X'86' in IOBWORK+1 and generate a channel program to 
Write ENQ and TIC to the failing CCW. 



Set "should-not-occur" tit (in DECERRST), indicate a per- 
manent I/O error has occurred, then proceed with error 
posting. 



Figure 84 (Part 3 of 3)» Unit Exception — BSC 
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BTAM uses special return codes in two locations in the Input/Output Block (IOB) to 
cause ERP to perform the required functions in certain circumstances. The ERP con- 
trol routine examines the code in IOBERRCT+1, and takes the actions shown in Part A 
of this table. The Special Return routine examines the code in I0BW0RK+1 and takes 
the actions shown in Part B of this table. 



Part A. Actions for special Return Codes in IOBERRCT+1 

r • r 

Code | Set: | Action 



-H 



X'04' 



When ERP writes DLE ENQ 
after detecting Command 
Reject. 



If the Write DLE ENQ channel program completes 
normally, restart the user channel program at 
the Read Response to Text CCW that had pre- 
viously, ended with Unit Check and Command 
Reject. If the channel program completes with 
error, indicate a permanent I/O error, set the 
retry count to the maximum, 7, and proceed with 
error posting. 

After the ERP-initiated channel program com- 
pletes, the Special Return routine examines 
IOBWORK+1 to determine what further action to 
take, as shown in Part B of this table. 



X'lH* 



(indicates that a special 
return code has teen set in 
IOBWORK+1) 



X'1A« 



When ERP issues a Read Skip 
CCW after detecting a Lost 
Data condition, or when an 
error has occurred on an 
ERP Write CCW. 



I + 

X'OO' 



After the ERP-initiated channel program com- 
pletes, ERP proceeds as follows: 

1. If a timeout occurred following a Read Skip 
CCW, restart the channel program at the CCW 
that had ended with Unit Check and Lost 
Data indicated. 

2. If an ERP CCW ends with sense bits other 
than Lost Data or Timeout on, set up to 
issue an I/O error message. 

3. If an ERP Write CCW ends with an error, 
turn on the ERP- in- control indicator in the 
IOB, place code X*1A' in IOBWORK+1, and 
restart the channel program that had ended 
with the error that caused ERP to be 
initiated. 

4. If an ERP CCW that is not a Write or a Read 
Skip ends with a Timeout, restart the ERP 
channel program at the beginning. 



Set before posting 
completion or returning 
to the supervisor. 

Set when a write DLE 
ENQ CCW was performed 
sucessfully after a 
Read Response to Text 
CCW ended with Command 
Reject (possibly indica- 
ating that the BSC adap- 
ter in the TCU was 
still in transparent 
mode) . 



The ERP control routine proceeds with its own 
analysis of the condition code, status, and 
sense information to determine the action to be 
taken, rather than being forced to pass control 
to a specific ERP routine. 



Figure 85. (Part 1 of 5). Special Return Codes — BSC 
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!P«rt B. 


Actions for Special Return Codes in TOBWORK+l 


ICode 


1 Set: 1 Action 



X'80' 



i When Equipment Check is detected 
on a Read Text CCW. 



If ENQ was received: 

(for multipoint line) Clear tne special return 
indicators, resend the last-sent acknowledgment, 
and TIC to the failinq CCW. 

(for nonmultipoint line) Clear the special return 
indicators and restart the channel program at the 
failing CCW. 

If ENQ was not. received: 

(if retry limit has been reached) Clear the 
special return indicators, then proceed with 
error posting. 

(if retry limit has not been reached) Restart the 
ERP channel program at the beginning. 



X'81' 



1. When a Timeout on a Read 
Text CCW is detected 
(multipoint line) . 



2. When an Intervention 

Required error occurs on a 
Read Text CCW. 



If ENQ was received: 

Cl*ar the special return indicators and generate a 
channel program to Write NAK and TIC to the failing 
CCW. 

If ENQ was not received: 

(if retry limit has been reached) Clear the 
special return indicators and proceed with error 
posting. 

(if retry limit has not been reached) Restart the 
ERP channel program at the beginning. 



X'82 



1. When lost data occurs on a 
Read Text CCW. 



2. When data check occurs on a 
Read Text CCW. 



3. When time out occurs on a 
Read Text CCW. 



4. When time out occurs on a 
Read Index CCW. 



For Autopoll, if the recovery was successful, clear 
special return indicators and indicate normal com- 
pletion. Otherwise polling will be restarted. For 
non-autopoll , clear special return indicators and 
generate a channel program to Write ENQ and TIC to 
the failing CCW. 

For Autopoll, if the recovery was successful, clear 
special return indicators and indicate normal com- 
pletion. Otherwise polling will be restarted. For 
non-autopoll, clear special return indicators and 
indicate normal completion. 

For Autopoll, if recovery was successful, clear 
special return indicators and indicate normal com- 
pletion. Otherwise polling will be restarted. For 
non-autopoll, clear special return indicators and 
indicate normal completion. 

If recovery was successful, clear special return 
indicators and indicate normal completion. If 
_unsuccessful_ t _oolling_will_be_restarted i 



X'83 1 



When Lost Data occurs on a Read 
ID Response or Read Response to 
Text CCW. 



Clear special return indicators and generate a 
channel proaram to Write ENQ and TIC to the failing 
CCW. 



X'8tt' 



When Unit Exception is indicated 
on a Read response to ENQ or 
Write ENQ CCW. 



If the operation is Write Inquiry (X'16'): 

If line is nonswitched, restart, the channel 
program at the failing command. 

If line is switched: 

If ENQ was received, turn on the contention bit 
(bit 3) in DECFLAGS and clear the return 
indicators. 

If DLE EOT was received, proceed with error 
posting. 



Figure 85 (Part 2 of 5). Special Return Codes — BSC 
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I Code 



Set 



|, Action 



Cont f d 



If the operation is not Write Inquiry: 

If ENQ was received: 

If the operation is not Write Initial 
(X'02 a > v set "should-not-occur" bit (bit 
1) in DECERRST, clear the special return 
indicators, and proceed with error 
posting. 

If the operation is a Write Initial: 

If the line is switched or multipoint, 
set "should-not-occur" bit (bit 1) in 
DECERRST, clear the special return 
indicators, and proceed with error 
posting. 

If the line is nonswitched: 

If this is not the primary station, 
turn on the contention bit (bit 3) 
in DECFLAGS, restore the CSW infor- 
mation in the CSW, clear the spe- 
cial return indicators, indicate no 
more retries are to be made, and 
return control to the supervisor. 

If this is the primary station and 
the retry limit has not been 
reached, restart the user channel 
program from the beginning. 

If this is the primary station and 
the retry limit has been reached, 
clear the special return indicators 
and proceed with error posting. 

If ENQ was not received: 

If the operation is Write Connect (x'lC), 
execute a Read Skip command. 

If the operation is not Write Connect 
(X'lC), restart the channel program at 
the failing command. 



x'ss* 



(not used) 



x'se' 



1. When Unit Exception 

has been indicated on a 
Read Response to Text 
CCW. 



If a NAK is the only character received and 
dynamic buffering is being used: 

Clear the special return indicator and pro- 
ceed with error posting. 

If a NAK is the only character received and 
dynamic buffering is not being used: 

Clear the special return indicator and 
restart the channel program at the Write 
Text CCW. 



Figure 85 (Part 3 of 5) . 
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jcode 



'T 

1 Set 



| Action 



X'86' 
Cont'd 



If a NAK preceded fcy other characters is 
received: 



Clear the special return indicator and pro- 
ceed with error posting. 

If the proper ACK (ACK-0 or ACK-1) is received: 

Clear the error indicators in I0BFLAG1 and 
the special return indicators, then return 
control to the supervisor. 

If something other than NAK f ACK-0, or ACK-1 is 
received: 

(If the retry limit (7) has been reached) 
Clear the special return indicators, then 
proceed with error posting. 

(If the retry limit has not been reached) 
Restart the ERP channel program. 

If the wrong ACK is received: 

(If dynamic buffering is being used) Clear 
the special return indicators and proceed 
with error posting. 

(If dynamic buffering is not being used) 
Clear the special return indicators and 
restart the channel program at the Write 
Text CCW. 



2. When timeout has 
occurred on a Read 
Response to Text. 



l x 

Figure 85 (Part 4 of 5). 



If the failing CCW is a Write ENQ: 

If the maximum retry count (7) has not been 
reached, restart the channel program at the 
Write ENQ CCW. if the maximum count has 
been reached, proceed with error posting. 

If the correct alternating acknowledgment 
was received: post normal completion. 

If the wrong alternating acknowledgment was 
received: If dynamic buffering was used, 
proceed with error posting; if not used, and 
the failure occurred during a timeout situa- 
tion, restart the channel program at the 
Write Text CCW; if not used and the failure 
did not occur during a timeout situation, 
resend the ENQ character. 

If NAK was received, restart the channel 
program at the Write Text CCW. 

If EOT or RVI was received, clear the error 
indicators in I0BFLAG1 and the special 
return indicators, then return control to 
the supervisor. 

If some character other than one of the 
foregoing was received, restart the channel 
program at the Write ENQ CCW. 
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r — * t t T 

I Code | Set: | Action I 



I 

X^* 



X'8T 



When Unit Exception is 
indicated on a Reset opera- 
tion (TP-Op code 21) 



If ENQ was received: 

Clear the special return indicators and 
restart the user channel program at the 
failing CCW. 

If ENQ was not received. 

(Failing CCW is the last CCW in user channel 
program) Restart channel program at failing 
CCW. 

(Failing CCW is not last CCW in user channel 
program) Restart channel program at the fol- 
lowing CCW (Disable) . 



| 

X , 89* 



When Unit Exception is 
indicated on a Poll or 
Write Text CCW. 



Clear the special return indicators and restart 
the user channel program at the failing CCW. 



j. 

X^A* 



When Unit Exception is 
indicated when STX ENQ 
received. 



is 



If EOT was received, set the retry count to 7, 
clear the special return indicators, and 
proceed with error posting. 

If EOT was not received and the first character 
is not STX r set "should- not- occur" bit in 
DECERRST. 

If the first two characters are STX ENQ, and 
the maximum retry count has not been reached, 
restart the channel program at the failing CCW; 
if the retry count has been reached, proceed 
with error posting. 

If the first two characters are not STX ENQ, 
clear the error indicators in I0BFLAG1 and the 
special return indicators, then return control 
to the supervisor. 



\ 

iX'SB* 



When Unit Exception is 
indicated on a first ERP 
Write CCW. 



Execute a Read Skip CCW and set special return 
code X*8A* in I0BW0RK+1 after the original 
return code is saved. After executing the Read 
Skip, restore the original command and return 
codes . 



-+■ 



| _ 

X^C' 



When Data Check is 
indicated on a Read Text 
CCW (TP-Op code 11) 



■H- 



If ENQ was received, and the maximum retry 
count has not been reached, restart the ERP 
channel program (Write NAK and TIC to the Read 
CCW) . 

If ENQ was not received, clear the special 
return codes and proceed with error posting. 



When timeout is indicated 
on a Read ID Response CCW 
(TP-Op code 07) 



Clear the special return indicators and proceed 
with error posting. 
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Condition 



Action 



Retry count is at limit (7) 



Set up new polling or addressing characters, if ap- 
plicable, and restore the original status and sense 
information to the IOB (this indicates the nature of 
the original error that occurred during the user 
channel program and that caused ERP to be 
initiated) . If a Timeout error has occurred but the 
message is to be suppressed, pass control to the 
BTAM channel end appendage; if not, pass control to 
the operating system message writer. 



Retry count is not at limit and 

1. Failing CCW is not an ERP 
CCW. 

2. A special return code is 
present and the failing 
CCW is a Write CCW. 



3. Lost Data is indicated 

in the sense byte follow- 
ing execution of an ERP 
channel program for a 
Write Connect operation. 

*». An error other than Lost 
Data has occurred 
following execution of an 
ERP channel program for a 
Write Connect operation. 

5. An ERP Write CCW has 
ended with an error. 

6. The interruption occurred 
on an ERP CCW other than 
Write, and no sense errors 
were indicated in the sense 
byte (ignoring Lost Data). 

7. The interruption occurred 
on an ERP CCW other than 
Write, and the sense byte 
indicates that an error 
other than Timeout or Lost 
Data occurred. 

8. The interruption occurred 
on an ERP CCW other than 
Write, the sense byte 
indicates Timeout and the 
Skip bit of the failing 
CCW is on. 

9. The interruption occurred 
on an ERP CCW other than 
Write, the sense byte 
indicates Timeout, and the 
Skip bit of the failing 
CCW is not on. 

10. SOH % E or SOH % C message 
was received. 



Same as for action when retry count is at the limit. 

Set special return code X*1A* in IOBERRCT+1 to force 
control to be returned to the Error Post routine 
when the next interrupt occurs, indicate that ERP is 
in control (X'24* in IOBFLAG1), and restart the 
channel program at the CCW following the failing CCW 
Indicate that ERP is in control (X* 2<* f in IOBFLAG1) , 
and restart the ERP channel program at the 
beginning. 



Indicate that ERP is in control (X , 24 f in IOBFLAG1) 
and restart the channel program at the CCW that 
ended with the error that caused ERP to be 
initiated. 

Same as action for condition 2, above. 

Return control to the ERP Control routine. 



Same as for action when the retry count is at the 
limit. 



Same action as for condition 4, above. 



Restart the failing ERP channel program at the 
beginning. 



Set up the fields used in printing operator-awareness 
messages generated by terminals for SYS1.LOGREC. 
The control is passed to the Teleprocessing 
Recorder. 



Figure 86. Error Post Actions — BSC 
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X indicates that the bit is on. 
(X) indicates that the bit may be on if stacking is done by the channel. 



Figure 87. Local 3270 Error Conditions (According to CSW and Sense Byte) 
STATUS SENSE 



A = Attention 
CUE = Control Unit End 
B = Busy 
CE = Channel End 
DE = Device End 
UC = Unit Check 
UE = Unit Exception 
CDC = Channel Data Check 



CR = Command Reject 
IR = Intervention Required 
BOC = Bus Out Check 
EC = Equipment Check 
DC = Data Check 
US = Unit Specify 
CC = Control Check 
OC = Operation Check 
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This error condition may be the result of stocking in the channel. 

2 
Does not apply to 3272 devices. 

3 Does not apply to the 3272 or 3274 Model 1B devices. 

The error condition and action also includes the Prepare to 
Read select commands (command codes X'1B', X'2B', 
X'3B\ X'4B') when directed to a 3274 Model ID Control 
Unit. If Prepare to Read select commands are directed to 
3272 or 3274 Model IB devices, a Command Reject error 
occurs and no recovery is attempted. 

Figure 88. Local 3270 Recovery Actions (By Error Condition and Failing Command) 
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Note : For a definition of these codes, 
refer to OS/VS1 Recovery Management 
Support Logic , SY27-7239. 

Figure 89. Local 32 70 Sequence and Termi- 
nation Codes in Byte 7 of ERPIB 
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^""""-^.^Secjuence Code 
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1 Does not apply to the 3272 Control Unit. 

2 
The error condition and action also includes the Prepare 

to Read select commands IX'IB', X'2B'. X'3B', X'4B'I 
when directed to 3274 Model 1 devices. 
3 
Does not apply to 3272 or 3274 Model IB devices. 

Note: If data chaining is in effect on the failing CCW, the failing command 
is the first CCW with data chaining in the CCW string. 

Figure 90. Local 3270 Recovery Actions (By Error Condition and Failing Command) 
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SUGGESTED RETRY OPTIONS FOR READ AND WRITE OPERATIONS 



After a user program Read or Write operation has completed, the program must decide what 
the next operation should be. This depends largely on the result of the preceding opera- 
tion — whether it was completed normally, with or without some exceptional condition, or 
abnormally; and if the latter, what kind of error caused the abnormal completion. The 
tables in this chapter suggest, for various completion codes and ending conditions, the 
next READ or WRITE macro it might be appropriate for the user program to issue. 

Retry options applying only to the local or switched 3275 (BSC2) are grouped in a set 
of tables separate from the tables covering other devices used on ESC2 lines. 



TP-Op 

Code 

(hex) 



Completion 

Code 

(hex) 



Other 

Indications 

(hex) 



Meaning 



-+ 



Retry Options 



41 



DECFLAGS: 40 



NAK received in response to ENQ 



7F 



DECFLAGS: CO 



WACK received in response to ENQ 



1,3, or 6 



0C 



41 



ENQ in DECRESPN 



ENQ received in response to ENQ 
(MODE=CNTRL in DCB macro) 
retried seven times 



H- 



41 



DECFLAGS ; 



10 



ENQ received in response to ENQ 
(MODE^CNTRL in DCB macro) 



11 



41 



Data check 



(for TIV, TIVX, TTV, TTVX only) 
Text was received with error 



41 



DECFLAGS: 20 



Wrong acknowledgment received in 
response to text 



25 



7F 



DECFLAGS: 40 



EOT received in response to text 



7F 



DECFLAGS: 42 



RVI received in response to text 



7F 



DECFLAGS: CO 



WACK received in response to text 



+ + , 

41 | DECFLAGS: 40 |NAK received in response to text 
, j. i 



3 or 6 



Re t r y O pt i ons : 



1. Issue a WRITE Initial (TI) macro. 

2. Issue a READ Repeat (TP) macro. 

3. Issue a WRITE Inquiry (TQ) macro. 

4. Issue a WRITE Continue (TT) macro. 

5. Issue a READ Initial (TI) or READ Initial Inquiry (TIQ) macro. 

6. Issue a WRITE Reset (TR) macro. 

7. Continue normally. 



Figure 91. Retry Options for Write Operations (Nonswitched Point- to-Point Line (BSC11) 



Suggested Retry Options for Read and Write Operations 277 



TP-Op 
Code 
(hex) 



Completion 
Code 
(hex) 



Other 

Indications 

(hex) 



Meaning 



Retry Options 



OB 



Ul 



Timeout 



H 



ENQ not received 



7F 



DECFLAGS ! 



10 



Received [ID] ENQ did not match 
expected [ID] ENQ 



Ul 



Timeout 



[ID] ENQ not received 



Ul 



Lost data, data 
check, or 
overrun 



Text was received with error 



11 



2 or U 



Ul 
Ul 



Timeout 



No text received 



1,3 or 4 



DECFLAGS i 



01 



STX ENQ received in lieu of text 



7F 



DLE EOT from switched line 



Retry Options 



1. Issue a WRITE Break (TB) macro to disconnect the line. 

2. Issue a READ Repeat (TP) macro. 

3. Issue a READ Inquiry (TQ) macro. 
U. Issue a WRITE Disconnect (TD) macro to disconnect the line. 

5. If expanded ID verification is in use, BTAM automatically disconnects the line 
and reissues the READ Connect macro. If expanded ID verification is not in use, 
issue a WRITE Break (TB) macro. 

6. If expanded ID verification is in use, BTAM automatically disconnects the line. 
You may therefore reissue the READ Connect macro. If expanded ID verification is 
not in use, issue a WRITE Break (TB) macro. 

L 

Figure 92 . Retry Options for Read Operations — Answering (Switched Point- to-Point 
[BSC2] except 3275) 
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1 — — 
| DECFLAGS: 
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_ j. 


10 


j. 

| Invalid ID received in response to 
| ID ENQ 

4. 
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Ul 
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(Timeout 
_ j. _ _ 




T 

|No response received to [ID] ENQ 


T 

X_ 


1 






Ul 


| Lost data, 
| check, or 
| overrun 


data| 

|Text was received with error 
1 




1 or 3 



11 ^ X X + 4, 



Ul 



| Timeout 
.x 



| No text received 



| 1,2, or U 
x. 



,. X X X x i 

Retry Options : 



1. Issue a WRITE Disconnect (TD) macro to disconnect the line.. 

2. Issue a write Break (TB) macro to disconnect the line. 

3. Issue a READ Repeat (TP) macro. 
U. Issue a READ Inquiry (TQ) macro. 

L 

Figure 93. Retry Options for Read Operations — Calling (Switched Point- to-Point [BSC2] 
except 3275) 
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TP-Op 

Code 

(hex) 



Completion 

Code 

(hex) 



Other 

Indications 

(hex) 



Meaning 



Retry Options 



41 



DECFLAGS: 20 



0C J- 



Wrong acknowledgment received in 
response to ENQ 



1 or 4 



41 



DECFLAGS: 40 



NAK received in response to ENQ 



1 or 4 



-H 



7F 



DECFLAGS: 10 



Invalid ID received in response to 

ID ENQ 



07 



If original 
operation is 
Write TI, 
option 4. 

If original 
operation is 
Write TC, 
option 5 



7F 



DECFLAGS: 40 



NAK or ID NAK received in response to 
ID ENQ 



4 or 5 



7F 
41 



DECFLAGS: CO 



Timeout 



WACK received in response to ID ENQ 
No response received to [ID] ENQ 



4 or 5 



If original 
operation is 
Write TI, 
option 4 

If original 
operation is 
Write TC f 
option 5 



11 
|. 

25 



41 



41" 

41 
^ 



Lost data, data 
check, or 
overrun 

DECFLAGS: 20 
NAK in DECRESPN 



(for TIV,TIVX,TTV, TTVX only) 
Text was received with error j 3 or 4 

Wrong acknowledgment received in 

response to text | 1 or 4 

NAK received in response to text | 2 or 4 



41 | Timeout 
Retry Options : 



No response received to text 



1 or 4 



1. Issue a WRITE Inquiry (TQ) macro. 

2. Issue a WRITE Continue macro to retransmit the text. 

3. Issue a READ Repeat (TP) macro. 

4. Issue a WRITE Disconnect (TD) macro to disconnect the line. 

5. Reissue the WRITE Connect (TO macro. 

Figure 94. Retry Options for Write Operations (Switched Point- to- Point Line [BSC21 
except 3275) 
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TP-Op 

Code 

(hex) 



Completion 

Code 

(hex) 



Other 

Indications 

(hex) 



Meaning 



Retry Options | 



H 



OB 



1*1 



Timeout 



ENQ not received - the 3275 Dial has no 
data to send 



1,2, or 3 



07 



7F 



DECFLAGS : 



10 



Received ID ENQ did not match expected 
ID ENQ 



41 



Timeout 



ID ENQ not received 



11 



7F 



7F 



DECFLAGS : 



02 



EOT received after ETB in lieu of text 
Sense/status message received 



41 



Lost data, data 
check, or 
overrun 



Text was received with error 



1 or 8 



--+ 



41 



Timeout 



No text received 



1 or 9 



41 | DECFLAGS: 01 | STX ENQ received in lieu of text 

X X X 



Retry Options : 



1. Issue a WR3TE Disconnect (TD) macro to disconnect the line. 

2. Issue a WRITE Inquiry (TQ) macro. 

3. Issue a WR3TE Reset Monitor (TRM) . Follow by issuing RESETPL if no response is 
received in a reasonable time. 

4. If expanded ID verification is in use, BTAM automatically disconnects the line. 
Reissue the READ Connect (TC) macro. If expanded ID verification is not in use, 
issue a WRITE Disconnect (TD) macro. 

5. If expanded ID verification is in use, BTAM automatically disconnects the line 
and reissues the READ Connect macro. If expanded ID verification is not in use, 
issue a WRITE Disconnect (TD) macro. 

b. Issue WRIT! Reset Monitor (TRM) followed by READ Continue (TT) to read the sense/ 
status message. 

7. Issue READ Continue (TT) to acknowledge receipt of the sense/status message and 
receive EOT. 

8. Issue a RE/.D Repeat (TP) macro. 

9. Issue a RE?D Inquiry (TQ) or READ Inquiry Monitor (TQM) macro. 



Figure 95. Retry Options for Read Operations — Answering (Switched Point- to- Point 
tBSCi] 327 5 only) 
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OB 

I 

07 



H- 



TP-Op 

Code 

(hex) 



4 + 

7F 



Completion 

Code 

(hex) 



41 



7F 
41 



Other 

Indications 

(hex) 



■T 

I 
I 

I Meaning 






Timeout 



|ENQ not received - the 3275 Dial has 
| no data to send 

DECFLAGS: 40 | ID NAK received 

, 



DECFLAGS: 10 | Invalid ID received in response to ID 
|ENQ 

Timeout | No response received to ID ENQ 



Retry Options 
1,2, or 3 



-H 



11 



7F 



area+ length 
-residual 
count: EOT 



| EOT received after ETB in lieu of text 



7F 



h 



DECFLAGS: 02 | Sense/status message received 






41 | Lost data, data | Text was received with error 
check, or | 
overrun | 

| 41 j Timeout |No text received 



1 or 6 






| 1 or 7 



-H 



Retry Options : 



1. Issue a WRITE Disconnect (TD) macro to disconnect the line. 

2. Issue a WRITE Inquiry (TQ) macro. 

3. Issue a WRITE Reset Monitor (TRM) . Follow by issuing RESETPL if no response is 
received in a reasonable time. 

4. Issue WRITE Reset Monitor (TRM) followed by READ Continue (TT) to read the sense/ 
status message. 

5. Issue READ Continue (TT) to acknowledge receipt of the sense/status message and 
receive EOT.' 

6. Issue a READ Repeat (TP) macro. 

7. Issue a READ Inquiry (TQ) or READ Inquiry Monitor (TQM) macro. 

Figure 96. Retry Options for Read Operations — Calling (Switched Point-to-Point (BSC21 
3275 only) 
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r t 

TP-Op 

Code 

(hex) 

V- 



Completion | Other 

Code (Indications 

(hex) i (hex) 



•+- 



Meaning 



+-- 



Retry Options 



07 



7F 



DECFLAGS: 10 
Write TI 



Invalid ID received in response to ID 

ENQ 



7F | DECFLAGS: 10 
I Write TC 



Invalid ID received in response to ID 
ENQ 



•H 



7F 



■I" 



DECFLAGS: 40 



ID NAK received in response to ID ENQ 



•-+ 



-H 



+- 



7F 



DECFLAGS: CO 



WACK received in response to ID ENQ 



--+ 



11 



25 



41 



[Timeout 
Write TI 



No response received to ID ENQ 



41 



| Timeout 
I Write TC 



No response received to ID ENQ 



j. 

41 | Lost data, data 
i check, or 
j overrun 



7F 



(for TIV, TTV only) Text was received 
with error 

For TIV, EOT was received in lieu of 
text. For TTV, EOT was received after 
ETB in lieu of text 



1 or 4 






7F 
7F 



DECFLAGS: 20 



Wrong acknowledgments received in 
response to text 






DECFLAGS : CO 
DECRESPN: WACK 



WACK response to ENQ received 



1 or 5 
6 



7F 



DECRESPN: 
DECFLAGS : 



EOT 
40 



EOT response to write text 






4 

1 



41 
41 



DECRESPN: 



NAK 
NAK 



NAK received in response to text 
NAK response to ENQ received 



1 or 7 
3 



DECRESPN : 
Write TQ 

| 41 Timeout | No response received to text | 1 or 5 

j. j j h 



Retry Options : 



1. Issue a WRITE Disconnect (TD) macro to disconnect the line. 

2. Reissue the WRITE Connect (TC) macro. 

3. Issue WRITE Reset Monitor (TRM) followed by READ Continue (TT) to read the sense/ 
status message. 

4. Issue a READ Repeat (TP) macro. 

5. Issue a WRITE Inquiry (TQ) macro. 

6. Reissue READ Inquiry or issue READ Inquiry Monitor (TQM). Note : Timeout is the 
usual condition for the switched 3275. Use READ TQM if you do not wish to time 
out. RESETPL can be issued to terminate READ TQM if no response is received in a 
reasonable nime. 

7. Issue a WRITE Continue (TT) macro to retransmit the text. 

Figure 97. Retry Options for Write Operations (Switched Point-to-Point (BSC21 3275 only) 
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OA 

I 

09 



TP-Op 

Code 

(hex) 



41 



H 
I 1.2, or 4 

1 

1,2, or 4 



03 



11 



Completion j Other | 
Code J Indications | 
(hex) | (hex) | Meaning 



7F 



| Timeout | No index byte was received 
+ + . 

IDECFLAGS: 04 (Negative response to polling 



[Retry Options 



1,2, or 4 



41 | Timeout |No terminal responded to polling 

48 | | Initial read terminated by RESETPL | 

j | macro | 1,2, or 4 

41 IDECFLAGS: 01 |STX ENQ sent in lieu of text | 2 

41 jLost data, data| | 

| check, or | | 

| overrun |Text was received in error | 2 or 3 

41 | |ENQ response to Read Continue | 7 

41 IDECFLAGS: 40 |Text was received ending with an ENQ | 5 

7F IDECFLAGS: 02 | Sense/status message was received | 6 

Retry Options : 



1. Issue a READ Initial (TI) macro to poll the same or a different station. 

2. Issue a WRITE Reset (TR) macro. 

3. Issue a READ Repeat (TP) macro. 

4. Issue a WRITE Initial (TI) macro. 

5. Issue a READ Initial (TI) macro (using the polling entry of the remote 3270 
device for which completion was posted) to receive the error status message. 

6. Issue a READ Continue (TT) macro, and examine the sense/status bytes to determine 
what action to take. 

7. Probably a device problem. Retry operation from READ Initial (TI) . If problem 

recurs, issue WRITE Reset (TR) and continue working with other devices. 
i___ ________ ._____. ____________ _. 

Figure 98. Retry Options for Read Operations (Nonswitched Multipoint Lines [BSC3]) 
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TP-Op 

code 

(hex) 

| 



H- 



06 J- 



Completion | Other 
Code J Indications 
(hex) | (hex) 
f- 



7F 



IDECFLAGS: 04 



I 

7F | DECFLAGS : 4 2 



Meaning 

NAK received in response to addressing 






RVI received in response to addressing 



+-« 



Retry Options 
1,2, or 7 



1,2, or 7 



7F 



IDECFLAGS: 42 



RVI received (remote 3270) 



2 or 8 



7F IDECFLAGS: CO 
._- f 



WACK received in response to addressing 



1 or 2 



41 



| Timeout 



No response received to addressing 



1 or 2 



f 

| Data check 



11 



41 



(TIV, TIVX, TTV, TTVX only) 
Text was received with error 



2 or 5 



41 



IDECFLAGS: 40 
I 



(TIV only) 
Text was received ending with an ENQ 



7F 



l DECFLAGS : 



20 



f 

7F IDECFLAGS: 42 
f- 



Wrong acknowledgment received in 
response to text 



2 or 4 



25 



41 



H- 



h 



RVI received in response to text 



2 or 6 



7F IDECFLAGS: CO 
i «~ 



WACK received in response to text 



+- 



2 or 4 



7F IDECFLAGS: CO 
f 



IDECFLAGS: 40 



WACK received (remote 3270) 

NAK received in response to text 



9 

2 or 3 



f 

7F JDECFLAGS: 40 
IDECRESPN: EOT 



EOT received in response to text 



8 



41 

I A 

Retry Options : 



| Timeout 

x 



No response received to text 



| 2 or 4 



1. Issue a WRITE Initial (TI) macro to address the same or a different station. 

2. Issue a WRITE Reset (TR) macro to terminate selection. 

3. Issue a WRITE Continue (TT) macro. 

4. Issue a WRITE Inquiry (TQ) macro. 

5. Issue a READ Repeat (TP) macro. 

6. Continue normally. 

7. Issue a READ Initial (TI) macro to poll another station. 

8. Issue a READ Initial (TI) macro (using the polling entry of the remote 3270 
device for which completion was posted) to receive the error status message. 

9. If the write operation started a printer, issue a WRITE Reset (TR) macro to reset 
the line, and continue normally. 

l . ^ — .. 

Figure 99. Retry Options for Write Operations (Nonswitched Multipoint Line (BSC31) 
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Completion 

Code 

(hex) 



Other 

Indications 

(hex) 



Meaning 



Retry Options 



7F 



DECFLAGS: 01 



41 



-H~ 



OLTEP received control of the device 
following normal completion of the 
I/O operation 
+ 



1, 2, 3, or 4 



DECFLAGS: 01 

(and other error flags) 



OTLEP received control of the device 
following a permanent I/O error 



2, 3, or 5 



41 
41 



DECERRST: 80 



Control unit not operational 



DECERRST: 00 
DECSENSO: 01 



Incorrect data stream 



1, 2, or 3 
6 



+ 



-H 



41 



DECERRST: 10 



Integrity of the device regeneration 
buffer is questionable 



+~ 



41 



Other than above 



I/O error 






44 



I/O request intercepted 



48 
Retry Options 



Read TI canceled 



+~ 



1. Continue normally. 

2. Inform the system operator, and request additional information. 

3. Wait for some interval of time before trying the next I/O operation. 
4*. Issue a WRITE TS macro instruction to reconstruct the buffer contents. 

5. Further use of the device is questionable, although prohibited. The problem pro- 
gram should consider the device unavailable and should consider requesting that 
diagnostics be run on the device. 

6. Check that the data stream is correct (that is, buffer addresses are correct, 
order sequences are complete, and orders do not cause overrun) . 

7. The contents of the device buffer are doubtful, because (1) an error occurred fol- 
lowing the completion of the previous I/O operation or (2) a request-f or-test mes- 
sage was received from the device requesting that a test message be sent to anoth- 
er device. If the current operation is a write erase, it should be done. Other- 
wise, a WRITE TS macro instruction should be issued to reconstruct the buffer con- 
tents before doing the current operation. 

i 

Figure 100. Retry Options for Local 3270 Read and Write Operations 
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ONLINE TESTING 



Online testing is an optional BTAM faci- 
lity that permits the user to verify proper 
operation of terminals and of the communi- 
cation lines thai- link them to the computer 
and to aid in diagnosing line or terminal 
troubles. Online testing centers around 
transmission of predefined standard test 
messages, the formats of which depend on 
the purpose of the test. 

Online testing is performed during norm- 
al BTAM operation. Only the communication 
lines and terminals specified are involved; 
data transmission proceeds as usual on 
other lines. Operation of the program is 
affected only to the extent of the line 
time required for test transmissions and of 
the CPU time required to process requests 
for tests. 



99999 



You may wish to p 
online testing an a 
example, to test lin 
ing at the beginning 
intervals during the 
tests are appropriat 
and are normally per 
computer or terminal 
tomer engineer. 



erform certain kinds of 
routine procedure, for 
e or terminal function- 
of each day, or at 
day. Other kinds of 
e as diagnostic aids, 
formed as needed by the 
operator or IBM cus- 



In order to hctve the online testing 
facility available, you must code T among 
the EROPT operands of the DCB macro 
instruction for the line group. 

Online testing is implemented somewhat 
differently for s;tart-stop lines and for 
binary synchronous lines. 



ONLINE TESTING FOR START-STOP 
COMMUNICATIONS LINES 

For start-stop communication lines, test 
requests may be initiated only at remote 
terminals. The tests requested may involve 
message switching, comparing the contents 
of a test message to a predefined character 
sequence in main storage, sending a string 
of characters to a specified terminal, or 
checking the IBM SELECTRIC typing element 
mechanism of a terminal printer. 

Start-stop online tests are initiated by 
transmission of test request messages, the 
format of which is: 



r T T T T * T T 1 

I I I J TO j UNIT J j END | 
|99999 j xx | type | ADDR | SELECT J text | CHAR j 
L X X X X X X J 

5 2 1 lor2 lor2 Variable 1 
FieJd length (bytes) 



xx 



type 



identifies this message as a test 
request. 



defines the type of test to be 
executed (see "Test Type Codes, 
below) . 



specifies the type of terminal from 
which the test is being requested. 
Applicable type codes are: 

Code Device 

2741 

1 1030 card reader 

2 1050 

3 1060 

4 2740 (with or without 2760 
attached) 

5 1030 badge reader or manual 
entry unit 

6 2260 (Remote) and 2265 (Remote) 

TO ADDR 

specifies the address of the terminal 
to which the message is to be sent 
(for 2760 tests, specifies function to 
be performed) . 

TO ADDR is a one-byte field for the 
IBM 1030 Card Reader and 1050, 2740, 
and 2741 terminals; it contains the 
addressing character for the selected 
terminal. For those 2740 and 2741 
terminals not using addressing charac- 
ters (that is, all terminals not 
equipped with station control), this 
field should contain a space character 
(in the hexadecimal representation of 
the transmission code pattern for 
space) except when a 2760 frame change 
or scan point test is performed. 

TO ADDR is a two-byte field for the 
1030 badge readers and manual entry 
units, 1060 terminals, 2260 and 2265 
terminals; it contains a two- byte code 
indicating which addressing characters 
BTAM is to send on the line. 



For 
Code 


1030 

Addressing 
i Character 


02 
03 
04 


B 
c 

D 



26 
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Note: Codes of 01 and 10, represent- 
ing A and J, may not be used, as A and 
J are invalid 1030 addresses. 



For 1060 



Code 
01 
02 
03 



26 



Addressing 
Character 

A 

B 

C 



For 2260 or 2265 (or 1053 Attached to 
the 2848 or 2845) (2 characters) 

2260 and 2265 Display Stations and 
1053 Printers are selected by trans- 
mitting a predefined code in these 
character positions. The device 
selection code can be one of 25 USAS- 
CII noncontrol characters. 



For 2760 



Actual 




Unit Address 


Code 


t ... hx 




1000000 


01 


1000001 2260 and 1053 


02 


attached to 


... 


1011000 2848 


25 



TO ADDR contains the F- character that 
specifies the 2760 function to be per- 
formed. Figure 22 lists the F- 
characters and their meanings. 

For 2848 (2260) and 2845 (2265) 

TO ADDR is used to select the 2848 or 
2845 display control unit. The 
address of a display control unit can 
be any USASCII noncontrol character 
(that is, any character in columns 3-7 
in the USASCII code chart) , therefore 
allowing 96 possible display control 
addresses . 



Actual 
Unit Address 
b ...b ± 
0100000 
0100001 



Code 

01 
02 



1011001 - 2265 attached 
to 2845 

1011001 - 1053 attached 
to 2845 



26 



27 



Note ; The UNIT SELECT code applicable 
to a particular 2260 display station 
can be determined from that display 
station itself by utilizing the Requ- 
est Address test (test type 09). 

END CHARACTER 

1030 = EOB 
1050 = EOT 
1060 = EOB 

2740 = EOT 

2741 = EOT 
2760 = EOT 
2848 = ETX 



1111111 



96 



Note ; The TO ADDR code applicable to 
a particular display control unit can 
be determined from one of its attached 
display stations by specifying the 
Request Address test (test type 09) in 
the test message. 

UNIT SELECT 

Note ; Unit select is not applicable to 
1030, 2740, or 2741 tests; therefore, text 
can start in this position. 

For 1050 and 1060 (1 Character) 

UNIT SELECT specifies the particular 
component of the selected terminal 
that is to receive the message, that 
is, 1052, 1053, 1055, 1062 Printer 1 
or 2, etc. ' The appropriate unit 
select code can be determined from the 
publication pertaining to the termi- 
nal. For 2760 tests, this field con- 
tains the A x , A a characters that spe- 
cify amount of filmstrip movement. 
See Figure 24. 



Note : The test message is transmitted from 
a 1060 terminal by utilizing the data and 
transaction keys. The EOB character is en- 
tered by depressing the teller A or B key. 



TEST TYPE CODES 

01 Message Switching 

This test receives a message from the 
requesting terminal and transmits it to 
the terminal (on the same line) speci- 
fied in the test message. Note : The 
length of the message to be switched 
cannot exceed the length of the data 
area specified in the READ macro for 
the line over which the test is 
requested. 

02 Tilt 

This test sends the tilt test to the 
requested terminal . This test is 
designed to check the SELECTRIC type- 
writer print ball mechanism. 
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03 Rotate 



This test sends the rotate test to the 
requested terminal. This test is 
designed to check the SELECTRIC type- 
writer print ball mechanism. 

04 Twist 

This test sends the twist test to the 
requested terminal. This test is 
designed to check the SELECTRIC type- 
writer print ball mechanism. 

05 Stored Compare 

This test provides a means to compare 
the received message with a particular 
character sequence in main storage. 
The message xn main storage is compat- 
ible with the transmitting capabilities 
Df the terminals involved. 

The test message to be compared with 
the character sequence in main storage 
is transmitted from the terminal and 
consists of the numbers through 9 
followed by the alphabet (A through Z) . 
The incoming test message must specify 
the comparison characters in the same 
order as they appear in the sequence in 
main storage although not all of them 
need be specified. 

The length of the test message can- 
not exceed the length of the data area 
specified in the READ macro that will 
receive the message. The data area 
must be long enough to contain the 
header information (99999, etc.), the 
characters to be compared, and the end 
character. 

Exceptions ; 

1. When transmitting from any 2740 
terminal, a space character must 
precede the comparison data. This 
space character is in addition to 
the space character in the TO ADDR 
field. 

2. The stored compare test for a 1060 
is requested by entering the fol- 
lowing message: 

r 1 

|999990534210 EOB| 

Comparison is then made to this 
message. Responses to this requ- 
est are printed only at the re- 
questing terminal. 

Messages received at the terminal are : 

1 If the comparison to the stored 
message is valid, the following 



message is sent to the terminal 
specified in the TO ADDR field: 



r t 

| CMP VXD-* | 
I J 



The character printed in the posi- 
tion of the asterisk will be the 
last character against which a 
comparison could be made. Excep- 
tion: The message sent to a 1060 
after a valid comparison is: 



r — i 

| CMP VLD J 
I J 



If the request was received prop- 
erly, but an insufficient count 
was specified in the READ and thus 
no characters could be compared, a 
/ character is printed in the 
asterisk position. 

2. If the comparison to the stored 
message is invalid, the data 
received is message-switched to 
the terminal specified in the TO 
ADDR field. 



Note : The Stored Compare test is not 
applicable for the 1030 manual entry 
unit or badge reader. 

06 All Characters Test 

This test provides the standard All 
Characters test for IBM Customer Eng- 
ineer terminal checkout and serves as a 
start-up message. Special characters 
are not used in the terminal test. 
Characters received at the terminal 
are: 

For 1030. 1060. 2848 (2260 and 1053): 

'umbers: 0-9, and alphabet: A-Z. 

For 1050. 2740. 2741: 

Numbers: 0-9, alphabet a-z (lower 
case), and alphabet A-Z (upper 
case) . 

07 SELECTRIC Analyzer Test 

This test provides an exercise to ana- 
lyze the capability of the SELECTRIC 
typewriter carrier mechanism to perform 
within specifications. When this test 
is requested, BTAM sends to the termi- 
nal a predefined message that exercises 
the carrier mechanism. This test is not 
applicable to a 1053 Printer attached 
to a 2848 or 2845 Display Control. 
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08 Write at Line Address Test (2260 and 
2265) 



This test provides line selectivity 
checkout by using the first two charac- 
ters after the UNIT SELECT field as a 
new display line code. This can be 
followed by data which is to be 
switched to the terminal and displayed 
on the display station screen at the 
selected line. The codes and' asso- 
ciated display lines are: 

Code Display Line 

01 1 

02 2 

03 3 



12 



12 



09 Request Address Test (2260 and 2265) 

This test allows the operator at a dis- 
play station to determine the display 
control and display station address ap- 
plicable to that station. 

The TO ADDR and UNIT SELECT fields are 
not utilized in this test message since 
the test itself provides these fields 
to the requesting terminal. ETX can be 
sent immediately after the TYPE field. 

BTAM returns to the requesting display 
station a 9 character message giving 
the addressing information for that 
station. The format is: 

DC+DVxxyy 

DC+DV indicates that the message con- 
tains the requested addressing informa- 
tion; xx and yy are the display control 
and device (that is, display station) 
addresses . 



Note : This test provides only the TO 
ADDR and UNIT SELECT codes of the re- 
questing display station. It is not a 
means of getting these codes for some 
other display station. 

10 Frame Change Test (2760) 

This test enables an IBM Customer 
Engineer to request that a filmstrip be 
moved to a new frame. The request for 
a frame change test is entered on the 
27 «*0 keyboard. BTAM uses the data in 
this message to generate the appropri- 
ate frame change message and sends it 
to the 2760. The Customer Engineer 
visually verifies the correctness of 
the filn» movement. 



11 Scan Point Test (2760) 

This test performs a filmstrip movement 
and then allows the Customer Engineer 
to probe the screen and have the hori- 
zontal and vertical coordinates of the 
probed response points printed on the 
2740 printer. The request for a scan 
point test is entered at the 2740 key- 
board. BTAM generates a frame change 
message and sends it to the 2760. The 
Customer Engineer then probes one or 
more response points, depending on the 
mode specified in the test request mes- 
sage. BTAM sends to the 2740 a message 
containing the coordinates of the 
response points probed. 

See "Online Testing" under "IBM 2760 
Optical Image Unit — General Informa- 
tion," for further information en 2760 
online tests. 



TERMINAL TEST RESTRICTIONS 

1. A remote terminal may send a test 
request message only when the opera- 
tion in effect for the line is a Read 
Initial or Read Conversational 
operation. 

2. No READ macro can include the Reset 
option. For example, a READ T I or TV 
can be issued, but not a READ TIR or 
TVR, for a line over which test 
requests may be received. The line 
connection must be maintained during 
the terminal test (the Reset option 
causes BTAM to break the connection) . 

3. The user program input area must be 
long enough to accommodate the entire 
test message. The response to polling 
must be read into the first byte of 
this area. If dynamic buffering is 
used there is an additional restric- 
tion: the data area of the first 
buffer in the chain must contain all 
of the characters in the test request. 

4. To request a test from a 1030 badge 
reader, the badge reader must be wired 
to read out the entire 10 columns of 
the badge (refer to publications about 
the IBM 1030) . 

5. The transaction code received from a 
1030 is not included as part of the 
test request. 

6. All 1030 tests require a 1033 Printer 
on the same line as the requesting 
terminal. The printer address must be 
specified in the TO ADDR field. 
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The terminal tests will not test 1035 
Badge Readeis or 1030 Badge Readers in 
a 1035 environment. 

If insufficient storage is available 
for the test pattern, the request will 
be switched to the terminal specified 
by the TO ADDR field. 



ONLINE TESTING FOR BINARY SYNCHRONOUS 
COMMUNICATIONS LINES 

Online tests for BSC lines may be 
requested by the central computer, by 
remote stations, or both, depending upon 
the type of test and the line and station 
configuration. There are 34 types of 
tests, not all of which apply to all 
configurations . 

Online testing is available for all 
types of remote BSC stations. For System/ 
370-to-System/370 operation, both computers 
may run under BTAM with the online test 
facility, or one may run under BTAM and the 
other under an online diagnostic program. 
Operation between System/370 and an 1800, 
2715, 2770, 2780, 2972, or remote 3270 
requires the System/370 to run under BTAM 
or an online diagnostic program. For 
System/370 to System/3 or 1130 operation, 
the System/ 370 must run under BTAM, and the 
System/3 or 1130 must run under an online 
diagnostic program. 

In System/370-to- System/370 operation, 
either computer may initiate online tests. 
In operations between the central computer 
and a System/3, 1130, 1800, 2770, or 2792, 
the central computer cannot initiate the 
online test except for a test type of 0. 
In operations between the central computer 
and a 2715, only the 2715 can initiate an 
online test. In operations between the 
central computer and a remote 3270, any 
remote terminal on the same line can initi- 
ate an online test of the remote 3270. 

When the central computer initiates the 
test with a 2780, the 2780 mode switch must 
be set to either Print or Punch position if 
the 2780 is on a point-to-point line. 

Tests are requested at a remote station 
by sending to the central computer a mes- 
sage having a special format, called a 
request-for-test (RFT) message. The method 
of sending the RFT message differs for the 
various types of r emote station. For a 
2780, the RFT message is punched in a card. 
For an 1130 or Syr,tem/3, the message is 
sent by a diagnostic program. For a remote 
3270, (1) the cursor is positioned at the 
top left of an unformatted screen (by pres- 
sing the CLEAR key and then the RESET key, 
for example), (2) the text of the RFT mes- 
sage (test type, number of times, length of 



address, selection address) is entered by 
means of the keyboard, and (3) the TEST 
REQUEST key is pressed to frame the text 
with control characters (SOH % / STX and 
ETX) . The selection address is omitted for 
the switched 3275; see "Formats of RFT, 
Test, and Console Messages" in this sec- 
tion. For a System/370, it is sent by 
ireans of an ONLTST (Online Test) macro 
instruction coded within the user program, 
as explained below. 

To request a test at the central comput- 
er, the programmer codes an ONLTST macro 
instruction in the program at the point at 
which the test is to be performed. The 
ONLTST macro generates the proper RFT mes- 
sage and sends it to the remote computer or 
terminal specified in the ONLTST macro. 

The format of the RFT message is the 
same whether it is sent by the central com- 
puter or is received by the central comput- 
er from a remote computer or terminal. The 
format is shown below under "Formats of 
RFT, Test, and Console Messages.) 

Transmission of an RFT message is fol- 
lowed by one or more transmissions of test 
messages. The RFT message contains a field 
called the X field, which contains a code 
indicating the type of test to be per- 
formed. The code, from 00 to 34, governs 
the sequence of I/O operations comprising 
the test and determines the content of the 
test message. 



TYPES OF TESTS 

Type 00 

For this type of test the requesting sta- 
tion sends an RFT message, immediately fol- 
lowed by a test message, or a sequence of 
test messages, the content of which is 
user-specified. The test message is sent 
the number of times specified in the Y 
field of the RFT message, which may be from 
one to 99. For example, if you specify a Y 
value of 5, the requesting station sends 
the RFT message, followed by five consecu- 
tive transmissions of the same test mes- 
sage. The computer or terminal that 
receives the RFT and test message responds 
with an acknowledgment after each message. 

For this type of test, the requesting 
station may be the central computer except 
when the remote station is a 2715 Model 1, 
or any type of remote station. When the 
requesting station is a 2770,2780, or 2972, 
however, the operation differs somewhat. 
First, the test message is sent not as a 
separate message following the RFT message, 
but as a part of the RFT message itself. 
Second, the Y field of the RFT message can 
only be coded as one, since the RFT mes- 
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sage, including the message text, is sent 
only once. 



Another restriction applies when the 
station receiving the RFT message is a 2770 
or 2780. The job switch (2770) or mode 
switch (2780) must be set to permit the RFT 
message to be received at the printer, card 
punch, paper tape punch (2770) , or display 
(2770), unless the text contains component 
selection cheiracters. 



The requesting station may not be a 
remote 3270 display station. 

Type 01 

For this type of test, the requesting sta- 
tion sends an RFT message that includes 
user- specified text characters. The sta- 
tion receiving the RFT message acknowledges 
it, prepares a test message containing the 
text characters from the RFT message, and 
sends the test message the number of times 
specified in the Y-field of the RFT message 
— from 1 to 99. The station receiving the 
test messages (that is, the station that 
sent the test request) responds with an ac- 
knowledgment after each test message. 

For this type of test, the requesting 
station may be the central computer only if 
the remote station is a System/370. The 
requesting station may be any type of 
remote station. If the requesting station 
is a 2770 or 2780, its job switch (2770 or 
mode switch (2780)) roust be set to permit 
the test messages returned from the central 
computer to be received at the printer, 
card punch, paper tape punch (2770) , or 
display (2770), unless the text contains 
component selection characters. 

Note that in type 00 tests, the request- 
ing station also sends the test messages, 
and receives acknowledgments in reply, but 
in type 01 tests the requesting station 
receives test messages in reply. 

Types 02-34 

For these types of tests, the requesting 
station sends an RFT message. Unlike tests 
of types 00 and 01, the RFT message neither 
contains nor is followed by a test message. 
Instead, the X field of the RFT message 
indicates to the receiving station which of 
33 BTAM-defined standard test messages it 
is to return to the requesting station. 
When BTAM receives the RFT message, it 
examines the X and Y fields, selects the 
test message designated by X, and sends it 
Y times. The contents of test messages for 
each type of test are given below under 
"Formats of RFT, Test, and Console 
Messages." 



For this type of test, the requesting 
station may be the central computer only if 
the remote station is a System/370 using 
OS/VS BTAM. The requesting station may 
also be any type of remote station. If the 
requesting station is a 2770 or 2780, its 
job switch (2770) or mode switch (2780) 
must be set to permit the test messages 
sent from the central computer to be 
received at the printer, card punch, paper 
tape punch (2770), or display (2770), 
unless the text contains component selec- 
tion characters. 

Note : Set the 2780 'Online Test* switch to 
the on position. This will suppress the 
generation of an STX character preceding 
the RFT message. 



BTAM RESPONSES TO REQDEST-FOR-TEST MESSAGES 

BTAM recognizes and responds to any RFT 
messages received from a remote computer or 
terminal provided that: 

1. The online test facility is available 
(you have coded T among the EROPT 
options in the DCB macro for the line 
group) . 

2. The RFT message was received on a Read 
Initial (TI) operation. If the device 
to be tested is part of a remote 3270 
display system, the RFT message may 
have been received on a Read Continue 
(TT) operation or (for BSC2) on a Read 
Connect (TO operation. 

3. The length of the input area specified 
by the READ macro is at least 300 
bytes for test types 02-34. If buf- 
fering is used, the entire 300-byte 
area must be contained within one 
buffer. For test types 02-34, if the 
area is less than 300 bytes, BTAM 
returns an EOT instead of a test mes- 
sage. The EOT ends the test before 
any test messages are sent. For test 
types 00 and 01, no check is made to 
determine the length of the input 
area; instead the length specified in 
the READ macro is used. Ensure that 
the area is large enough to accommod- 
ate the text data in the RFT message 
or the test message that follows the 
RFT message. Otherwise lost data and 
timeout errors will result. 

4. The RFT message was received without 
error. 

The remote computer or terminal may send 
an RFT message only when the BTAM program 
has a Read Initial operation pending on the 
line over which the RFT message will be 
received, unless the device to be tested is 
part of a nonswitched remote 3270 display 
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system, which can send an RFT message on a 
Read Continue operation. If the remote 
3270 is a switched 3275, the RFT message 
can be received on a Read Initial, Read 
Continue, or Read Connect operation. When 
BTAM recognizes the message received by a 
Read Initial operation as an RFT message, 
the Read operation is not posted complete 
as it is for non-RFT messages. Instead, 
control is given to the online test logic, 
which examines the RFT message, generates 
the requested test message in the area 
specified in the READ macro, and sends the 
test message to the requesting computer or 
terminal (or othttr specified destination, 
for multipoint lines). If the RFT message 
specified a type 00 test, only a response 
is returned to the requesting computer or 
terminal, as explained previously. Follow- 
ing transmission of the test message the 
requested number of times, the Online test 
logic sends an EOT character for non- 
switched lines, or DLE EOT (and disables 
the line) for switched lines, then restarts 
the program at the Read Initial operation 
that received the RFT message. 

When an RFT message is received for a 
nonswitched remote 3270 display station on 
a Read Continue operation, BTAM gives con- 
trol to the online test logic, which 
generates and sends the test message and 
then posts the Read Continue operation com- 
plete and places an EOT in the input area 
specified in the read operation. 

When a RFT message is received for a 
switched remote 3275 display station on a 
Read Continue operation, the test message 
is transmitted the specified number of 
times and is followed by Write Reset. The 
response to the Write Reset is tested by 
BTAM with possible results as follows: 

• If the response is ENQ (the switched 
3275 has text data to send) , BTAM 
restores the Read Continue operation. 

• If the response is DLE EOT (a discon- 
nect signal) , BTAM sets up the Read 
Continue, does not issue it, puts DLE 
EOT in the user's buffer, and posts the 
operation complete with a X*7F*. 

• If there is no response (timeout — no 
more data to send), BTAM retries up to 
25 times. If there is still no 
response, BTAM sets up the Read Con- 
tinue but does not issue it, puts the 
sense and CSW status information in 
DECSENSO and DECCSWST fields of the 
DECB (to indicate timeout), turns on 
the "3275 Dial RFT Error" bit 
(DECERRST, bit 7), and posts the opera- 
tion complete with a x'Ul*. 

• If there is an error other than time- 
out, BTAM retries up to seven times. 



If the condition presists, the timeout 
actions described above are followed. 

Notes : 

1. Test mode will not be entered until 
the RFT message is received correctly 
and positively acknowledged and until 
the proper positive response (ACK-0) 
to selection or line bid is received. 
If a positive response to selection 
(ACK-0) is not received initially or 
after seven retries, the test will be 
terminated. 

2. Once test mode has been entered, if 
one or more WACK responses are 
received, the transmitting station 
will respond to each WACK with an ENQ, 
until the regular positive response is 
received. The number of WACKs that 
will be accepted is 25; if more than 
this number are received consecutive- 
ly, the online test is terminated. 

3. When a test message is requested for a 
remote 3284 or 3286 printer, the RFT 
message should specify that the test 
message be sent only once. This 
avoids wasting line time, since the 
test message appears only once on a 
remote 3270 printer even though 
attempts are made to send it more than 
once when the Y field of the RFT mes- 
sage is greater than one. 



BTAM INITIATION OF REQUEST-FOR-TEST 
MESSAGES 

As mentioned previously, you may initiate 
online tests by coding the ONLTST macro 
instruction in your program. ONLTST causes 
the online test logic to prepare an RFT 
message, send it, send or receive test mes- 
sages (depending on test type) , receive or 
send appropriate acknowledgments, and accu- 
mulate and display on the central computer 
console the results of the test. The 
ONLTST macro is described below. Message 
formats for each type of test are given 
under "Formats of RFT, Test, and Console 
messages ." 

ONLTST (Online Test) Macro Instruction 

The ONLTST macro instruction is used to 
send a request- for-test (RFT) message on a 
binary synchronous communication line. It 
provides the information necessary to build 
the RFT message, generates the linkage to 
the online test routine, and causes the RFT 
message to be sent. 

The Write operation executed by the 
ONLTST macro is similar to a Write Initial 
operation; the ONLTST macro must therefore 
be used in the same manner. That is, it 
may appear in your program only where a 
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Write Initial macro could appear. ONLTST 
may be issued only when the computer or 
terminal that is to receive the RFT message 
is capable of recognizing it as such and 
acting accordingly. For example, if the 
computer that is to receive the RFT message 
is operating under BTAM, ONLTST may be 
issued only when the corresponding opera- 
tion at the receiving computer is a Read 
Initial or Read Connect operation for which 
the input area length is at least 300 
bytes . 

Upon completion of an online test on a 
switched point-to-point line, BTAM breaks 
the line connection. 

After issuing an ONLTST macro, you must 
issue a WAIT or TWAIT macro (or otherwise 
test for completion of the online test) 
before starting any other Read or Write 
operation for the line. 

After execution of the ONLTST macro, 
control is returned to the next sequential 
instruction in the user program. 



Note : ONLTST cannot be issued to initiate 
a test between the central computer and an 
IBM 2715 or a nonswitched or switched 
remote IBM 3270. 



r t t T 

I Opera- 1 
| Name jtion (operands 

[ symbol ] | ONLTST | DECB=decb address , 
|X=type of test, 
|Y=no. of transmissions, 
| DCB=dcb address, 
|AREA=rft message area 
j[,TEXT=user text area, 
|LENGTH=user text length] 
J [ , ENTRY=list address] 
|t,RLN=line number] 
l x x J 



AREA 



DECB 



specifi€is the address of the data 
event control block for the line on 
which the online test is to be 
performed. 



specifies the address of the area from 
which the RFT message is to be sent. 
The online test routine formats the 
RFT message in this area and also 
reads into it the responding test mes- 
sages, for test types 01-19. For type 
00, BTAM moves the data comprising the 
test message into this area. For test 
type 00 or 01, this area must be large 
enough to receive the expected test 
message. For test types 02-22, this 
area must be at least 300 bytes long. 
If buffering is used, the entire area 
must be contained within one buffer. 

TEXT 

specifies the address of the user- 
defined test message where X (test 
type) equals or 1. For non- 
transparent text, you must begin and 
end the text with the appropriate 
framing characters (STX and ETX) ; for 
transparent text, you supply only DLE 
STX at the beginning of the text; BTAM 
provides the DLE ETX at the end of the 
message. Some amount of text data 
must be specified when the X operand 
is or 1. For other values of X, 
this operand is not required, and is 
ignored if coded. The contents of 
this area are not destroyed by ONLTS 
and may be used for successive tests 

LENGTH 

specifies the number of text charac- 
ters in the RFT message, where TEXT is 
specified. This operand must be coded 
if the TEXT operand is coded. 



ENTRY 



RLN 



specifies the address of the address- 
ing or ID list (OPENLST, DIALST, or 
BSCLST types) . The list must contain 
only one entry. A calling list, not 
an answering list, must be specified 
if the line is switched point-to- 
point. This operand is not used for 
online tests on point-to-point lines. 



specifies the relative line number of 
the line within the line group on 
which the test is to be performed. 



specifies the type of test to be per- 
formed. Permissible values of X and 
their meanings are tabulated below, 
under "Formats of RFT, Test, and Con- 
sole Messages." 



Notes ; 
1. No ONLTST macro may be issued for a 
line until a data event control block 
has been established for that line by 
means of a READ or WRITE macro in list 
or standard format. 



DCB 



specifies the number of times the test 
message is to be transmitted. Y may 
be from 1 to 99. 



specifies the address of the data con- 
trol block for the line group. 



2. In an online test between a System/370 
and a 2770, test messages sent to the 
2772 control unit cannot exceed a 
length of 128 bytes, unless the 2772 
has the Expanded Buffer feature, in 
which case the maximum length is 256 
bytes. 
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Return codes : After an ONLTST macro is 
issued, BTAM sets register 15 to zero if no 
error was detected. If an abnormal condi- 
tion is detected, the online test operation 
is not started, and control is returned to 
your program at the instruction following 
the ONLTST macro. A return code in regist- 
er 15 indicates the error. Bits through 
23 are zero; bits 24 through 31 contain one 
of the following error codes in hexadecimal 
notation. (Code OC is issued for the 
ONLTST macro itself; the other codes result 
from errors occurring when the online test 
routine executes a Write operation.) 

04 Busy. The specified line is busy with 
a previously requested Read or Write 
operation. 

08 Invalid RLN. The relative line number 
specified in ONLTST is zero or exceeds 
the number of lines in the line group. 

OC Invalid test type or transmission 

count. The value specified by the X 
operand is undefined, or the value 
specified by the Y operand exceeds 99. 

10 The skip bit of the addressing list 

entry specified by the ENTRY operand is 
on. 

14 A line error occurred during Open. 

18 Online test facility was not specified 
in the EROPT operand of the DCB macro. 

Note ; All nonzero return codes indicate 
that no I/O operation was initiated; there- 
fore the program must .not issue a WAIT or 
TWAIT macro for an ONLTST macro that 
resulted in a nonzero return code. 

Completion Codes : On completion of an on- 
line test operation, a completion code is 
set in the high-order byte of the event 
control block for the line being tested. 
The code, in hexadecimal notation, indi- 
cates the nature of the completion: 

7F Normal completion: Channel end and 
Device end. 

41 Operation completed with I/O error: 

The DECB for the line does not contain 
error indicators when this occurs. The 
operator at the computer executing BTAM 
receives a message indicating the 
nature of the error. It is suggested 
that the user program check the comple- 
tion code and if it is 41, issue a 
Write-to-operator-with-reply (WTOR) 
macro to permit the operator to deter- 
mine what further action should be per- 
formed (for example, retry the online 
test by reissuing the ONLTST macro, or 
indicate to the user program that no 
further Read or Write operations can be 



performed on that line) . In the latter 
case the operator can, after the error 
condition has been cleared, notify the 
program that I/O operations may be 
resumed. ) 



FORMATS OF RFT, TEST, AND CONSOLE MESSAGES 

Request- For-Test Messages 

An RFT message has one of three formats. 

For type 00 tests except for RFT messages 
from a 2770 or 2780: 



r T T T T T 1 

JSOH Xj X | Y j N | ADDR | STX ETX | 
L X X X. X X 1 

2 2 2 10-9 2 
Field length (bytes) 

For type 01 tests and for type 00 RFT mes- 
sages from a 2770 or 2780 and type 02-22 
tests requested from a station other than a 
remote 3270: 



|SOH %\ X | Y | N | ADDR | Text 



2 2 1 0-9 
Field length (bytes) 



variable 



For type 23-34 tests requested from a non- 
switched remote 3270: 



|SOH % | / | STX | X | Y | N | ADDR ]ETX| 
l X X X L X X X J 

2 112 214 1 

Field length (bytes) 

For type 23-34 tests requested from a 
switched 3275: 



r t r- r t t t 1 

JSOH %| / j STX | X | Y | N | ETX | 

2 112 2 11 



Field length (bytes) 



SOH % 



identifies the message as an RFT 
message. 

identifies the message as an RFT mes- 
sage from a remote 3270. 

specifies the test type (00-34) . X is 
a two- byte zoned decimal field. Tests 
23-28 are for switched and nonswitched 
3270 devices using EBCDIC transmission 
code; tests 2*#-34 are for switched and 
nonswitched 3270 devices using ASCII 
transmission code. 

specifies the number of tiroes (0-99) 
the test message is to be sent. Y is 
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a two-byte zoned decimal field. If X 
equals , and the remote station is a 
2770, 2780, or 2972, Y must equal 1, 
because these stations transmit only 
the RFT message, not separate test 
messages. If the test message is to 
be sent to a remote 3284 or 3286 
printer, Y should equal one, since the 
test message appears only once on a 
remote 3270 printer. 

specifies the length (0-9) of the ADDR 
field. Code N as and omit the ADDR 
field for tests over point-to-point 
lines, unless component selection 
characters are desired in the ADDR 
field. Always code II as for the 
switched 3275 display station; for the 
nonswitched multipoint 3270 configura- 
tion, code N as 4. 



ADDR 



contains the address of the station or 
device to which the test message is to 
be sent, or (for 2770) , component 
selection characters (DC1, DC2, or 
DC3) . For a multipoint configuration, 
the ADDR field contains the selection 
address of the unit to which the test 
message is to be sent. (For the 
remote 3270, for example, 61C1 would 
be entered as the hexadecimal form of 
the selection address for EBCDIC de- 
vice 1 on control unit 1. See Figures 
48 and 49 for other remote 3270 control 
unit and device addresses.) This need 
not be the same unit that sent the RFT 
message. For a point-to-point con- 
figuration, the ADDR field contains 
the required component selection 
sequence, for example, ESC x, where x 
indicates the component to be 
selected. This sequence is limited to 
two characters. The ADDR field is not 
present if M=0. 

is the data and framing characters to 
be sent when X (test type) equals 00 
or 01. For nontransparent text the 
data characters must be framed by STX 
or ETX. For transparent text the data 
characters must be framed by DLE STX 
and DLE ETX. 

Test Messages 

The contents of test messages are deter- 
mined by the X field (test type) of the RFT 
message that initiates transmission of the 
test message. The values of X, the con- 
tents of the corresponding test message, 
and the configurations for which the test 
types are valid, are as follows: 

X»00 For this test type, the test message 
is sent Y times , except for an RFT 
message from a 2770 or 2780, in 
which case the text is sent as part 
of the RFT message, not separately 



Text 



(RFT messages from a 2770 or 2780 
must specify a Y value of 1) . The 
RFT and test messages are acknowl- 
edged by DLE, ACK-1 if received 
without errors, by NAK if a data 
check is detected, and are not 
responded to at all if any other 
ending condition is detected. The 
RFT message and the following test 
messages (or included text data) can 
be received from any type of remote 
BSC station: System/370, System/3, 
1130, 1800, 2715, 2770, 2780, and 
2972. 

Note : If this test type is speci- 
fied, the size of the input area 
specified by the Read Initial opera- 
tion that receives the RFT message 
(by means of the DECB length para- 
meter) must be large enough to 
receive the entire RFT message, 
including the text portion. 

X»01 For this test type, the content of 

the test message is identical to the 
text portion of the RFT message, 
including the framing characters . 
The text is transmitted Y times. 
This message may be sent to any type 
of remote BSC station: System/370, 
System/3, 1130, 1800, 2715, 2770, 
2780, and 2972. 

For the remaining test types, the text of 
the test message is predefined by the on- 
line test routine. 

X*02 Transparent EBCDIC Message: 

DLE STX ...Text... DLE ETX 

The text consists*of all 256 EBCDIC 
codes in collating sequence order. 
This message may be sent to a 
System/370, System/3, 1130, 1800, 
2715, and 2770. 

X*03 Transparent USASCII Message: 

DLE STX ...Text... DLE ETX 

The text is in USASCII code (high- 
order bit always zero) , and consists 
of all 128 USASCII codes in collat- 
ing sequence order. This message 
may be sent only to a System/370. 

X=0 4 Normal EBCDIC Message: 

STX SYN SYN ...Text... ETX 

The text is in EBCDIC code, and con- 
sists of the 2 45 non-data link con- 
trol characters. The characters 
excluded are SOH, STX, ETX, ETB, 
EOT, ENQ, ACK, NAK, SYN, US, DLE. 
This message may be sent to a 
System/370, System/3, 1800, and 
2770. (The text includes several 
terminal control characters, such as 
CR, HT, VT, and FF, that, when sent 
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to an output device, cause the asso- 
ciated function to occur, if the 
device is capable of performing that 
function. For example, the HT or FF 
character in text sent to a termi- 
nal printer will cause the printer 
to execute the horizontal tab and 
forms feed operations, if the print- 
er is so equipped.) 

X=05 Normal USASCII Message: 

STX SYN SYN ...Text... ETX 

The text is in USASCII code and con- 
sists of tihe 117 non-data link con- 
trol characters. The excluded 
characters are the same as for X=04. 
This message may be to a System/370, 
System/3, 1800, 2770, and 2780. 
(The text includes several terminal 
control characters, such as CR, HT, 
VT, and FF, that, when sent to an 
output device, cause the associated 
function to occur, if the device is 
capable of performing that function. 
For example, the HT or FF characters 
in text sent to a terminal printer 
will cause the printer to execute 
the horizontal tab and forms feed 
operations, if the printer is so 
equipped.) 



X=06 Alphameric USASCII Message: 

STX SYN SYN ABCDEFGHIJK 
LMNOPQRSTUVWXYZ012 
3 4 5 6 7 8 9 ETX 

This message may be sent to a 
System/370, System/3, 1800, 2770, 
and 2780. 

X=07 USASCII Printer Message: 

STX ESC QABCDEFGHIJKLM 
NOPQRSTUVWXYZ012 3H 
5 6 7 8 9 ETX 

This message is used to test the IBM 
2780 printer. It may also be sent to 
a System/370, 1800, and 297 2; these 
stations treat the ESC Q sequence 
(printer selection code) as data. 

X=08 USASCII Punch Message: 

STX ESC 4ABCDEFGHIJKLM 
NOPQRSTUVWXYZ01234 
5 6 7 8 9 ETX 

This message is used to test the IBM 
2780 card punch. It may also be 
sent to a System/370, 1800, and 
2972; these stations treat the ESC 4 
sequence (punch selection code) as 
data. 



X«09 Transcode Printer Message: 



STX ESC /ABCDEFGHIJKLM 
NOPQRSTUVWXYZ01234 
5 6 7 8 9 ETX 

This message is coded in Transcode 
and is used to test the IBM 2780 
printer. It is valid only for a 
2780 on a switched line or a non- 
switched multipoint line. 

X=10 Transcode Punch Message: 

STX ESC 4ABCDEFGHIJKLM 
NOPQRSTUVWXYZ0123U 
5 6 7 8 9 ETX 

This message is coded in Transcode 
and is used to test the IBM 2780 
card punch. It is valid only for a 
2780 on a switched line or a non- 
switched multipoint line. 

X=ll Transcode Message: 

STX SYN SYN ABCDEFGHIJKL 
MNOPQRSTUVWXYZ0123 
4 5 6 7 8 9 ETX 

This message is coded in Transcode 
and may be used to test either the 
card punch or the printer of an IBM 
2780. It is valid only for a 2780, 
on any type of line configuration. 

X=12 EBCDIC Printer Message: 

This message has the same content as 
the Transcode printer message, X»09, 
except coded in EBCDIC. This mes- 
sage is used to test the IBM 2780 
printer. It may also be sent to a 
System/370, 1130, 1800, and 2972; 
these stations treat the ESC / 
sequence (printer selection code) as 
data. 

X«13 EBCDIC Punch Message: 

This message has the same content as 
the Transcode punch message, X-10, 
except coded in EBCDIC. This mes- 
sage is used to test the IBM 2780 
card punch. It may also be sent to 
a System/370, 1130, 1800, and 2972; 
these stations treat the ESC 4 
sequence (punch selection code) as 
data. 

X»l<* EBCDIC Alphameric Message: 

This message has the same content as 
the Transcode message, X=ll, except 
coded in EBCDIC. This message may 
be used to test either the card 
punch or the printer of an IBM 2780. 
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It may also be sent to a System/370, 
Systero/3, 1130, 1800, and 2770. 



X^15 EBCDIC Weak Pattern Message 

STX SYN SYN ...text... ETX 

The text consists of 71 NUL (X*00 f ) 
characters, followed by six SYN 
(X'32*) characters. This message 
may be sent to a System/370, System/ 
3, 1130, 1800, 2770, and 2780. 

(This test type is intended for use 
by the IBM Customer Engineer to test 
for proper functioning of the data 
set clock (for switched lines) or 
business machine clock (for switched 
or nonswitched lines) . ) 

X«16 EBCDIC Weak Pattern Message 

STX SYN SYN ...text... ETX 

The text consists of 40 bytes of 
X'AA', followed by 40 bytes of 
X*55*. This message may be sent to 
a System/370, System/3, 1130, 1800, 
2770, and 2780. 

(This test type is intended for use 
by the IBM Customer Engineer to test 
for proper functioning of the data 
set clock (for nonswitched lines).) 

X=17 Trans code Weak Pattern Message 

STX SYN SYN ...text... ETX 

The text consists of 80 SOH (X'OO*) 
characters. This message may be 
sent only to a 2780. This test type 
is intended for use by the IBM Cus- 
tomer Engineer to test for proper 
functioning of the data set clock 
(for switched lines) or business 
machine clock (for nonswitched 
lines) . 

X=18 Transcode Weak Pattern Message 

STX SYN SYN ...text... ETX 

The text consists of 40 N's (X'lS'), 
followed by 40 ESC (X^A*) charac- 
ters. This message may be sent only 
to a 2780. 

(This test type is intended for use 
by the IBM Customer Engineer to test 
for proper functioning of the data 
set clock (for nonswitched lines).) 

X«19 EBCDIC Weak Pattern Message (DLE SYN 
Insertion ) 

DLE STX ...text... DLE ETX 



The text consists of 280 NUL (X'OO*) 
characters, followed by 10 SYN 
(X*32 ( ) characters. This message 
may be sent to a S/370, System/3, 
1130, 1800, and 2715. 



X=20 Transparent EBCDIC Message 

DLE STX ...text... DLE ETX 

The text consists of the characters 
U through Z, through 9, and X'OO* 
through X^F* (a total of 80 charac- 
ters) . This message may be sent to 
a S/370, 1800, 2770, and 2780. 

X=21 Transparent EBCDIC Message 

DLE STX ...text... DLE ETX 

The text consists of the characters 
A through Z, through 9, and X'00* 
through X'53 1 (a total of 120 chara- 
cters) . This message may be sent to 
a S/370, 1800, 2770 and 2780. 

X=22 Transparent EBCDIC Message 

DLE STX ...text... DLE ETX 

The text consists of the characters 
A through Z, through 9, and X f 00* 
through X^B* (a total of 144 chara- 
cters). This message may be sent to 
a S/370, 1800, 2770, and 2780. 

The two SYN characters following the STX 
in nontransparent test messages are present 
to allow space for a component selection 
address, if required in a point-to-point 
configuration. If a component selection 
address is not required in the message, the 
SYNs are transmitted, but are deleted ty 
the receiving station. 

X=23 3270 Basic Test Message (EBCDIC) 

This test message checks all 
alphameric characters at a display 
station or printer. It checks the 
sue of the WCC to sound the audible 
alarm and allows attribute field 
specification to be checked at a 
display station. It starts a 
printer, printing 40 characters to 
a line. 

X~24 3270 Model 1 Align Test Pattern 
(EBCDIC ) 

This test pattern checks position 
alignment for the 480-character 
display station. It also checks 
the WCC for sounding the audible 
alarm. It starts a printer, print- 
ing 40 characters to a line. 
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X=25 3270 Model 2 Align Test Pattern 
(EBCDIC) 

This test: pattern checks position 
alignment for the 1920-character 
display station. It also checks 
the WCC for sounding the audible 
alarm. It starts a printer, print- 
ing 80 characters to a line. 

X=26 3270 Orders Test Message (EBCDIC ) 

This test: message checks 3270 
orders (for example, SF and SBA) , 
checks the WCC for sounding the 
audible alarm, and uses high and 
normal intensities. It starts a 
printer, printing 64 characters to 
a line. 

X=27 3270 Universal Character Set Test 
Pattern (EBCDIC) 

This test pattern, which is mainly 
intended for the printer, checks 
several solid lines of alphameric 
print cortaing the universal char- 
acter set. It checks the WCC for 
starting the printer and prints 132 
characters to a line (honoring NL 
and EOM orders). (If issued to a 
display station, it checks the WCC 
for sounding the audible alarm.) 

X=28 3270 NL/EOM Test Pattern (EBCDIC) 

This test pattern, which is mainly 
intended for the printer, checks 
the end of message (EOM) order and 
multiple new-line (NL) orders. It 
checks the WCC for starting the 
printer and prints 132 characters 
to a line. (If issued to a display 
station, it checks the WCC for 
sounding the audible alarm.) 

X=29-34 3270 Test Messages and Patterns 
(ASCII) 

These tesc messages and patterns 
correspond to types 23-28. ASCII 
transmission code is used instead 
of EBCDIC. 

Figure 100 shows the types of online 
tests that can be used for each type of 
remote station, except 3270 display sta- 
tions and printers. 

Figure 102 shows the types of online 
tests that can be used for each remote 3270 
display station or printer. Information 
pertaining to the 3275 applies both to the 
nonswitched 3275 and to the switched 3275 
(equipped with the dial feature) . 

Console Messages 

The online test feicility prints on the con- 
sole typewriter of the central computer the 



results of an online test. Messages are in 
one of two formats: For messages reporting 
the results of BTAM- transmitted test mes- 
sages, or of a BTAM- transmitted RFT message 
specifying a test type (X field) of 00: 



JIEC807I cuu ONLINE TEST xx yy tt nn | 
| ii...ii | 

i i 

For messages reporting the results of test 
messages received by BTAM from a remote 
computer or terminal: 

r *~ 1 

|IEC808I cuu ONLINE TEST xx yy tt 11 dd j 

The meanings of the message fields are: 



cuu 



XX 



yy 



tt 



nn 



li 



11 



dd 



indicates the address of the line 
(channel and unit) 

indicates the test type (X field of 
the RFT message) . 

indicates the number of transmissions. 
For IEC807I messages, this value is 
obtained from the N field of the RFT 
message. For IEC808I messages, this 
value is accumulated by the online 
test routine as each test message is 
received by BTAM. 

indicates the number of occurrences of 
timeout errors. 

is the number of NAK responses to 
BTAM-transmitted test messages. 

is the terminal identification 
sequence. This is printed for tests 
on multipoint lines. 

indicates the number of occurrences of 
lost-data errors. 

indicates the number of occurrences of 
data check errors. 



ONLINE TESTING FOR LOCAL 3270 DISPLAY 
SYSTEM 

Online tests for local 3270 devices are 
requested from local display stations. 
Figure 103 summarizes the options. There 
are six types of tests, not all of which 
apply to all devices. 

Online testing between a System/370 com- 
puter and a local 3270 device requires that 
BTAM or an online diagnostic program be 
running in the computer. Only the local 
3270 display system can initiate an online 
test. Tests are requested by sending a 
request-for-test (RFT) message to the com- 
puter. For a local 3270, (1) the cursor is 
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positioned at the top left of an unfor- 
matted screen (by pressing the CLEAR key 
and then the RESET key, for example) , (2) 
the text of the RFT message (test type, 
number of times, length of address, channel 
and unit address) is entered by means of 
the keyboard, and (3) the TEST REQUEST key 
is pressed to precede the text with control 
characters (SOH % / STX) . 



TYPES OF TESTS 

Types 23-28 

The local 3270 display station sends an RFT 
message, which neither contains nor is fol- 
lowed by a test message. The X field of 
the RFT message indicates which of six 
DTAM-defined standard test messages it is 
to return to a local 3270 device. The Y 
field indicates how many times the test 
message is to be sent. The ADDR field 
indicates which local 3270 device is to 
receive the test message. The device 
receiving the test message must be asso- 
ciated with the same DCB as the device 
sending the RFT message. The contents of 
test messages are given below. 



APPLICATION RESPONSE TO RFT MESSAGES 

The application program must be prepared to 
handle an RFr message. When a read intial 
operation puts the control characters SOH%/ 
(X'016C61M in the application program's 
input area, the program should first get 
the relative line number (RLN) of the 3270 
device whose TEST REQUEST key was pressed 
(this RLN is contained in byte 3 of the 
DECPOLPT field of the DECB) . It should then 
either: 



BTAM RESPONSE TO RFT MESSAGES 

BTAM recognizes and responds to any RFT 
message received from a local 3270 display 
station provided that : 

1. The online test facility is available 

(that is, T was specified among the 
EROPT options of the DCB macro 
instruction for the group of local 
3270 devices) . 

2. The RFT message was received on a read 
initial operation (that is, a READ TI 
macro instruction was issued) . 

3. The input area is at least 300 bytes 
long (that is, the inlength operand of 
the READ macro instruction was at 
least 300) . If buffering is used, the 
entire 300-byte area must be contained 
within one buffer. 

4. The RFT message was received without 
error. 

When BTAM recognizes an RFT message, 
control is given to the online test logic, 
which examines the message, generates the 
requested test message in the input area 
for the read operation, and sends the test 
message the requested number of times. If 
the test message was sent to the same 
device from which the RFT message was 
received, the read initial operation is 
restarted. If the test message was sent to 
a different device, the next I/O operation 
to the receiving station is posted complete 
with a completion code of X'44', indicating 
that the buffer contents are unpredictable. 
Device buffers are reset to default size 
by online test logic. 



• Issue another Read Initial to the line 
group that includes the 3270 device; or 

• Issue a Write Initial instruction for a 
length of 1 byte to write the control 
character that unlocks the keyboard. 
(This operation ensures that the con- 
tents of the display screen are not 
changed. ) 

The application program should not issue an 
Erase Write instruction. 

When it receives an RFT message, the 
application program also should check to see 
if the message is valid or invalid. If the 
message is valid, the residual count in the 
DECB indicates that 3 bytes of data were 
read. If the message is invalid, the resi- 
dual count indicates that more than 3 bytes 
were read. 



FORMATS OF RFT, TEST, AND CONSOLE MESSAGES 

Request- for-Test Message 

An RFT message from a local 3270 display 
station has the format: 















1 


SOH % 


1 / 1 STX 


1 X 1 Y 1 N 1 


ADDR 


1 















2 11 2 2 1 
Field length (bytes) 

SOH % 

identifies the message as an RFT 
message. 



/ 



identifies the message as an RFT mes- 
sage from a local 3270. 

specifies the test type (23-28) . X is 
a two-byte zoned decimal field. 
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ADDR 



specifies tht; number of times (1-99) 
the test message is to be sent. Y is 
a two-byte zoned decimal field. 

specifies the length (3) of the ADDR 
field. 

contains three characters (0-9, A-F) 
that indicate the channel and unit 
address of the device that is to 
receive the test message. 

Test Messages 

The contents of test messages are deter- 
mined by the X (test type) field of the RFT 
message that initiates the sending of the 
test message. 

X=23-28 3270 Test Messages and Patterns 
EBCDIC 

These test messages and patterns 
correspond to types 23-28 for 
remote 3270 display stations and 
printers. See the descriptions of 
test messages 23-28 above under 
"Online Testing for Binary Synch- 
ronous Communications Lines." 

Figure 103 shows the types of online 
tests that can be used for each local 3270 
display station or printer. 

Console Messages 

See the description of console messages 
above under "Online Testing for Binary Syn- 
chronous Communications Lines." 
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X's indicate the test type available for each remote 3270 device. 


2 

Test Type* 


Content of Test 
Message 


Display 


Printer* 


Buffer 
480 


Buffer 
1920 


Buffer 
480 


Buffer 
1920 


23/29 
24/30 

25/31 
26/32 
27/33 
28/34 


3270 Basic 
3270 Align 

3270 Align 

3270 Orders 

3270 Universal 
Character Set 

3270 NL/EOM Printer 


X 
X 

X 


X 

X 
X 


X 
X 

X 
X 
X 


X 

X 
X 
X 
X 



1 For the 3284 model 3 attached to a 3275 only tests 27, 28 , 33 
and- 34 are applicable 

2 
Tests 23-28 are EBCDIC and 29-34 are the ASCII transmission 

code equivalents 

Note: For devices with alternate buffer sizes, the default size 
is used for the tests. 

Figure 102. Summary of BSC Online Test Options for Remote 3270 Devices 



X's indicate the test types available for eaqh local 
3270 device. 


Test 
Type 


Content of 
Test Message 


Local CU 


Display 


Printer 


Buffer 
.480 


Buffer 
1920 


Buffer 
480 


Buffer 
1920 


23 
24 

25 

26 
27 
28 


3270 Basic 
3270 Align 

3270 Align 

3270 Orders 

3270 Universal 
Character Set 

3270 NL/EOM 


X 
X 

X 


X 

X 
X 


X 
X 

X 
X 
X 


X 

X 
X 
X 
X 



Note: For devices with alternate buffer sizes, the default size 
is used for the tests. 

Figure 103. Surcrcary of Online Test Options 
for Local 3270 Devices 
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APPENDIX A: FORMAT OF TERMINAL LISTS 



This appendix illustrates each of the various kinds of terminal lists 
given under "Defining and Modifying Terminal Lists," elsewhere in this 
manual. 

Each terminal list consists of one or more entries, each representing 
a remote station or a specific component of a remote station. Terminal 
lists vary in format; the illustrations in this appendix show how each 
type is organized. 



Note : Terminal lists are not used for the local 3270 display system. 

In lists of the OPENLST and WRAPLST type, each entry contains a con- 
trol byte, illustrated in Figure 103. The bits in this control byte 
have the following meaning: 



Bit 
Position 



1 



2 
3-7 



Meaning 

If on, indicates that the entry is the last in the list. 
If on, indicates that the entry is to be skipped when polling 
or addressing. If off, indicates an active entry. This bit 
is turned on and off with the CHGNTRY macro. 
If on, indicates that the list is a wraparound list. 
List entry number. Each entry is numbered successively start- 
ing with 1. This field limits to 31 the number of terminal or 
component entries for a list created by the DFTRMLST macro. 
This field is not presently used by BTAM, but is reserved for 
later use. Large lists can be created by coding a series of 
DFTRMLST macro instructions of the OPENLST type. If a wrap- 
around list is desired, code a series of DFTRMLST macros of 
the OPENLST type, and follow the last in the series by the 
instruction DC HL2*-n* , where n is the number of bytes occu- 
pied by the terminal list entries. 



Note : In the examples the polling and addressing characters 
and the identification seguences are shown as alphabetic and 
numeric characters, but you must code them in the DFTRMLST 
macro as the hexadecimal representation of the appropriate 
transmission code bit patterns. 



End -of- List Flag (E) 
Skip Flog (S) 
Format Flag (F) 

List Entry Number 



t r 



1 2 3 4 5 6 7 



Figure 103. Format of Control Byte for OPENLST and WRAPLST Entries 
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OPENIiST Format 

Each entry in an open list (polling or addressing) consists of a one 
(1030) or two (all others) byte field for the polling or addressing 
characters plus the control byte. Examples for 1050 and 1030 are shown 

in Figure 105. 

WRAPLST Format 

Wraparound polling lists differ from open lists in two ways: 

1. Format bit (bit 2 in control byte) is on in the last entry. 

2. A two-byte field follows the last entry and contains a negative 
binary value used by the polling restart routine to find the start 
of the list. 

An example is shown in Figure 106. 

DIALST Format 

Terminal lists for stations on switched lines are illustrated in Figure 

107. 



Format 



Control Byte 



Polling Characters 
(in Transmission Code) 


E 


S 


F 


Entry No. 



_>"^_ 



1 Byte (1030) 
2 Bytes (1050, 1060, 83B3, 115A) 



y 

1 Byte 



Example , 
IBM 1050 * 



A 5 























1 


A 6 





1 














1 





B 


5 




















1 


1 


B 


6 

















1 








C 


5 





1 











1 





1 


E 





1 














1 


1 






Example 
IBM 1030 



D 00000001 
E 00000010 
F 10 11 



Figure 105. Open Polling or Addressing List (OPENLST) 
Examples 



Format and 
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Control byte 



Format 



Polling Characters 
(in Transmission Code) 


E 


S 


F 


Entry No. 


Negative Offset 



V v A ^_ 

1 Byte (1030) 1 Byte 

2 Bytes (1050, 1060, 83B3, 115A) 



_A_ 



Example 
(IBM 1050) 



v 

2 Bytes 
(following last entry) 



B 


5 























1 




C 


5 




















1 







c 


6 




















1 


1 




D 


5 

















1 










D 


6 








1 








1 





1 


- 15 



Figure 106. Wraparound Polling List (WRAPLST) : Format and Example 

Control Byte 

























r "*> 


Format 


Number of 
Dial Digits 


Dial Digits 


Polling or Addressing 

Characters 

(in Transmission Code) 


E 


S 


F 


Entry No. 




i J 


*.">.. X ; 


Y 

1 Byte 


V 

* 


2 Bytes 


1 Byte 


Example: 
Calling - 
Polling List 


7 


4 


9 


7 


7 


2 


5 


6 


B 


6 























1 








B 


6 


1 

















1 















Example: 
Answering - 
Polling List 







B 


6 























1 








B 


7 


1 

















1 















Example: 
Calling - 
Addressing 
List 


7 


4 


9 


7 


7 


2 


5 


6 


B 


1 


1 




















1 














Example: 
Answering - 
Addressing 
List 







B 


9 


1 




















1 



* Length in bytes equals number of dial digits 

Figure 107. Dial List (DIALST) : Format and Examples 
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Format 



Number of 
Diol D gits 



— V 

1 Bye 



Dial Digits 



_^V_ 



Number of I.D/ 
Characters 



(Blank) 



Terminal I.D. 

Characters 

(in Transmission Code) 



J^. 



1 Byte 



1 Byte 



Example: 
Addressing List 






10 


Null CR LF DEL NYC CR LF XON 





H 1 




Hf— i 




10 


3032881234 
if 


10 


-tf— 


Null CR LF DEL C G O CR LF XON 



Example: 
Calling List 



* Length in bytes equals number of dial digits 
** Length in bytes equals number of terminal I.D. characters 

Figure 108. Identification List (IDLST): Format and Example 
IDLST Format 

Terminal lists for TWX terminals (Models 33 or 35) are illustrated in 

Figure 108. 

SSALST and SSAWLST. AUTOLST and AUTOWLST Format 

Terminal lists for all stations for which Autopoll is employed are illu- 
strated in Figure 109. 



TE 



AE 



the total number of entries in list (1-253)* 



the total number of active entries in list (0-253)* 



NNN 



entry width Pi+Ii (2-9) 



wraparound flag (on for SSAWLST and AUTOWLST, off for SSALST and 
AUTOLST) 




1 byte 1 byte I byte 1 to 8 bytes 1 byte 

+(NNN)(TE-1) +(NNN)(TE) 

— ss— 



TE- 1 



:3 V- 



TE-1 



X'FE' 



Offset = * - Symbol +3 



1 to 8 bytes 1 byte 1 byte 



Y — 

2 bytes 



Figure 109. Open and Wraparound Autopoll Lists for Start-Stop (SSALST, 
SSAWLST) and BSC (AUTOLST, AUTOWLST) : Format 
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uc 



Pi 



usage count (0-15) . The usage count indicates the total number of 
polling operations using the terminal list at any one time. 

polling characters (1 or 2 bytes). The value X'FE* must not be 
used as a polling character. 



Ii 



index (1-253)* 



X f FE' 



scan stop byte used to find end of list. 



OFFSET 

two-byte field used to find heading of list from end of list. 

* 

TE, AE, and Ii can be as high as 253, but at the time of publica- 
tion, the assembler imposes additional restrictions. 

BSCLST Format 

Terminal lists for BSC communication over a switched line with ID veri- 
fication are illustrated in Figure 110. 

WTTALST Format 

Terminal lists for World Trade telegraph terminals are illustrated in 
Figure 111. 

SWLST Format 

The format and contents of the header and entries of a calling and an- 
swering list of the SWLST form is as follows (see Figure 112) . 



Field 
(HEADER) 
Pointer to 
Sequence Matching 
Received Sequence: 



Contents 



Address (right-adjusted) of the last authorized 
ID sequence that was received prior to completion 
of the READ Connect or WRITE Connect operation. 
(Byte contains X*FF i to indicate that the list 
is of the SWLST form.) 



Number of 
List Entries : 



Number (binary) of entries in the list (that is, 
the number of different authorized ID sequences 
that will be honored) . 



Entry Length; 



Number of bytes (binary) in each entry in the 
list. This number is specified by the entry- 
length operand of the DFTRMLST macro, and should 
equal the number of bytes required to accommodate 
the longest expected ID sequence, plus the user- 
data field (0 or 4), plus one (for the control 
byte) . 



Read- In Area 
Length: 



Number (binary) of characters in the longest 
expected ID sequence. This number will have a 
minimum value of 2, to accommodate a two- 
character sequence such as DLE EOT. 
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Format 



Example: 
Calling List 



Example: 
Answer List 




1 Byte 



5495777 



12 



1 Byte 



XYZ CORP CGO ACK-0 



1 Byte 



12 



XYZ CORP NYHQENQ 



12 



4V- 



-tv- 



XYZ CORP NYHQENQ 



12 



XYZ CORP CGO ACK-0 



* Length in bytes equals lumber of dial digits. 
** Length in bytes equals lumber of terminal ID characters. 
*** Length in bytes equals number of characters to be transmitted. 



The control characters are coded in their 
hexadecimal equivalents shown below: 

ENQ - X'2D' 
ACK-0 - XM070' 



Figure 110. BSC Dial List (BSCLST) with ID Verification: Format and 
Examples 



Format 



V_ 



1 byte 



Number 
of ID 
characters 



JK. 



— Y~ 
1 byte 



JK_ 



i<r 



(blank) 



-4V- 



"V" 



JK. 



Terminal ID 
characters 

— s\— 



Number of 
characters 
to be 
transmitted 



"V 



JK. 



~v — 

1 byte 



JV. 



-tv- 



Characters 
to be 
transmitted 

— \s — 



** 



Example A. 



11 



b 

1S- 



TELETYPE**! 



10 



COMPUTER-62 






10 


COMPUTER-63 



Example B. 



♦length in bytes equals the number of terminal ID characters to be 
received. 
** length in bytes equals the number of computer ID characters to be 
transmitted. 

If the transmission code used with the WT terminals is the International 
Telegraph Alphabet Number 2, these terminal lists would be defined by 
coding: 

Example A : 

DFTRMLST WTTALST, 0, 11, 0110091001150D1004043D, 10, 0E03070D1C0110OA0H39 

Example B : 

DFTRMLST WTTALST, 0, 0, 0,10, 0E03070D1C01100A0430 

Figure 111. WT Terminal List (WTTALST): Format and Examples 
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General Format of List: 



Header 



Entry 1 



Entry 2 



■4V- 



-h<r 



Entry n 



Header of Auto-Dial Calling List: 



Pointer to 
Sequence 
Matching 
Received Sequence 



Number 
of 
List 
Entries 



Entry 
Length 



Read-in 

Area 

Length 



Dial 
Count 



Length 
in bytes: 



Header of Manual -Dial Calling List or Answering List: 



Pointer to 
Sequence 
Matching 
Received Sequence 



Number 
of 
List 
Entries 



Entry 
Length 



Read-In 

Area 

Length 



Length 
in bytes: 



Entry including User Area: 



•hS- 



Authorized Sequence 



User Area 



Control 
Byte 



Length 

in 

bytes: 

Entry omitting User Area: 

I E 



=Read-ln 

Area 

Length 



Length 

in 

bytes: 



Authorized Sequence 



Control 
Byte 



=Read-ln 

Area 

Length 



4V- 



Read-In Area 



-4V- 



=Read-ln 
Area Length 



■IV- 



Read- In Area 



4\- 



=Read-ln 
Area Length 



■4V- 



Dial Digits 



-tv- 



=Dial Count 



ID 
Count 



ID 
Sent 



=ID 
Count 



Figure 112. Calling and Answering Lists for Expanded ID Verification 
(SWLST) : Format 



ID 

Count 



ID 
Sent 



=ID 
Count 



Dial Count: 



Read- In Area: 



Dial Digits: 



Id Count: 



For an automatic dialing list: number (binary) 
of dial digits to be used in calling the remote 
station. For a manual dialing list or an answer- 
ing list: 0. 

Area into which the ID response is read from the 
remote station. The length of this field is 
determined by the longest possible sequence that 
can be received* but no less than two bytes. 

The dial digits (binary), for an automatic dial 
calling list. For an answering list or a manual - 
dial calling list, this field is omitted. 

Number of characters (binary) in the sequence 
defined in the ID sent field. 
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Id Sent 



For a calling list, this field contains the 
characters of the ID-ENQ sequence to be sent to 
the remote station. For an answering list, this 
field contains the ID ACK-0 sequence to be sent 
to the remote station when the control byte value 
of the entry containing the received ID ENQ 
sequence is 0. It is recommended that the first 
two characters of each ID sequence be identical, 
to provide greater identification reliability. 



(ENTRY) 
Authorized 
Sequence : 



The characters composing an authorized sequence 
that can be received. The size of this field is 
usually the length of the Read-In Area. Since 
this length is never less than two, the size of 
this field is less than the size of the Read-In 
Area when an answering list is defined with only 
one entry, containing the single ENQ character. 
Authorized sequences can be of different lengths; 
each sequence is left-adjusted in the Authorized 
Sequence field. 



User Area 
(optional) 



May contain a user-specified relocatable expres- 
sion for each list entry. This four-byte field 
is included in each entry if you specify the 
userlength operand of the DFTRMLST macro as 4; 
otherwise, the field is omitted. 



Control Byte: 



A value, specified in the controlvalue operand of 
the DFTRMLST macro, indicating the action BTAM is 
to perform when an authorized ID sequence is 
received. The value may be 0, 1, or 2. (See 
description of the DFTRMLST macro for the signi- 
ficance of these values.) 
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APPENDIX B; DATA EVENT CONTROL BLOCK 



The format of the data event control block (DECB) is shown in Figure 
113. its contents are described below. 

DECSDECB 

standard four-byte ECB. Only the first byte of this field is of 
concern to the BTAM programmer. This byte can contain the follow- 
ing hexadecimal completion codes: 

Hex 
Value Meaning 
00 After READ OR WRITE macro instruction issued, before WAIT. 

80 WAIT macro instruction issued; event not complete. 

Note ; As long as the wait tit is on, the contents of some 
DECB fields are unpredictable (the fields are used internally 
by BTAM) ; the contents of the DECB should therefore be con- 
sidered meaningful only after the Read or Write operation has 
been completed (that is, the completion bit is on). 

7F Normal completion: The Read or Write operation has ended 
with indications of Channel End-Device End and either Unit 
Exception or Incorrect Length, or both, if they are normal 
conditions (for example, Unit Exception indicating end-of- 
transmission or negative response to polling) . The user pro- 
gram should .examine the bits in DECFLAGS to determine the 
status of the operation. 

41 Complete with I/O error; the prograir should examine the bits 
in DECERRST to determine the kind of error. 

44 The I/O request was rejected, because (1) a device error was 
detected after the last I/O operation on the device was post- 
ed complete or (2) a request-for-test message was received 
from a local 3270 display station requesting that a test mes- 
sage be sent to another local 3270 device. The buffer con- 
tents are unpredictable. 

48 Enable Command Halted or I/O Operation Purged: Indicates one 
of the following: 

• An Enable command (automatic answering function for a 
switched line) was terminated by Halt I/O as a result of a 
RESETPL macro instruction (second operand omitted or speci- 
fied as ANSRING). 

• An Enable command was terminated as a result of closing 
(CLOSE macro instruction) a line group with Enable commands 
outstanding. 

• An I/O operation was purged at channel End interrupt time 
as a result of closing the line group while I/O operations 
were still in progress. 

• A Read Initial operation for World Trade telegraph has 
ended with a Halt I/O command because a RESETPL macro 
instruction was issued (second operand omitted). 
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• A Read Initial operation for the local 32 70 display system 
was canceled, because a RESETPL macro instruction was 
issued. This may be caused by a device becoming ready if 
READYQ=0 was specified in the DCB. 

DECTYPE Operation type: 

first byte: (In any combination) 

bit - current operation is a Read operation using Autopoll 

bit 1 - RJE (Remote Job Entry) requested WTO timeout message suppression 

bits 2-3 - (reserved) 

bit 4 - write inquiry operation 

bit 5 - 'entry' coded as 'S' 

bit 6 - 'area' coded as 'S' 

bit 7 - 'length' coded as 'S' 

second byte : 

bit of this second byte specifies Reset for Read Initial and Reset 
(TIR) , Write Initial and Reset (TIR) , Read Continue and Reset (TTR) , 
Write Continue and Reset (TTR) , Read Conversational and Reset (TVR) , 
Write Conversational and Reset (TVR) , Read Repeat and Reset (TPR) , 
Write at Line Address and Reset (TLR) , and Write Erase and Reset 
(TSR) . 

bits 1 and 2 are reserved, 
bits 3, 4, 5, 6, and 7 

Hex 

Value Operation 

00 Write Break (TB) 

01 Read Initial (TI) 

02 Write Initial CTI) 

03 Read Continue (TT) 

04 Write Continue (TT) 

05 Read Conversational (TV) 

06 Write Conversational (TV) 
Write Erase Alternate (TSA) 

07 Read Repeat (TP) , or Read Continue with Identification 
Exchange (TE) (WT terminal) 

08 Write Positive Acknowledgment (TA) 

09 Read Skip (TS) 

Read Inquiry Monitor (TQM) 

0/ Write Negative Acknowledgment (TN), Write Reset (TR) , Write 
Disconnect (TN) (TWX) 

0B Read Buffer (TB) 

Write Reset Monitor (TRM) 

0C Write at Line Address (TL) , Write Initial Optical (TIO) , 
Write Initial Transparent Block (TIE) 

0D Write Initial Conversational (TIV) , Read Continue with Lead- 
ing Acknowledgment (TTA) 

0E Write Erase (TS), Write Invitational Optical (TCO) # 
Write Continue Transparent Block (TTE) 

OF Write Continue Conversational (TTV) 

10 Write Disconnect (TD) (BSC) 

11 Read Connect (TO , Read Modified (TM) 

12 Write Initial Transparent (TIX) , Write Conversational Optical 
(TVO) , Write Unprotected Erase (TUS) 

13 Read Continue with Leading Graphics (TTL) , Read Buffer from 
Position (TBP) 

14 Write Continue Transparent (TTX) 

15 Read Inquiry (TQ) 

16 Write Inquiry (TQ) 

17 Read Repeat with Leading Graphics (TPL) 

18 (Reserved) 

19 Read Initial Inquiry (TIQ), Read Modified from Position (TMP) 
1A Write Wait Before Transmitting (TW) 
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IB Read Interrupt (TRV) 

1C Write Connect (TO 

ID Write Initial Conversational Transparent (TIVX) 

IE Read Connect with Tone (TCW) 

IF Write Continue Conversational Transparent (TTVX) 

DECLNGTH 

Buffer length or message area length. 

DECONLTT 

When BSC online test is in control of the line, the and 1 bits 

have the following meaning: 

bit 0=0 indicates online test was requested by RFT 

*1 indicates that online test has been requested by the 
ONLTST macro 
bit 1 (meaningful only when online test has been initiated) =0 
=0 if test messages are sent by BTAM; 
=1 if test messages are received by BTAM 

DECDCBAD 

Address of associated DCB. 

DECAREA 

Address of the message area or first buffer, 
this field must always contain zero. 



The high-order byte of 



DECS ENS 

Sense information, as set by the control unit, when the CSW status 
(DECCSWST) indicates a unit check. 

Bit Meaning 

Command reject 

1 Intervention required 

2 Bus out check 

3 Equipment check 

4 Data check 

5 Overrun or unit specify (local 3270) 

6 Lost data or control check (local 3270) 

7 Timeout or operation check (local 3270) 

DECSENS1 

(Reserved) 

DECCOUNT 

Residual count from the CSW for the last CCW that was executed. 

DECCMCOD 

Command Code (one cyte) identifies the type of command upon which 
the error occurred. 



Code 




(Hex) 


Command 


00 


Test I/O 


01 


Write 


02 


Read 


03 


I/O NOP 


04 


Sense 


05 


Diagnostic Write 




(Auto Wrap) 


06 


Prepare 


09 


Poll 


0A 


Inhibit 


0D 


Break 


0E 


Search 


12 


Diagnostic Read 



Code 




(Hex). 


Command 


13 


Set Address 


17 


Set Address 1 


IB 


Set Address 2 


IE 


Address Prepare 


IF 


Set Address 


23 


Set Mode 


27 


Enable 


29 


Dial 


2F 


Disable 


41 


Write Break 


42 


Read Clear 


D4 


Release 


F4 


Reserve 
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DECENTRY 

Address of the terminal list entry specified in the entry operand of 
the READ or WRITE macro instruction, prior to a Read or Write opera- 
tion; after the operation it contains the address of the polling 
list entry that was last polled. 

DECFLAGS 

Status flags that may be set regardless of whether there was an I/O 
error (that is, the completion code in the DECSDECB may be either 7F 
or 41). 

Bit 0: For start-stop operations, this bit is reserved. For BSC 

operations, it indicates that a WACK (Wait-before-transmit) 
was received, if bit 1 is also on. If bit 1 is not on, bit 
indicates that an error status message was received. (An 
error status message begins with SOU % S and provides status 
information about a remote station.) If a WACK has been 
received, the user program should respond by sending ENQ (cr 
EOT, if transmission is to be ended), unless the WACK was 
received in response to selection (multipoint line) , in 
which case the user program should retransmit the selection 
characters, that is, reissue the WRITE macro. 

Bit 1: For start-stop operations, this tit is reserved. For BSC 

operations, it indicates that some response other than ACK-0 
or ACK-1 was received into the DECKESPN field. Examination 
of the response will determine which action should be taken 
to reestablish proper communication. (This bit is set when 
WACK (see also bit 0) is received or when RVI (see also 
bit 6) is received. 

Bit 2: For start-stop operations, this bit is reserved. For BSC 

operations, it means that an incorrect alternating acknowl- 
edgment was received: ACK-1 received when ACK-0 was 
expected, or vice versa. If this tit is on and the comple- 
tion code for the operation is 7F (that is, no line trans- 
mission error occurred), a complete message may have been 
lost. 

Bit 3: The ID received from a TWX 33/35 or a BSC station did not 

equal the expected ID as defined in the terminal list speci- 
fied in the WRITE TI, WRITE TC, or READ TC macro instruc- 
tion, or the index received as a result of an Autopoll 
operation did not match the index byte in any of the active 
entries in the polling list. For BSC (nonswitched line) 
this bit, when on, indicates that contention has occurred 
and this is not the control station. The control station 
should retry this WRITE and this (remote) station should 
issue a READ Initial. For World Trade telegraph terminals, 
this bit indicates that contention occurred, or that the ID 
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received from a terminal did not equal the expected ID as 
defined in the terminal list specified in the READ TE macro 
instruction. Test the TP code in the DECB to determine 
which condition occurred. 

Bit 4: No buffer was available upon completion of a dynamic buffer- 
ing Read command. The last buffer is posted complete and 
the remainder of the message is read from the communications 
line (under control of a dynamic buffering Read Skip com- 
mand) , but the data is not placed into storage. 

Bit 5: 

• The end of the terminal list has been reached, or all the 
skip bits are on. This is an indication that: 

1. A negative response to polling has been received from 
the terminal represented by the last active (non- 
skipped) entry in an open polling list (OPENLST, 
SSALST, AUTOLST); 

2. A negative response tc polling has been received fol- 
lowing a RESETPL macro instruction of the POLLING type 
(second operand omitted or specified as POLLING); 

3. All of the entries in a wraparound polling list 
(WRAPLST) are inactive (all skip bits are on). 

Note : Condition 3 can occur only as a result of one or 
more skip bits being turned on after initiation of a pro- 
grammed polling operation with a wraparound polling list. 
If all skip bits were on at the time that the READ macro 
instruction was executed, no I/C operation would be 
initiated. 

• Negative response to addressing has been received. 

• The last message sent by a World Trade telegraph terminal 
ended with EOT or a timeout. 

• Power is off or other Intervention Required condition 
exists for 27 41. 

Bit 6: WT Terminals: Message ended with WRU signal. 

BSC Stations: RVI sequence received (see also bit 1). 
2741 : Write operation was ended by terminal interrupt. 
Remote 3270 : if bit 6 is on, but bit 1 is not on, an error 
status message was received. (An error status message for 
a remote 3270 device begins with SOH % R and provides sense 
and status information about the device.) 

Bit 7: WT Terminals: Contention condition was encountered. 
BSC Stations : STX ENQ sequence was received. 
Local 3270 : OLTEP is using the device to run diagnostics. 

For local 3270, X'FO' in the DECFLAGS field indicates that a local 3270 
has become ready (READYQ was specified) . DECPOLPT+3 will contain the 
rln of the ready device. 
DECRLN 

Relative line number. 

DECRESPN 

Start-stop: First byte: one-character response to addressing 

Second byte: one-character LRC/VRC response to text 
BSC: two-character response to addressing, ENQ, or text. Excep- 
tion: responses to text for Write TIV, TIVX, TTV, and TTVX 
are read into the input area designated by the WRITE macro. 
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DECTPCOD 

TP Op. code. Bits 2-7 of these codes identify types of channel com- 
mands that are not identifiable by the command code alone. Bits 
and 1 are used in conjunction with, but independent of, bits 2-7, as 
described below. 

Bit ; Indicates tne final command in the channel program (not 
necessarily the last command executed) . 

Bit 1 ; The command just executed was the first Read Text or Write 
Text CCW to be executed in a channel program using dynamic 
buffering. 

Bits 2-7: 

Hex 

Value Meanings 

00 Any command issued by Online Test routine. 

01 Disable, when the disable is the first command of a channel 
program; dial, enable, prepare, write pad characters, or 
write wait- before- transmitting; or sense (World Trade tele- 
graph terminals) . 

02 Write EOA EOT EOT EOT sequence prior to selection, write EOT 
sequence prior to polling or addressing, write response to 
text, write EOA and 15 idle characters (Basic 2740), or Write 
EOA PRE o (2740/2760). 

03 Write polling or addressing character or write / (/ is the 
broadcast addressing character) (2740 with Station Control) , 
turn-around sequence (TWX) , CPU- ID sequence (TWX or BSC) , 
Poll command with SSALST, SSAWLST, AUTOLST, or AUTOWLST, or 
write inquiry (ENQ) . 

04 Write space (2740 with Station Control), write 2848 command 
(2260R), write FIGS (83B3), write 1 (1030), write WRU, Iden- 
tification, pad, or LTRS characters (World Trade terminals), 
or Sense (2740) . 

05 Read response to polling. 

06 Read response to addressing. 

07 Read ID response (TWX or BSC) . 

08 Write end of addressing character following addressing (on 
1030, 1050, 1060, 2260R, or 2740). Write response to 
inquiry. Write response to text (BSC). Write EOB 
(2760/2740). 

09 NOP or TIC following Poll in the polling list: SSALST, 
SSAWLST, AUTOLST, or AUTOWLST. 

0A Read index (Autopoll) or read response to polling (programmed 
polling) . 

0B Read inquiry (BSC only). 

0C Read response to inquiry (BSC only). 

10 Write at line address (2260R). 

11 Read or write text. Write frame change sequence (2760/2740). 

12 Read skip or TIC command for dynamic buffering. 

13 Write end-of-transparent text (DLE ETX) characters (BSC) . 

14 (Reserved) 

20 Read response to text (start-stop). 
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Bit 


0: 


Bit 


1: 


Bit 


2: 



21 All reset commands. 

22 Read skip. 

23 Write break. 

24 Any command issued during OPEN, LOPEN, or CLOSE (Set Address, 
Enable, Disable, and Set Mode commands). 

25 Read Response to text CBSC) . 

DECERRST 

Error status flags that may be set if an I/O error has occurred 
(that is, a completion code of 11 is placed in DECSDECB) . 

The START I/O instruction resulted in a condition code of 3, 
indicating that the control unit or the specified line is 
not operational. 

An error condition that should not occur (is undefined for 
the particular command or device) has occurred. 

An error condition occurred on an I/O operation initiated by 
the error recovery routines: (1) as part of an intermediate 
recovery procedure, (2) as part of a diagnostic write/read 
procedure (2701 only), or (3) as part of a disconnect proce- 
dure for a switched line. 

Bit 3 ; A diagnostic write/read operation terminated in error, indi- 
cating a control unit failure (2701 only). An error 
occurred that makes the integrity of the device regeneration 
buffer doubtful (local 3270 only) . 

Bit <> ; A Disable command was issued to a switched line by the error 
recovery routines after detecting a permanent error on that 
line. 

Note ; If this bit is on after execution of error recovery procedures, 
the user program must execute an initial-type Read or Write operation, 
in order to reestablish the line connection. 

Bits 5-6 ; (Reserved) « 

Bit 7 ; Switched 3275 RFT error bit: The RFT message has been tran- 
smitted the specified number of times, followed by a Write 
Reset. The response to the Write Reset indicates that an 
error has occurred. 

DECCSWST 

contains the status bits from the CSW for the last CCW that was 
executed. 

DECADRPT 

pointer to the addressing list entry used in the previous 
operation. 
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DECPOLPT 

for programmed polling, contains the address of the current entry 
in the polling list. For Autopoll, the high-order byte contains 
the index to the current polling list entry. The remaining bytes 
contain the address of the polling list (that is, the address of 
the first entry therein). For BSC online test operations, contains 
the address of the area in which user-specified text data is placed 
(for test messages).. For local 3270 read operations, contains the 
relative line number of the device from which the message was read 
or the device that became ready (READYQ) . 

DECWLNG 

length of the data area in leading-graphics or conversational 
operations or when using READ TWC. 

DECWAREA 

address of the data area in leading-graphics and conversational 
operations or when using READ TWC. The high-order byte of this 
field must always contain zeros. 

Fields Defined by User 

It may be useful for the user program to maintain application-dependent 
information about the line and about the stations connected to the line. 
This may conveniently be done by appending to each DECB a sequence of 
fields containing the needed information, which might typically include: 

• Line status: A one- byte field that indicates the status of the 
line; for example, active or inactive. The inactive bit might be 
set after a certain number of transmission errors have accumulated, 
to indicate to the message control routine that no further Read and 
Write operations are to be executed using that line. 

• Address of User Terminal Table: This table would contain a series 
of fixed- length entries, one for each terminal, containing terminal 
information such as whether or not the terminal is active, and the 
addresses of the terminal list entries for that terminal. 

• Terminal Count: A count of the nun be r of terminals connected to the 
line. 

• Processing Routine Address: Contains tjje address of the next rou- 
tine to be given control for the line. For example, this field 
would contain the address of a line analysis routine to be given 
control upon completion of a Read or Write operation. 
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Standard OECB 
Fields 



OECB Fields 
Peculiar to BTAM 



Present only in 
OECBs for 
BSC lines 



Fields Defined 
By User 




4 

8 
12 

16 

20 
24 
28 

32 

36 

i 


OECSDECB 














Standard Event Control Block 


DECTYPE 




DECLNGTH 




Operation Type 


Message Area Length or Buffer Length 


DECONLTT 


1 


DECDCBAO 




Address of DCB 


Reserved 




DECAREA 




Address of Message Area 
or Address of First Buffer 


Reserved 




DECSENSO 




DECSENSI 




DECCOUNT 




Sense Byte 




Reserved 




CSW Residual Count 


DECCMCOD 






DEC ENTRY 


| Address of Terminal List 
1 or of an Entry Therein 

1 


Command Code 


DECFLAGS 




DECRLN 




DECRESPN 


1 

1 . 


Status Flags 




Relative Line Numb* 


r 


Response to Addressing 
(1 byte for Start/Stop, 
2 bytes for BSC) 


j Response to 

| VRC/LRC 

1 (Start/Stop Only) 


DECTPCOD 




DECERRST 




DECCSWST 




TP-OP Code 


\/0 Error Status 






CSW Status 


DECADRPT 




Pointer to Previous (or Only) 
Entry in Addressing List 


Reserved 


DECPOLPT 




Address of Current Entry in 
Polling List (Programmed Polling) 
Address of Polling List (Auto Poll) 
1 Relative line number (Local 3270 only) 


Index byte (Auto Poll on 


y) 


Reserved 


DECWLNG 




Or:"* 


3ata Area (for BSC Write 
anal and BSC Read with 
raphics operations) 


DECWAREA 


1 
1 


Reserved 


| Address of Data Area (tor B3l Write conversational ana oa«- 
Read with Leading Graphics operations) 


Line Status 


Address of User Terminal Table 


Terminal Count 


Polling Ust Address 
Processing Routine Address 


Other User - Defined Data 



Figure 113. Format of Data Event Control Block 
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APPENDIX C; BTAM ERRCF MESSAGES AND ABEND CODES 



This appendix explains each of the BTAM-r elated error messages that may 
be printed during program execution at the console of the central com- 
puter, or at some other console, if the system includes the Multiple 
Console Support facility, or in the assembler listing in the SYSPRINT 
data set during program assembly. Also given are Abend codes 090 - 099 
which may be issued during opening of a BTAM DCB. 

Both system-generated and user-generated messages are described 
herein. System-generated refers to those messages printed at a console 
(or in an assembly listing) by the operating system; these begin with a 
standard identification, for example, IEC801I. 

User-generated refers to those messages that are sent by the user 
(for example, the operator of a remote station) to the central computer 
for routing to the user program, console, or an error file on a system 
residence device. 



ASSEMBLY ERRORS 

These messages are produced by the assembler program during expansion of 
supervisor and data management macro instructions. They appear on the 
assembler listing in the SYSPRINT data set. See OS/VS V-M37 Assembler 
Programmer's Guide for return codes. 

r 1 

| IHB002 INVALID xxx OPERAND SPECIFIED-yyy | 

t . J 

Explanation ; An operand whose position or name is xxx was specified as 
yyy. The specified operand is invalid. 

System Action ; The macro instruction was partially expanded; expansion 
stopped on detection of the error. Severity code = 12. 

Programmer Response ; Probable user error. Correct the invalid operand 
and reassemble. If the problem recurs, do the following before calling 
IBM for programming support; 

• Have the associated program listing available. 



r : 1 

I IHB072 LERB REQUESTED - EROPT=C ASSUMED | 

I . „. J 

Explanation ; LERB was coded in the DCB but EROPT=C (indicating a requ- 
est for line error recording) was not coded. 

System Action ; The macro instruction was expanded normally with line 
error recording provided. Severity code=*. 

Programmer Response ; Probable user error. Delete the LERB operand if 
line error recording is not wanted. If line error recording is wanted, 
code EROPT=C. If the problem recurs, do the following before calling 
IBM for programming support: 

• Have the associated program listing available. 
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r ■ 1 

| IHB073 LERB OMITTED - ERROPT=C IGNORED | 

L J 

Explanation : Line error recording was requested by EROPT=C but no LERB 
address was given. 

System Action : The macro instruction was expanded normally with no line 
error recording provided. Severity code=* . 

Programmer Response : Probable user error. Delete EROPT=C if line error 
recording is not wanted. If line error recording is wanted, code a LERB 
address. If the problem recurs, do the following before calling IBM for 
programming support: 

• Have the associated program listing available. 

r t 

| IHB07U EROPT=N - LERB IGNORED | 

L J 

Explanation : LERB was coded in the DCB but error recovery procedures 
were not requested (EROPT=N).. 

System Action : The macro instruction was expanded normally with no line 
error recording provided. Severity code=*. 

Programmer Response : Probable user error. Delete the LERB operand if 
line error recording is not wanted. If line error recording is wanted, 
code EROPT=C. If the problem recurs, do the following before calling 
IBM for programming support: 

• Have the associated program listing available. 

r 1 

| IHB075 TABLENAME OPERAND REPEATED - XXX | 

L J 

Explanation : In the ASMTRTAB macro instruction, a table name operand 
was coded more than once. XXX is the repeated operand. 

System Action : The macro instruction was expanded normally. Severity 
code=* . 

Programmer Response : Probable user error. Remove the duplicate operand 
and reassemble. If the problem recurs, do the following before calling 
IBM for programming support: 

• Have the associated program listing available. 

r " 1 

| IHB076 MACRO NAME FIELD BLANK - NAME REQUIRED | 

L J 

Explanation : A name must be specified in the name field for this macro 
instruction. 

System Action : The macro instruction was not expanded. Severity 
code=12. 

Programmer Response : Probable user error. Code a name in the name 
field of the macro instruction and reassemble. If the problem recurs, 
do the following before calling IBM for programming support: 
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• Have the associated program listing available. 

r 1 

j IHB078 XXX OPERAND REGISTER NOTATION INVALID - YYY | 

l J 



Explanation : For the XXX operand, the operand was not enclosed in 
parentheses or specified an invalid register. YYY is the invalid 
notation. 

System Action : The macro instruction was not expanded. Severity 
code=12. 

Programmer Response : Probable user error. Correct the register nota- 
tion or specify a valid register and reassemble. If the problem recurs, 
do the following before calling IBM for programming support: 

r 1 

j IHB079 FIRST OPERAND REGISTER NOTATION REQUIRED | 

l J 

Explanation : Register notation is required for the first operand. 

System Action : The macro instruction was not expanded. Severity 
code=12~ 

Programmer Response : Probable user error. Specify a register notation 
for the first operand and reassemble. If the problem recurs, do the 
following before calling IBM for programming support: 

• Have the associated program listing available. 

r t 

| IHB080 ONE ECBLIST OPERAND ONLY REQUIRED j 

l J 

Explanation : The ECBLIST operand was omitted or more than one supplied. 

System Action : The macro instruction was not expanded. Severity 
code=12. 

Programmer Response : Probable user error. Supply one and only one ECB- 
LIST operand and reassemble. If the problem recurs, do the following 
before calling IBM for programming support: 

• Have the associated program listing available. 

r 1 

| IHB085 DEVD = XX CODED - EROPT = y IGNORED | 

L J 

Explanation : In a DCB macro instruction, one of the following occurred: 

• Both DEVD=BS and EROPT=N were coded. However, EROPT=N is invalid 
for binary synchronous devices. Error recovery procedures are 
required. 

• Both DEVD=WT and EROPT=R, W, or T were coded. However, EROPT=R, W, 
or T is invalid for world Trade telegraph terminals. 

System Action : The macro instruction was expanded normally. The EROPT 
operand was ignored. Severity code= * . 

Appendix C: BTAM Error Message Formats C-3 



Programmer Response : Probable user error. Remove the EROPT operand and 
reassemble. If the problem recurs, do the following before calling IBM 
for programming support: 

• Have the associated program listing available. 

r * 1 

I IHB100 X OR If PARAMETER NOT WITHIN ALLOWABLE VALUE RANGE. | 

I J 

Explanation : In the ONLTST macro instruction, either the X or Y operand 
specified an incorrect value. The X operand must specify a value from 
00 through 22, and the Y operand must specify a value from 01 through 
99. 

System Action : The macro instruction was not expanded. Severity code = 
12. 

Programmer Response : Probable user error. Correct the X or Y operand 
in the ONLTST macro instruction and reassemble. If the problem recurs, 
do the following before calling IBM for programming support: 

• Have the associated program listing available. 









| IHB103 


TEXT OR LENGTH MISSING WHEN X = OR X = 1. 


1 









Explanation : In the ONLTST macro instruction, although the X operand 
specified or 1, either the TEXT or the LENGTH operand was missing. 
Whenever the X operand specifies or 1, the TEXT and LENGTH operands 
must also be specified. 

System Action : The macro instruction was not expanded. Severity code = 
12. 

Programmer Response : Probable user error. Include both the TEXT and 
LENGTH operands in the ONLTST macro instruction and reassemble. If the 
problem recurs, do the following before calling IBM for programming 
support: 

• Have the associated program listing available. 

r 1 

I IHB10U TEXT OR LENGTH MISSING. | 

I J 

Explanation : In the ONLTST macro instruction, either the TEXT or the 
LENGTH operand was missing. If one of these two operands is specified, 
the other operand must also be specified. 

System Action : The macro instruction was not expanded. Severity code = 
1. 

Programmer Response : Probable user error. Include both the TEXT and 
the LENGTH operands in the ONLTST macro instruction and reassemble. If 
the problem recurs, do the following before calling IBM for programming 
support: 

• Have the associated program listing available. 

r i 

| IHB105 X GREATER THAN 1. TEXT AND LENGTH PARAMETERS IGNORED. | 
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Explanation ; In the ONLTST macro instruction, although the X operand 
specified a value greater than 1, the TEXT and LENGTH operands were also 
specified. Whenever the X operand specifies a value greater than 1, the 
TEXT and LENGTH operands should not be specified. 

System Action ; The macro instruction is expanded normally, and the TEXT 
and LENGTH operands are ignored. 

Programmer Response ; Probable user error. Remove the TEXT and LENGTH 
operands from the ONLTST macro instruction. If the problem recurs, do 
the following before calling IBM for programming support: 

• Have the associated program listing availatle. 

r 1 

| IHB107 DIALCOUNT AND DIALCHARS NOT IN AGREEMENT. j 

t 1 

Explanation ; In the DFTRMLST macro instruction, the length of the tele- 
phone number specified in the dialcount operand is not the same as the 
number of dial digits specified in the dialchars operand. 

System Action : The dial digits are generated as specified in the dial- 
chars operand without regard to the length specified in the dialcount 
operand. Severity code = 4. 

Programmer Response ; Probable user error. Correct the dialcount or 
dialchars operand in error. If the problem recurs, do the following 
before calling IBM for programming support: 

• Have the associated program listing availatle. 

| IHB108 POLLING CHARACTERS ARE IMPROPER. | 

l - . J 

Explanation ; In the DFTRMLST macro instruction, the number of entries 
specified in the polling list was greater than 253 or one of the polling 
characters in an entry was hexadecimal FE, a value that must not be used 
as a polling character. 

System Action : The macro instruction was not expanded. Severity code = 
12. 

Programmer Response : Probable user error. Correct the polling list. 
If the problem recurs, do the following before calling IBM for program- 
ming support: 

• Have the associated program listing available. 

r — t 

| IHB109 LENGTH OF POLLING CHARACTERS PER ENTRY IS IMPROPER. | 

t j 

Explanation : In the DFTRMLST macro instruction, the entries in the 
polling list are not all of the same length. 

System Action ; All entries are truncated or expanded to equal the 
length of the first entry. Severity code = *». 

Programmer Response ; Probable user error. Correct the polling list so 
that all the entries are of the same length. If the problem recurs, do 
the following before calling IBM for programming support: 
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• Have the associated program listing available. 

r 1 

| IHB110 DIAL CHARACTERS INVALID IN WTLIST. | 

L J 

Explanation ; In a DFTRMLST macro instruction specifying a list type of 
WTLIST, dial digits were specified. However, a list type of WTLIST 
should be used only where manual dialing is intended, and no dial digits 
can be specified. 

System Action ; The macro instruction was not expanded. Severity code = 
12. 

Programmer Response ; Probable user error. Remove the dial digits from 
the DFTRMLST macro and reassemble. If the problem recurs, do the fol- 
lowing before calling IBM for programming support: 

• Have the associated program listing available. 

r 1 

| IHB111 LENGTH OR ADDRESS OF TONE OMITTED. | 

t - -_J 

Explanation ; In a DFTRMLST macro instruction specifying an answering 
list of the WTLIST type, either the length or the address of the data 
tone characters was omitted. However, both operands must be included 
for a list of this type. 

System Action ; The macro instruction was not expanded. Severity code = 
12. 

Programmer Response ; Probable user error. Make sure that both length 
and adress operands are specified for an answering list of the WTLIST 
type. If the problem recurs, do the following before calling IBM for 
programming support; 

• Have the associated program listing available. 

| IHB113 IDCOUNT AND IDSENT DO NOT AGREE. | 

L - J 

Explanation ; In a DFTRMLST macro instruction, the value specified for 
the idcount operand does not equal the number of characters specified by 
the idsent operand. 

System Action ; The macro instruction was partially expanded; expansion 
stopped upon detection of the error. Severity code = 12. 

Programmer Response ; Probable user error. Correct the idcount value 
and reassemble. If the problem recurs, do the following before calling 
IBM for programming support: 

• Have the associated program listing available. 

r 1 

j IHB114 IDCOUNT IS TOO LARGE. j 

I J 

Explanation ; In a DFTRMLST macro instruction, the value specified for 
idcount is greater than 16 (for a calling list of the AD or MD type) , or 
is greater than 17 (for an answering list of the AN type). 



C-6 OS/VS BTAM SRL 



System Action ; The macro instruction was partially expanded; expansion 
stopped upon detection of the error. Severity code * 12. 

Programmer Response ; Probable user error, correct the idcount value 
and reassemble. If the problem recurs, do the following before calling 
IBM for programming support: 

• Have the associated program listing available. 

| IHB115 INVALID TYPE ATTRIBUTES. | 

Explanation : In a DFTRMLST macro instruction, an invalid type attribute 
was specified for one of the operands. 

System Action : The macro instruction was partially expanded; expansion 
stopped upon detection of the error. Severity code * 12. 

Programmer Response ; Probable user error. Correct the operand and 
reassemble. If the problem recurs, do the following before calling IBM 
for programming support. 

• Have the associated program listing available 

| IHB116 AUTHORIZED SEyUENCE IS MISSING | 

Explanation : In a DFTRMLST macro instruction, either a control value or 
a user data area was specified without an authorized sequence having 
been specified. 

System Action ; The macro instruction was partially expanded; expansion 
stopped upon detection of the error. Severity code * 12. 

Programmer Response ; Probable user error. Either specify an authorized 
sequence Or eliminate the control value or user data area. If the pro- 
blem-recurs, do the following before calling IBM for programming 
support: 

• Have the associated program listing available. 

| IHB117 PARENTHESIS IS MISSING. | 

Explanation : In a* DFTRMLST macro instruction, the authorized sequence 
was not enclosed in parentheses. 

System Action : The macro was partially expanded; expansion stopped upon 
detection of the error. Severity code - 12. 

Programmer Response : Probable user error. Enclose the authorized 
sequence in parentheses and reassemble. If the problem recurs, do the 
following before calling IBM for programming support: 

• Have the associated program listing available. 

I/O ERROR MESSAGE 

This message is printed at the console of the central computer following 
an error that BTAM error recovery procedures have failed to correct. 

| IEAOOOI aaa,I/0 ERR, tb, cccc,ddee, f fgghhhh j 

t J 
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IEAOOOI 

is the standard message code for the operator. The internal com- 
ponent name is IEA, the serial nuirber is 000, and the action code 
is I (meaning information); immediate operator action is not 
required. 

The following information is typed in hexadecimal (except I/O ERR) : 



aaa 



is the address of the communication line on which the error 
occurred. 



cccc 



dd 



ee 



ff 



gg 



I/O ERR 

is the message text, indicating the occurrence of an I/O error. 

bb 

is the command code of the failing command in the channel program. 
(See the DECCMCOD field in Appendix B for code values and 
meanings. ) 

is the status bytes of the channel status word (CSW) as specified 
in the Input/Output Block (IOB). 

is the first sense byte as specified in the IOB. 

is the sense information resulting from issuing diagnostic Write or 
Read commands if the commands resulted in a unit check (IBM 2701 
only), or for BSC lines, is the operation type (DECTYPE field, byte 
5) of the DECB associated with the failing READ/WRITE operation. 
(See the second byte of the DECTYPE field in Appendix B for code 
values and meanings) . 

is the TP operation code of the failing command in the channel pro- 
gram. (See the DECTPCOD field in Appendix B for code values and 
meanings . ) 

for BSC lines, is the flag byte (DECFLAGS, byte 24) of the DECB 
associated with the failing READ/WRITE operation. (See the DEC- 
FLAGS field in Appendix B for code values and meanings.) For 
non-BSC lines, this field (gg) is not used. 

is the firs-: two polling or addressing characters of the terminal 
list. If only one polling character is used, it is left-justified 
in this field. (For IBM 2740 Model 2: When this message is issued 
for an addressing error, the first character (hh..) is the address 
of the terminal, and the second character (..hh) indicates the kind 
of error that occurred on the previous Write operation. The mean- 
ings of the codes are given in the IBM 27 40 — General Information 
section of the Start-Stop Read and Write Operations chapter. When 
the message is issued for a polling error, only one character, the 
polling character, appears at this point in the message. For remote 
3270: only the control unit is identified.) 

LINE ERROR RECORDING MESSAGES 

These messages indicate the number of errors occurring for a given line. 

Message IEC80 LI prints the contents of each of the four error thresh- 
old counters, indicating the number of data check, intervention 
required, or nontext time-out errors that have occurred since the last 
time the error threshold counters were reset. This message is printed 
Whenever the threshold count has been reached for any of the three types 
of errors, or when the number of transmissions reaches the threshold 
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hhhh 



count. (See the LERB (Line Error Recording Block) macro instruction for 
further information.) 

Message IEC802I prints the contents of each of the four cumulative 
counters (accumulators) , indicating the total number of data check, 
intervention required, and nontext timeout errors, and number of trans- 
missions that have been accumulated since the cumulative counters were 
last reset. This message is printed whenever the user program issues a 
LERPRT macro instruction. 

r 1 

| IEC801I aaa THRESHOLD TRANS=bbb DC=ccc IR=ddd TO=eee | 

c j 

IEC801I 

is the standard message code for the operator. The internal com- 
ponent name is IEC, the serial number is 801, and the action code 
is I, meaning information; immediate operator action is not 
required. 

aaa 

is the address of the communication line on which the error 
occurred (printed in hexadecimal) . 

THRESHOLD 

is the message text. 

TRANS=fcbb 

is the number of transmissions that have occurred on this line (in 
decimal ) . 

DC=ccc 

is the number of data check errors that have occurred on the line 
during the indicated number of transmissions (in decimal). 

IR=ddd 

is the number of intervention required errors that have occurred on 
the line during the indicated number of transmissions (in decimal). 

TO=eee 

is the number of nontext timeout errors that have occurred on the 
line during the indicated number of transmissions (in decimal). 

r ** i 

| IEC802I aaa LINE TOTALS TRANS =bbbbbbbb DC=ccccc IR=ddddd TO=eeeee | 

i j 

IEC802I 

is the standard message code for the operator. The internal com- 
ponent name is IEC, the serial number is 802, and the action code 
is I, meaning information; immediate operator action is not 
required. 

aaa 

is the address of the communications line on which the errors 
occurred. 

LINE TOTALS 

is the message text, indicating the total number of errors on the 
specified line. 

TRANS=bbbbbbbb 

is the total number of transmissions that have occurred on the line 
since the accumulators were reset (in decimal). 

DC=ccccc 

is the total number of data check errors that have occurred on the 
line during the indicated number of transmissions (in decimal). 
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IK=ddddd 

is the total nuirber of intervention required errors that have 
occurred on the line during the indicated number of transmissions 
(in decimal) . 

TO=eceee 

is the total number of nontext time-out errors that have occurred 
on the line during the indicated number of transmissions (in 
decimal) . 

CONTROL UNIT OR DEVICE INOPERATIVE MESSAGE 

This message is issued whenever an IBM 2701, 2702, or 2703 becomes 
inoperative. Usually, this message is printed during opening of a line 
group associated with the inoperative TCU. It appears when an I/O 
operation for some line connected to that TCU is attempted. When the 
message appears, the central computer operator should determine the 
reason for the condition and reactivate the TCU. For a local 3270, this 
message indicates that an I/O error was the result of the Erase Write 
done during Open processing. 

| /CONTROL UNIT) (CONT OR POST I) 

| IEC804A aaa (DEVICE ) NOT OPERATIONAL. REPLY \CONT, POST OR DROFjj 

c . . J 

IEC80UA 

is the standard message code for the operator. The internal com- 
ponent name is IEC, the serial number is 804, and the action code 
is A, meaning operator action is required. 



aaa 



is the address of the communications line or device. 



CONTROL UNIT NOT OPERATIONAL. REPLY CONT OR POST 

is the message text for a control unit, indicating the response for 
the operator. Reply either CONT or POST. If the operator replies 
CONT, the I/O operation for which this message was printed will be 
retried. If the retry is unsuccessful, the message will be reis- 
sued. If successful, the operation will continue. If the reply is 
POST, the operation will be posted complete-with-error and the "not 
operational SIO" bit (bit 0) will be turned on in the DECERRST 
field of the DECB for the line. 

Note 1: For VS1 the verbage may be abbreviated. 

Note 2: If a reply is not entered before the requesting job is cancelled, 
the system may enter wait state. 

DEVICE NOT OPERATIONAL. REPLY CONT, POST OR DROP 

is the message text for a local 3270. If the operator replies 
CONT, the I/O operation for which this message was issued is re- 
tried. If the retry is unsuccessful, the message is reissued. The 
operation continues if the retry is successful. If the operator 
replies POST, the operation is posted complete-with-error. The 
DROP reply discontinues issuance of the message for the duration of 
open processing, and all I/O errors will be posted complete-with-error, 
for this line group. 

r 1 

| IEC809I aaa CONTROL UNIT NOT OPERATIONAL | 

i J 

IEC809I 

is the standard message code for the operator. The internal com- 
ponent name is IEC, the serial nuirber is 809, and the action code 
is I, meaning no operator action is required. 

aaa 

is the address of the communications line. 
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CONTROL UNIT NOT OPERATIONAL 
is the message text. 

REMOTE BSC STATION ERROR MESSAGES 

BTAM allows remote BSC stations to send error information to the central 
computer. Currently, the BSC stations that can send these messages are 
the 2715 (second and third formats only) , the 2770 (first format only) , 
and the remote 3270 (fourth format only) . This information is routed to 
the user program, to the central computer console, or to an error file 
on a system residence device. The forvat of the error message depends 
on which of these destinations is desired: 

1. Error information to be sent to the user program must appear in a 
message having this format: 

r t r r -t t " t n 

|SOH| % | S 1 |DLE a |STX| text* |ETX| 
i x x x x x // x J 

11111 1 

2. Error information to be sent to the central computer console must 
appear in a message having this format: 

r t r r t t t " t n 

|SOH| % | C* |DLE a |STX| r 3 j text** |ETX| 

L X X J X X X // — X J 

111111 1 

3. Error information to be sent to the system error file must appear 
in a message having this format: 

r t r r t t t t t — // t 1 

|SOH| X | E 1 |DLE a |STX| X* 08 • | reserved | ID | text* |ETX| 
c x x x x x j x x // x J 

111111 2 2 1 

4. Error information from a remote 3270 display system to be sent to 
the problem program and to be recorded as T-type records in SYS1. 
LOGREC must appear in a message having this format: 

r t t t t t 1 

JSOHJ % j RijSTXJ text* |ETX| 
i x x x x x J 

1111 *» 1 

Notes : 

*This character must be uppercase (EBCDIC or USASCII) . 

a DLE need be present only for transparent text; however, in the third 
format (system error file), the text must begin in the eleventh byte. 

3 r is the routing code that specifies the console to which this message 
is to be routed. 

*»The text of each message depends on the format: 

Format 1 - The text is user provided; its length depends on the size of 
the user's buffer. 

Format 2 - The text must consist of printable characters. The length 

of the text must be either 17 or 60 characters; extra chara- 
cters will be automatically truncated. 
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Format 3 - The text is bit significant. The length may be from 35 to 
210 characters, but must be a multiple of 35 (i.e., it can 
be 35, 70, 105, 140, 175, or 210 characters). If necessary, 
the text should be padded with *FF* bytes. 

Format 4 - For the nonswitched remote 3270, the text includes the con- 
trol unit and device addresses of the remote 3270 device 
from which the message was received and two sense/status 
bytes. For the switched 3275, the text includes only two 
sense/status bytes. 

After sending the error message to the user program, console, or 
error file, BTAM restarts the user-program Read operation with which the 
error message was received. The remote station then may send another 
error message, a regular message, or EOT. 

Upon receiving an error message with a Read Initial Operation on a 
multipoint line, BTAM preserves the Autopoll index byte in the first 
byte of the input area. Therefore, following each Read Initial opera- 
tion on a multipoint line, the user program should check the second byte 
of the input area for an EOT character. 

ERROR STATUS MESSAGES (IBM 2770) 

One of the following five error messages may be sent by the 2770 termi- 
nal operator, as specified by the error recovery procedure for the 2770. 

• Checkpoint Restart: 

Last Restart Point: SOH % S STX X x X a C SP SP 
Specific Restart Point: SOH % S STX 2 X x X a C text... 

(The first format causes BTAM to begin retransmission at the point from 
which the previous transmission began, or at any other point decided by 
the user program when it detects the 'C* preceding the two space charac- 
ters. The second format allows the terminal operator to indicate to the 
user program where he wishes for retransmission to begin. The text can 
be up to 50 characters long and can contain any information the user 
program needs to identify the point at which transmission is to begin. 
This might be, for example, a page number or form number. 

• Customer Engineer 

Attention Required: SOH % S STX X x X a D Z ± Z a 

• Job Restart: SOH % S STX Xj. X a M SP SP 

• Format Error: SOH % S STX X x X a F SP SP 

In these formats: 

Xi 

is the station address 

X a 

is the component address 

text 

is any information the terminal operator wishes to send to identify 
to the user program the point from which retransmission is to 
begin. 

Zi 

is the station address. This is the same as x ± if the component 
requires attention by a Customer Engineer, but the station is 
operational; it is the address of an alternate station if the send- 
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ing station requires CE attention; and it is a SP character if no 
alternate station is available or desired. 

Z 3 

is the component address of an alternate componentatthe sending 
station or at an alternate station. 

When BTAM recognizes an error status message, it posts the operation 
complete with a completion code of X'7F* and turns on bit of DECFLAGS 



TERMINAL ERROR STATUS MESSAGE (IBM 2715) 

This message, in one of four formats, provides the results of a scan of 
the error file of an IBM 2715 Transmission Control. The scan occurs 
when the error threshold for one of the area stations connected to the 
2715 is exceeded (threshold value is eight) or when manually requested 
at the 2715, the 2740 attached to the 2715, or the central computer. 
BTAM prints the message on the master console, the teleprocessing con- 
sole, or the system maintenance console, depending on the routing code 
included in the error scan message sent by the 2715. (The routing code 
does not appear in the message printed on the console.) 

In the four formats below: 

cuu 

is the address of the communications line (channel and unit) 
(EBCDIC) . 

xx 

is the address of the area station for which the error scan is 
reported (hexadecimal) . 

tttt 

is the time (0001-2400) the error scan occurred (decimal). 

WW 

is the address of a particular adapter within the 2715 
(hexadecimal) . 

Other fields in the message are indicated under individual formats 
below. 

r 1 

| IEC815I cuu xx tttt yy ERS z | 

I j 

Explanation ; This message reports the results of an error scan by the 
2715 when five or more of the eight errors involved a particular one of 
the devices attached to the area station. 

yy 

is the address of the device for which the errors occurred 
(hexadecimal) . 

z 

is the number of errors (from 5 to 8) that occurred for the device 
(decimal) . 

Operator Response : None. 

i t 

| IEC815I cuu xx tttt THRESHLD j 

L j 
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Explanation : This message indicates that the threshold value of eight 
has been reached for the area station whose address is xx, but no one 
device attached to the station accounted for as many as five of the 
errors. 

Operator Response : None 

r 1 

| IEC815I ccc xx tttt yy eeee zzzz yy eeee zzzz yy eeee zzzz yy eeee | 
I zzzz j 

L J 

Explanation : This message is issued whenever an error scan for a parti- 
cular area station is manually requested at the 2715, 2740 attached to 
2715, or the central computer. The message appears twice in succession. 
Each indicates the nature of four errors; the two messages together pro- 
vide this information for the eight most recent occurences for area sta- 
tion xx. 

yy 

is the address of a device (hexadecimal) . 

eeee 

is the error data for device yy (hexadecimal). 

zzzz 

is the time (0001-2400) the error data was recorded on the 2715 
disk (decimal) . 

Operator Response : None. 

r 1 

| IEC815I cuu ww tttt eeeeeee zzzz eeeeeee zzzz eeeeeee zzzz eeeeeee | 
| zzzz j 

L J 

Explanation : This message is issued whenever an error scan for a parti- 
cular 2715 adapter is manually requested at the 2715, 2740 attached to 
2715, or the central computer. The message appears twice in succession. 
Each indicates the nature of four errors; the two messages together pro- 
vide this information for the eight most recent error occurrences for 
adapter ww. 

eeeeeee 

is the error data for adapter ww (hexadecimal). 

zzzz 

is the time (0001-2400) the error data was recorded on the 2715 
disk (decimal). 

Operator Response : None. 

ERROR STATUS MESSAGE (REMOTE IBM 3270) 

An error status message from a nonswitched remote 3270 device has the 
format: 

r T T T T T T T T T 

| | | | | cu | device | sense/status | sense/status | | 
|SOH| X | R | STX | address | address | byte 1 | byte 2 |ETX| 
l x x x x x x x x J 

An error status message from a switched 3275 display station has the 
format : 
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r T T T T T T 1 

| | | | | sense/status | sense/status | | 
|SOH| % | R |STX| byte 1 | byte 2 |ETX| 

cu address 

is the address of the control unit of the device from which the 
message was received (see Figure 47 in the section "IBM 3270 Dis- 
play System — Programming Considerations"). 

device address 

is the address of the device from which the message was received 
(see Figure 49 in the section "IBM 3270 Display System — Program- 
ming Considerations"). 

sense/status byte 1 
has the format: 

Bit Definition 

Setting depends on bits 2-7 (see Figure 50 in the section 
"IBM 3270 Display System — Programming Considerations") 

1 Setting always 1 

2 Reserved 

3 Reserved 

U Device Busy (DB) 

5 Unit Specify (US) 

6 Device End (DE) 

7 Transmission Check (TO 

sense/ byte 2 

has the format: 

Bit Definition 

Setting depends on bits 2-7 (see Figure 50) 

1 Setting always 1 

2 Command Reject (CR) 

3 Intervention Required (IR) 

4 Equipment Check (EC) 

5 Data Check (DC) 

6 Control Check (CC) 

7 Operations Check (OC) 

For more information about the sense/status bytes, see IBM 3270 Informa- 
tion Display System, Component Description . 

When BTAM recognizes an error status message from a remote 3270 
device, the operation is posted with a completion code of X*7F i , and bit 
1 is turned off and bit 6 is turned on in the DECFLAGS field of the 
DECB. BTAM sends the error status message to the application program's 
input/output area and records the information as T-type records in 
SYS1.LOGREC. 

Figure 114 indicates suggested actions according to the contents of 
the sense/status bytes in error status messages. (The figure applies 
both to nonswitched remote 3270 display systems and to the switched 
3275.) The suggested actions are: 

1. Execute a new address selection sequence, and retransmit the mes- 
sage starting with the command sequence that was being executed 
when the error occurred. If the operation is not successful after 
two retries, consider the error ncnrecoverable, and take action 9. 

2. Do the same as in action 1, except take action 10 after two 
retries. 
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3. Do the same as in action 1, except retransmit the entire failing 
chain of commands. 

4. If possible, reconstruct the entire screen buffer image, and retry 
the failing chain of commands (within the BSC sequence of opera- 
tions). If the screen buffer cannot or need not be reconstructed, 
retry the operation anyway. If the operation is not successful 
after three retries, consider the error nonrecoverable, and take 
action 9. 

5. Do the same as in action 4, except reconstruct the buffer of the 
"from" device specified in the copy command. If the operation is 
not successful after three retries, consider the error nonrecover- 
able, and take action 10. 

6. Wait for the display operator or system operator to ready the 
printer. Retry the printout by issuing a write command with the 
WCC and no data stream. Or take action 4. 

7. Wait for the display operator or system operator to ready the 
"from" device specified in the copy command. Take action 2. 

8. Examine the data stream to determine the cause of the nonrecover- 
able programming error. For command reject this may be caused by 
an EWA command issued to a 3271 or 3275, or by a WSF command issued 
to a 3271, 3275, on 3274 Model 1C (without WSF capability) . 

9. Request maintenance on the malfunctioning device. After repair, 
try to reconstruct the screen buffer image (using an erase/write 
command to correct a missing or multiple cursor condition in the 
buffer) . Retry the failing chain of commands as in the previous 
action. 

10. Request maintenance on the malfunctioning device (the "from" device 
specified in the copy command). After repair, try to reconstruct 
the screen buffer image (using an erase/write command to correct a 
missing or multiple cursor condition in the buffer). Retry the 
failing chain of commands as in the previous action. 

11. If a new printout is required, take action 6. The error occurred 
during a printout and indicates either a character generator 
readout error or a print mechanisir hang. There is no data error. 

12. If a new printout is required, take action 4. 

13. Periodically issue a specific poll (ncnswitched) or read (switched) 
to obtain the Device End indication that is sent by the device to 
the TCU when the device goes not busy. 

14. periodically issue a specific poll (nonswitched) or read (switched) 
to obtain the Device End indication that is sent by the device to 
the TCU when the device goes not busy. Take action 4. 

15. Do the same as in action 14, except take action 1 when the "from" 
device specified in the copy command goes not busy. 

16. If the failing command is (Da write command with a data stream or 
more than one byte or (2) one of a chain of commands that contains 
a previous write command without an SEA order immediately following 
the WCC, take, action 4. Otherwise, take action 3. If the problem 
is still not corrected, take action 9. 

17. An unauthorized attempt was made to copy data from a device. The 
device address in the error status message is the address of the 
"to" device specified in the copy command. 
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18. Do not take any action; this is net an error condition. This code 
signals that a previously detected busy device has gone not busy, a 
previously detected not ready device has gone ready, or a previous- 
ly detected not available device is now available. The device end 
bit may be set alone or with other error tits. 

19. This condition occurs if the operator of a formatted 3277 has 
performed a backtab or erase input in rapid succession. Ig- 
nore Device End and treat the condition as Device Busy only. 
Take action 13. 



Error Condition 
Sense/Status Bytes | Bit(s) Set 
X'UOSO' I IR 



I 



l- 



X'4060 



,1 



X'ttOCl' 
X'ttOC2' 



| CR 

4 

I oc 






x'ttocu* 

X f 40C6' 



XMODl* 



| CC 

| CC, OC 



DC 



| DC, OC 



I IR, OC 



Unit(s) 
3271, 327S 



3271, 3275 
3271, 3275 






3271 
3271 






3271, 3275 



+- 



3271 



~+ 



3271 



Suggested 
Action 

6 

8 

8 
4 



2 






X'4A40' 



X* l»C40' 



DB, DE 



3271 



| DB, US 



3271, 3275 



-+ 



19 
14 



X'4E40* 



| DB, US, DE 



3271, 3275 



I 



X'CIUO' 



X'C240' 



X'C250' 



| TC 



3275 



16 



DE 



3271, 3275 



| IR, DE 



3271, 3275 



-+. 



18 
6 



X'C2C4' 



•DC, DE 



3271, 3275 



X'C2C8' 



| EC, DE 



3275 



11 



X'C2D8* 



IR, EC, DE 



3275 



11 



X'CUCl' 



OC, US 



3271 



17 



X'CUCU' 



DC, US 



3271, 3275 



H- 



X*C4C5' 



X'C6C4' 



X'C6C8' 



DC, OC, US 



3271 



DC, US, DE 



3271, 3275 



| EC, US, DE 



3271 



12 
11 






X'C6D8' 

x'csuo' 



TR, EC, US, CE 



3271 



Db 



3271, 3275 



11 
13 



X'C8C1 ' 



DB, OC 



3271 



15 



4- 

May be caused by the EWA command issued to a 3271 or 3275, or by 
a WSF command issued to a 3271, 3275, or 3274 Model 1C (without 
Write Structured Field capability) . 

Figure 114. Suggested Actions According to Remote 3270 Error Status 
Message 
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BTAM ABEND CODES 

090 Explanation ; The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found that a device other than a communications 
device was allocated to the data control block (DCB) being opened; 
that is, the device class code in the unit control block (UCB) for 
the device allocated to the data control block was not equal to 
hexadecimal 40. 

Programmer Response ; Either the UNIT parameter of the DD state- 
ment for the communications device is incorrect or unit control 
block generated during system generation is invalid. Check for 
improper specification of the UNIT parameter of the DD statement 
or the UNIT operand of the IODEVICE macro instruction. After 
correcting the error, execute the jofc step again. If the problem 
recurs, do the following before calling IBM for programming 
support: 

• Make sure that MSGLEVEL=(1, 1) was specified in the JOB state- 
ment and that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 

091 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found an invalid or unsupported type of transmis- 
sion control, unit specified in the unit control block (UCB) for 
the device allocated to the data control block (DCB) being opened. 

Programmer Response : Check for improper specification of the 
IOCONTRL macro instruction used in generating the system. After 
correcting the error, execute the jot step again. If the problem 
recurs, do the following before calling IBM for programming 
support : 

• Make sure that MSGLEVEL= (1,1) was specified in the JOB state- 
ment, and that a SYSABEND DD statement was included for the 
failing job step. 

• Have th*e associated job stream and program listing available. 

09 2 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found an invalid or unsupported type of terminal 
control or terminal adapter specified in the unit control block 
(UCB) for the device allocated to the data control block (DCB) 
being opened. 

Programmer Response : Check for improper specification of the 
ADAPTER operand in the IODEVICE macro instruction used in generat- 
ing the system. Correct the error and execute the job step again. 
If the problem recurs, do the following befor calling IBM for pro- 
gramming support: 

• Make sure that MSGLEVEL= (1, 1) was specified in the JOB state- 
ment, and that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 
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093 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found an invalid or unsupported type of terminal 
specified in the unit control block (UCB) for the device allocated 
to the data control block (DCB) being opened. 

Programmer Response ; Check for improper specification of the UNIT 
operand in the IODEVICE macro instruction used in generating the 
system. Correct the error and execute the job step again. If the 
problem recurs, do the following before calling IBM for program- 
ming support: 

• Make sure that MSGLEVEL=(1, 1) was specified in the JOB state- 
ment and that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 

09U Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found an invalid or unsupported optional feature 
or mode of operation specified in the unit control block (UCB) for 
the device allocated to the data control block (DCB) being opened. 

Programmer Response : Check for improper specification of the FEA- 
TURE operand in the IODEVICE macro used in generating the system. 
Correct the error and execute the job step again. If the problem 
recurs, do the following before calling IBM for programming 
support : 

• Make sure that MSGLEVEL= (1,1) was specified in the JOB state- 
ment and that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 

095 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found that the lines allocated to the line group 
did not have identical types of terminals or lines, or that the 
terminals did not have the identical features. 

Programmer Response : Determine which line group contains dif- 
ferent types of terminals or lines and redefine its lines through 
DD statements or a new system generation. If the problem recurs, 
do the following before calling IBM for programming support: 

• Make sure that MSGLEVEL= (1,1) was specified in the JOB state- 
ment and that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 

096 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine found that dynamic buffer allocation had been 
specified in the DCBBFTEK field of the data control block (DCB) . 
However, the Open routine could not dynamically allocate buffers 
because the data control block specified neither the address of a 
buffer pool control block (in the DCBBUFCB field) nor the number 
and length of the buffers (in the DCBBUFNO and DCBBUFL fields). 

Programmer Response : Correct the error by (1) providing a buffer 
pool and specifying the address of its control block in the 
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DCBBUFCB field, (2) specifying the number and length of the buf- 
fers in the DC3BUFN0 and DCBBUFL fields, or (3) handling buffering 
in the user program and deleting the BFTEK=D operand in the DCB 
macro instruction or the DCB parameter of the DD statement. Then 
execute the job step again. If the problem recurs, do the follow- 
ing before calling IBM for programming support; 

• Make sure that MSGLEVEL=(1,1) was specified in the JOB state- 
ment and that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 

097 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

An Open routine required an additional entry in the device I/O 
directory; however, the directory was already full. Since the 
last system start, the maximum number of device types have been 
allocated. Normally, the maximum number is 16 (30 for VS2 
Release 2) . 

Programmer Response : Do the following before calling IBM for pro- 
gramming support: 

• Make sure that MSGLEVEL=(1,1) was specified in the JOB state- 
ment and that a SYSABEND DD statement was included for the 
failinq job step. 

• Have the associated job stream and program listing available. 

098 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. 

Although Dual Communication Interface B or Dual code Feature B was 
specified m the data control block (DCB), the transmission con- 
trol unit is not an IBM 2701 or the unit control block (UCB) esta- 
blished at system generation time did not specify that the 2701 is 
equipped with the Dual Communication Interface or Dual Code 
feature. 

Programmer Response : Probable user error. Correct the DCB macro 
that defined the data control block that erroneously specified the 
Dual Commurication Interface B or Dual Code B, reassemble, and 
re-execute the job step. If the problem recurs, do the following 
before calling IBM for programming support: 

• Make sire that MSGLEVEL= (1,1) was specified in the JOB state- 
ment ard that a SYSABEND DD statement was included for the 
failing job step. 

• Have the associated job stream and program listing available. 

099 Explanation : The error occurred during execution of a BTAM OPEN 
macro instruction. An OPEN routine found that dynamic buffering 
was being initiated while the BTAM application was running in 
virtual mode. Dynamic buffering is not supported for virtual 
mode in VS2 Release 2. 

Programmer Response : Specify ADDRSPC=REAL in the JCL JOB or EXEC 
statement and rerun the job. 
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APPENDIX D: SYSTEM GENERATION MACRO INSTRUCTIONS 



This appendix explains the operands that 
roust be included in the system generation 
macro instructions when generating an 
operating system that includes BTAM. Only 
those macro instructions and operands 
directly related to BTAM are given; for 
other macro instructions required for 
generating a system and an explanation of 
the generation process, see the 0S/VS1 or 
OS/VS2 system generation reference manual. 
In particular, refer to explanations of the 
DATAMGT, and IODEVICE macro instructions. 



DATAMGT Macro Instruction 

DATAMGT causes one or more optional access 
methods to be included in your operating 
system. To include BTAM, code: 



r t t 1 

| Name J Operationl Operand | 

l_* + + .j 

| | DATAMGT |.ACSMETH=BTAM | 

« JL X J 



IODEVICE Macro Instruction 

IODEVICE describes to the operating system 
the characteristics of an input/output 
device and its operating system require- 
ments. For BTAM, IODEVICE identifies the 
type of device, that is, remote station, 
that is connected to a communications line, 
or the type of line configuration and the 
type of transmission control unit (TCU) . 
You therefore code one IODEVICE macro for 
each line, regardless of how many remote 
stations are connected to the line. For 
BTAM support for the local 3270 display 
system, IODEVICE identifies the type of 
local 3270 device connected to a 3272 con- 
trol unit. You code one IODEVICE macro for 
each local 3270 device. 

To use BTAM Prepare to Read support, an 
I/O generation must include local 3270 
devices with Prepare to Read capability. 
Prepare to Read capability is indicated 
by specifying PTREAD on the FEATURE op- 
erand. FEATURE=PTREAD applies only to 
displays and printers attached to 3274 
Model ID Control Units. 



CAUTION ; Even though an access method has 
been previously specified in a complete 
system generation, device-dependent code 
cannot be added to access method support 
merely by doing an I/O generation for the 



device. A complete system generation is 
required if BTAM device support for the 
local 3270s being added to the system is 
desired. 

Only the operands shown are applicable 
for a BTAM system. 



r t t 1 

| Name | Operation | Operand | 

j. + + 4 

[ symbol ] | IODEVICE | UNIT=type , 

I ADDRESS=addr ess , 
|TCU=type, 
I MODEL=model , 
| ADAPTER=type 
| [,FEATURE=( feature*, 
| f eature 2 , . . . ) 1 
| [,SETADDR=typel 
| [,OBRCNT=n] 
L i J. J 



UNIT 



specifies the type of remote terminal 
(start- stop) or type of line confi- 
guration (BSC) associated with the 
line address given by the ADDRESS 
operand. For the local 3270 display 
system, specifies the type of local 
device with the device address given 
by the ADDRESS operand. Valid UNIT 
parameters are: 

• For start- stop: 

1030 

1050 

1060 

2260 

2740 

2741P (2741 using PTTC code) 

2741C (2741 using Correspondence 

code) 
33B3 
115 A 
TWX 

WTTA (World Trade Telegraph 
Terminals) 

• For BSC: 

BSC1 (for nonswitched point-to-point 

line) 
BSC2 (for switched point-to-point 

line) 
BSC3 (tor nonswitched multipoint 

line) 
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• For local 3270 display system: 

3277 
3284 
3286 



ADDRESS 

specifies the 
the line over 
tion given by 
For the local 
specifies the 
the local 327 
UNIT operand, 
within the ra 
(hexadecimal) 



three-digit address of 
which the type of sta- 
UNIT is to communicate. 
3270 display system, 
three-digit address of 

device given by the 
Valid parameters are 

nge 000-6 FF, inclusive 



TCU 



specifies the type of transmission 
control unit: 2701, 2702, or 2703. 



Notes : If an IBM 3705 Communications Con- 
troller with an Emulation Program is 
attached, the control unit definition in 
the IODEVICE macro instruction remains TCU= 
2701, TCU=2702, or TCU=2703, as appropri- 
ate. Certain features of the 2701, 2702, 
and 2703 are not supported by the 3705 Emu- 
lation Program; these features are listed 
in IBM 3705 Communications Controller Emu- 
lation Program Generation and Utilities, 
Guide and Reference Manual . GC30-3002- 



MODEL 

specifies whether the local 3270 
device given by the UNIT operand is a 
model 1 (480-character buffer) or 
model 2 (1920-character buffer). Code 
MODEL=l or MODEL=2. 

Note : The MODEL operand applies only 
to the local 3270 display system. 
Only model 1 devices (3277, 3284, 
3286) may be connected to a model 1 
3272 control unit. Model 1 or model 2 
devices or both may be connected to a 
model 2 3272 control unit. 

ADAPTER 

specifies the type of TCU terminal 
control and terminal adapter asso- 
ciated with the line address given by 
the ADDRESS operand. Code one of the 
following values: 

IBM1 

for IBM 1050, 1060, 2740 or 2741 com- 
municating with: 

• IBM 2701 tnrough an IBM Terminal 
Adapter, Type I , and either: (1) an 
appropriate data set, or (2) an IBM 
Line Adapter. 



• IBM 2702 or 2703 through an IBM Ter- 
minal Control, Type I, and either: 
(1) a Data Set Line Adapter and an 
appropriate data set, or (2) an IBM 
Line Adapter. 

IBM2 

for IBM 1030 communicating with: 

• IBM 2701 through an IBM Terminal 
Adapter, Type II, and either: (1) 
an appropriate data set, or (2) an 
IBM Line Adapter. 

• IBM 2702 or 270 3 through an IBM Ter- 
minal Control, Type II, and either: 

(1) a Data Set Line Adapter and an 
appropriate data set, or (2) an IBM 
Line Adapter. 

IBM3 

for IBM 2260/28 48 communicating with: 

• IBM 2701 through an IBM Terminal 
Adapter, Type III and an appropriate 
data set. 

IBMT 

for IBM 1050 communicating with: 

• IBM 2701 through an IBM Telegraph 
Adapter. 

• IBM 2703 through an IBM Terminal 
Control, Type I, and a Telegraph 
Line Adapter. 

TELE1 

for AT6T 83B3 or Western Union 11 5A 
communicating with: 

• IBM 2701 through a Telegraph Adapt- 
er, Type I. 

• IBM 2702 or 2703 through a Telegraph 
Terminal Control, Type I, and a 
Telegraph Line Adapter. 

TELE2 

for WU TWX (Model 33 or 35) communi- 
cating with: 

• IBM 2701 through a Telegraph Adapt- 
er, Type II, and an appropriate data 
set. 

• IBM 2702 or 2703 through a Telegraph 
Terminal Control, Type II, and a 
Data Set Line Adapter and an appro- 
priate data set. 
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TELEW 

for World Trade Telegraph terminal 
communicating with: 

• IBM 2701 through a World Trade Tele- 
graph Adapter. 

• IBM 2702 or 2703 through a World 
Trade Telegraph Adapter and a Tele- 
graph Line Adapter. 

BSCA 

for IBM System/370, System/3, 1130, 
1800, 2715, 2770, 2780, or 2972 com- 
municating with: 

• IBM 2701 through a Synchronous Data 
Adapter, Type II, and an appropriate 
data set. 

• IBM 2703 through a Synchronous Ter- 
minal Control and an appropriate 
data set. 
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FEATURE 

specifies certain optional features 
with which the transmission control 
unit (TCU) or remote station is 
equipped. For the local 3270 display 
system, specifies certain features 
with which the local 3270 display sta- 
tion is equipped. Code each of the 
applicable parameters: 

AUTOCALL 

if the TCU (2701, 2702, or 2703) to 
which the remote station is connected 
is equipped with the Autocall feature 
and the line is connected to the TCU 
terminal adapter by means of an Auto- 
matic Calling Unit and an appropriate 
data set. When these conditions are 
met, and you specify AUTOCALL, the 
channel programs generated for the 
line whose address is specified by the 
ADDRESS operand can automatically dial 
the remote stations, using the tele- 
phone number you specify in the ter- 
minal list associated with the line. 

AUTOANSR 

if the data set (modem) connecting the 
access line specified by the address 
operand to the TCU is a switched line 
over which calls are to be answered. 
AUTOANSR must be coded regardless or 
whether the line is equipped with an 
automatic answering unit. When you 
specify AUTOANSR, the channel progrfims 
generated for the specified line will 
automatically initiate message trans- 
mission when a remote station calls 
the computer. 

AUTOPOLL 

if the automatic polling facility of 
the TCU is to be used. Thiu facility 
is a standard feature of the IBM 27 03, 
and an optional feature (called Auto 
Poll) of the IBM 2702. For the IBM 
2701, this parameter is valid only for 
lines connected through the Synch- 
ronous Data Adapter Type II. If you 
specify AUTOPOLL, the Read Initial 
channel programs generated for the 
specified line will be so arranged 
that a negative response from a remote 
station causes the TCU to automatical- 
ly poll the next station in the ter- 
minal list without signalling an I/O 
interrupt. If you omit AUTOPOLL, Read 
Initial operations will employ pro- 
grammed polling with each negative 
response from a remote station causing 
an I/O interrupt. Only those Read 
Initial operations that send polling 
characters are affected. 

This parameter is valid only for non- 
switched multipoint lines to which are 
connected the IBM 1C30, 1060, 1050, 
2740, or any BSC stations, (as speci- 
fied by the UNIT operand) , as only 



these types of stations can be polled 
using the Auto Poll facility. The 
AUTOPOLL operand must be coded for BSC 
stations on multipoint lines, and may 
be coded for the foregoing start-stop 
terminals. 

If UNIT=27U0 is specified, you must 
also code in the FEATURE operand, 
either SCONTROL or SCONTROL and CHECK- 
ING (in addition to the AUTOPOLL 
parameter) . 

DUALCOMM 

if the TCU (IBM 2701 only) to which 
the line specified by ADDRESS is con- 
nected is equipped with the Dual Com- 
munication Interface special feature. 
This feature allows program selection 
(in the DCB macro) of either of two 
data sets (modems) over which trans- 
mission is to occur (BSC lines only) . 

DUALCODE 

if the TCU (IBM 2701 only) is equipped 
with the Dual Code special feature. 
This feature allows program selection 
(in the DCB macro) of the transmission 
code to be used on the communication 
line (BSC lines only). 

For IBM 274 Terminals only: 

CHECKING 

if UNIT=27U0 is specified and the ter- 
minal is equipped with the Record 
Checking special feature. 

SCONTROL 

if UNIT=2740 is specified and the ter- 
minal is equipped with the Station 
Control special feature. This para- 
meter and the AUTOCALL, AUTOANSR, OIU, 
and XCONTROL parameters are mutually 
exclusive. 

XCONTROL 

if UNIT=2740 is specified and the ter- 
minal is equipped with the Transmit 
Control special feature and the Dial 
Up special feature. You also must 
indicate the Dial-up special feature 
in the FEATURE operand by the AUTOCALL 
or AUTOANSR parameter, or both, as 
appropriate. This parameter and the 
OIU parameter are mutually exclusive. 



OIU 



if the UNIT=2740 is specified the ter- 
minal is equipped with an IBM 2760 
Optical Image Unit. This parameter 
and the SCONTROL and XCONTROL parame- 
ters are mutually exclusive. 



For Local 3270 Devices Only: 

• One of the following cnaracter genera- 
tor options: 
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DOCHAR 

if the device has a domestic monocase 
character generator. If the FEATURE 
operand is not coded, this value is 
assumed. 

ASCACHAR 

if the display station has an ASCII A 
monocase character generator. 

ASCBCHAR 

if the display station has an ASCII B 
monocase character generator. 

FRCHAR 

if the device has a French monocase 
character generator. 

GRCHAR 

if the device has a German monocase 
character generator. 

KACHAR 

if the device has a Katakana monocase 
character generator. 

UKCHAR 

if the device has a United Kingdom 
monocase character generator. 

• One of the following keyboard options 
(if a keyboard is present) : 

EBKY3277 

if the display station has an EBCDIC 
typewriter keyboard. 

ASKY3277 

if the display station has an ASCII 
typewriter keyboard. 

DEKY3277 

if the display station has a data 
entry keyboard. 

OCKY3277 

if the display station has an opera- 
tor console keyboard. 

• One of the following keyboard options 
(if a keyboard is present) : 

KB66KEY 

if the display station has a 66-key 
keyboard (that is, has no program 
function keys) . 

KB78KEY 

if the display station has a 78-key 
keyboard (that is, has program func- 
tion keys) . 

KB70KEY 

if the display station has a Katakana 
character generator and a 70-key data 
entry keyboard. 



KB81KEY 

if the display station has a Katakana 
character generator and an 81-key 
EBCDIC typewriter keyboard. 

• As many of the following options as 
required: 

SELPEN 

if the display station has a selector 
pen. 

NUMLOCK 

if the display station has the numer- 
ic lock feature. 

AUDALRM 

if the display station has a keyboard 
and an audible alarm. 

MAGCDRD 

if the display station has a magnetic 
card reader adapter. 

PTREAD 

if the device is attached to a 3274 
Model ID Control Unit. This operand 
applies to 0S/VS1 and 0S/VS2 MVS 
operating systems; it is not applic- 
able to displays and printers attach- 
ed to 3272 and 3274 Model IB 
Control Units. 

SETADDR 

specifies which of the four Set 
Address (SAD) commands is to be issued 
to the transmission control unit (IBM 
2702 only) for operations on the line 
specified by the ADDRESS operand. The 
SAD command selects the appropriate 
line speed for the type of terminal 
connected to the line. The associa- 
tion between the specific command 
(Sadzer, Sadone, Sadtwo, or Sadthree) 
and the corresponding line speed is 
established by internal connections 
within the 2702; this is done by the 
customer engineer when the 2702 is 
installed. You must code this operand 
if the TCU to which the line is con- 
nected is a 2702; if it is a 2703, the 
SAD commands will be ignored. Do not 
code this operand if the TCU is a 
2701, as a command reject will be sig- 
nalled when the line group is opened. 



Code: 



If the SAD command for 





the line is: 





Sadzer 


1 


Sadone 


2 


Sadtwo 


3 


Sadthree 
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OBRCNT (For IBM 2715 Transmission Control 

Unit only) 

specifies the number of area stations 
connected to the 2715s on the line 
represented by the IODEVICE macro. 
(This value is used to compute the 
space required on SYS1.L0GREC for 
error data received from the 2715.) 
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APPENDIX E: CODE CHARTS FOR BSC AND THE LOCAL 3270 DISPLAY SYSTEM 



This appendix includes code charts for EBCDIC, USASCII, and six-bit TRANSCODE. 



Six Bit Transcode 



Standard Representation of USASCII 



c 



Code Positions • 



2 3 4 5 


1 

10 

11 

10 

10 1 

110 

111 

10 

10 1 

10 10 

10 11 

110 

110 1 

1110 



1 


1 


1 


1 


o 


1 


1 


1 1 




SOH 
12-9-1 


& 
12 


11 






A 
12-1 


J 
11-1 


/ 
0-1 


1 
1 


B 
12-2 


K 
11-2 


s 

0-2 


2 
2 


C 
12-3 


L 
11-3 


T 
0-3 


3 
3 


D 
12-4 


M 
11-4 


U 
0-4 


4 

4 


E 
12-5 


N 
11-5 


V 
0-5 


5 
5 


F 
12-6 


O 
11-6 


W 
0-6 


6 
6 


G 
12-7 


P 
11-7 


X 

0-7 


7 
7 


H 
12-8 


Q 
11-8 


Y 
0-8 


8 
8 


1 
12-9 


R 
11-9 


Z 
0-9 


9 
9 


STX 
12-9-2 


SPACE 
No Punch 


ESC 
0-9-7 


SYN 
9-2 


12-8-3 


$ 

11-8-3 


6-8-3 


# 

8-3 


X 

12-8-4 


11-8-4 


% 
0-8-4 


8-4 


BEL 
9-7 


US 
11-9-8-7 


ENQ 
0-9-8-5 


NAK 
9-8-5 


SUB 
9-8-7 


EOT 
0-9-8-7 


ETX 
12-9-3 


EM 
11-9-8-1 


ETB 
0-9-6 


DLE 
12-11-9-8-1 


HT 
12-9-5 


DEL 
12-9-7 



Rows 


Columns 





1 


2 


3 


4 


5 


6 


7 




b 7 b 6 b 5 


000 


001 


010 


011 


100 


101 


110 


HI 




b 4 b 3 b 2 b l 
























NUL 


DLE 


SP 





@ 


P 


\ 


P 


1 


1 


SOH 


DC1 


i 


1 


A 


Q 


o 


q 


2 


10 


STX 


DC2 


» 


2 


B 


R 


b 


r 


3 


11 


ETX 


DC3 





3 


C 


S 


c 


s 


4 


10 


EOT 


DC4 


S 


4 


b 


T 


d 


t 


5 


10 1 


ENQ 


NAK 


% 


'- 5 


E 


U 


e 


u 


6 


110 


ACK 


SYN 


& 


6 


F 


V 


f 


V 


7 


111 


BEL 


ETB 


■ 


7 


G 


w 


g 


w 


8 


10 


BS 


CAN 


( 


8 


H 


X 


h 


X 


9 


10 1 


HT 


EM 


) 


9 


1 


Y 


i 


y 


10 


10 10 


LF 


SUB 


* 




J 


Z 


i 


z 


11 


10 11 


VT 


ESC 


+ 


; 


K 


C 


k 


{ 


12 


110 


FF 


FS 


/ 


< 


L 


\ 


l 


1 


13 


110 1 


CR 


GS 


- 


= 


M 


1 


m 


] 


14 


1110 


SO 


RS 


• 


> 


N 


A 


n 


~ 


15 


1111 


SI 


US 


/ 


? 


O 


_ 


o 


DEL 



Data Link Control Functions 





Characters Used In: 




Function 


EBCDIC 


USASCII 


TRANSCODE 


ACK-0 


DLE, X'70 1 


DLE, 


DLE, - (hyphen) 


ACK-1 


DLE, X'61' 


DLE, 1 


DLE, T 


WACK 


DLE, X'6B' 


DLE, ; 


DLE, Z 


RVI 


• DLE, X'7C 


DLE, < 


DLE, 2 
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EBCDIC 



Bit Positions 

ond 1 — *■ 


00 


01 




Bit Poiitlons 
2 ond 3— 


00 


01 


10 


11 


00 


01 


10 


11 






0000 


NUT 


® 

DLE 


® 
OS 


© 


^ 


~@ 


_<S| 


® 






0001 


SOH 


dci 


SOS 








ft 




1 


1 


0010 


STX 


DC2 


FS 


SYN 










2 


«o 


0011 


ETX 


DC3 














3 


•i 


0100 


PF 


RES 


BYP 


PN 










4 


1 


0101 


HT 


NL 


LF 


RS 










5 


S 


0110 


LC 


BS 


EOB 


UC 










6 




0111 


DEL 


IL 


PRE 


EOT 










7 




1000 




CAN 














8 






9 
12 


9 
11 


9 




9 


9 
12 




9 
12 
11 


9 

11 




9 
12 
11 








■ ; 


Zona P 


unches 







1 



Bit Positions 
ond 1 — ■*■ 
Bit Positions 
2 and 3— ♦ 



10 


11 


00 


01 


10 


11 


00 


01 


10 


11 





0000 













® 


© 


o® 


8-1 




0001 


a 


j 






A 


J 


<S> 


1 


1 




0010 


b 


k 


s 




B 


K 


S 


2 




■o 

s 


0011 


c 


i 


t 




C 


L 


T 


3 




■o 
<n 

o 


0100 


d 


m 







D 


M 


U 


4 




0101 


• 


n 


V 




E 


N 


V 


5 




£ 


0110 


f 


o 


w 




F 


O 


W 


6 






0111 


9 


P 


X 




G 


P 


X 


7 






1000 


h 


9 


y 




H 


Q 


Y 


8 


8 




1001 


i 


r 


z 




I 


R 


Z 


9 


9 


























12 



12 
11 


11 




12 

11 




12 


11 













Zona Punch* 








p 










~1 





Bit Positions 
Oondl— - 




00 


01 




Bit Positions 
2 and 3— •> 


00 


01 


10 


11 


00 


01 


10 


11 






1001 




EM 














8-1 


rs 

1 
«o* 


1010 


SMM 


CC 


SM 




c 


! 


© 




8-2 


1011 


VT 


CU1 


CU2 


CU3 




$ 




I 


8-3 


i 

2 

m 


1100 


FF 


IFS 




0C4 


< 


* 


% 


<@> 


8-4 


1101 


CR 


IGS 


ENQ 


NAK 


( 


) 




• 


8-5 


1110 


SO 


IRS 


ACK 




+ 


, 


> 


* 


8-6 




1111 


SI 


IUS 


BEL 


SUB 


1 


- 


? 


« 


8-7 


























9 
12 


9 

11 


9 



9 


12 


11 













Zona Punches 




















' 





Q 12- 0-9-8-1 ® 12-11-0-9-8- 

12-11-9-8-1 No Punches 

11- 0-9-8-1 12 



| USASCII 


EBCDIC Equivalents 


1 


J RS 


IRS 




1 ETB 


EOB 




! ESC 


PRE 




L_"__ 


IFS 


. 1 



Bit Positions 

and 1 — ♦ 


10 


11 




Bit Positions 
2 and 3— *• 


00 


01 


10 


11 


00 


01 


10 


11 




N. 


1010 


















8-2 


6 


1011 


















8-3 


v< 

8 
t o 


1100 


















8-4 


1101 


















8-5 


1 


1110 


















8-6 


i£ 


mi 


















8-7 






12 



12 

11 


11 




12 

11 




9 
12 




9 
12 
11 


9 

11 




9 
12 
11 












ZoneF 


unche 


i 









11 (j^ 11-0 @ 0- 1 

12-11-0 (jj) 0-8-2 © 11-0-9-1 

12- @ (g) 12-11 



E-2 OS/VS BTAM SRL 



APPENDIX F: WORLD TRADE TELEGRAPH TERMINALS: TRANSLATION TABLE MODIFICATIONS 



Because the International Telegraph Alpha- 
bet No. 2 and the Figure Protected Code 
ZSC3 (See Figure 115) vary from country to 
country, the BTAM-supplied translation 
tables RCTW, RCT3, SCTW, and SCT3 may not 
fit a given installation. Therefore, four 
macro instructions, TRSLRCTW, TRSLRCT3, 
TRSLSCTW, and TRSLSCT3 are provided to 
modify these tables to produce new tables 
for use with the TRNSLATE macro instruc- 
tion. These macros both modify the tables 
and cause them to be assembled into the 
user program, so it is not necessary to use 
the ASMTRTAB macro instruction. 



will be specified in the TRNSLATE 
macro instruction) . If symbol is 
omitted, the original name, IECTRCTW 
or IECTRCT3, is the name of the modi- 
fied table. 



TRSLRCTW 

specifies that table RCTW is to be 
modified and assembled. 

TRSLRCT3 

specifies that table RCT3 is to be 
modified and assembled. 



TRSLRCTW and TRSLRCT3 Macro Instructions 

f T T 1 

| Name | Operation (Operand | 

, x x < 

J symbol | { TRSLRCTW 1 | Fx=code, ... | 

I | ( TRSLRCT3 J | | 

L X X I 

symbol 

is the name to be given to the modi- 
fied table (that is, the name that 



Fx=code 

specifies what modification is to be 
made. F stands for figures shift, x 
represents the number of the code com- 
bination to be translated. The per- 
missible values of x are: 

For TRSLRCTW: 1, 28 3, 6, 7, 8, 10 
through 14, 19, 22, 24, 26, and 32. 

For TRSLRCT3: 1, 5, 8, 9, 11, 12, 14, 
15, 17 through 20, 22, 24, 26, and 32. 





Code 


Elements 


Lettershift 


F 


igureshift 






Combination 
No. 


12 345 












Hex 
Code 


Character 


Hex 
Code 


Charocfer 


ITA2 


2SC3 




1 


11 000 


18 


A 


38 








2 


10 Oil 


13 


B 


33 


•> 


6 




3 


oi no 


0E 


C 


2E 




8 




4 


10 010 


12 


D 


32 


Who or 


e you 




5 


10 000 


10 


E 


30 


3 


- 




6 


io no 


16 


F 


36 


N A 


4 




7 


oi on 


0B 


G 


28 


N/A 







8 


00 101 


05 


H 


28 


N/A 


■> 




9 


01 100 


OC 


1 


2C 


8 


Bell 




10 


11 010 


1A 


J 


3A 


Bell 


2 




11 


n no 


IE 


K 


3E 


( 


( 




12 


01 001 


09 


L 


29 


) 


) 




13 


00 111 


07 


M 


27 




7 




14 


oo no 


06 


N 


26 








15 


oo on 


03 


O 


23 


9 






16 


01 101 


0D 


P 


2D 





9 




17 


11 101 


ID 


a 


3D 


1 


N/A 




18 


01 010 


0A 


R 


2A 


4 


/ 




19 


10 100 


14 


S 


34 








20 


00 001 


01 


T 


21 


5 






21 


11 100 


1C 


U 


3C 


7 


1 




22 


01 111 


OF 


V 


2F 


-.; 


- 




23 


11 001 


19 


W 


39 


2 


3 




24 


10 111 


17 


X 


37 




N/A 




25 


10 101 


15 


Y 


35 


6 


5 




26 


10 001 


11 


z 


31 


* 


N/A 




27 


00 010 


02 




22 


CR 


CR 




28 


01 000 


08 




28 


LF 


LF 




29 


11 111 


IF 




3F 


LTRS 


LTRS 




30 
31 
32 


n on 

00 100 
00 000 


IB 

04 
00 




3B 
24 
20 


FIGS 
Space 

N/A 


FIGS 
Space 

N/A 




Note: N/A = N 


ot assigned 














CR = Ca 


triage return 














LF = Li 


ne feed 














LTRS = L 


etters shift 














FIGS = F 


igures shift 













Figure 115. World Trade Telegraph Codes 
ITA2 and ZSC3 



Example : If the transmission code used by 
a WT terminal is the International Tele- 
graph Alphabet No. 2, combination 6 in 
figures shift, representing the % charact- 
er, does not exist in table RCTW. There- 
fore, you would modify table RCTW by coding 

TRSLRCTW F6=6C 

where 6C is the hexadecimal representation 
of the % character in EBCDIC. 

TRSLSCTW and TRSLSCT3 Macro Instructions 



r t r 1 

JName |Operation | Operand | 

| symbol | TRSLSCTW |Xyy=Fx,... ( 

| | TRSLSCT3 | | 

i x l ^ J 

symbol 

is the name to be given to the modi- 
fied table (that is, the table name 
that will be specified in the TRNSLATE 
macro instruction. If symbol is 
omitted, the original name, IECTSCTW 
or IECTSCT3, is the name of the modi- 
fied table. 

TRSLSCTW 

specifies that table SCTW is to be 
modified and assembled. 
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TRSLSCT3 

specifies that table SCT3 is to be 
modified and assembled. 

Xyy=Fx 

specifies what modification is to be 
made, yy is the hexadecimal represen- 
tation, in EBCDIC, of the character to 
be translated, x is the number of the 
code combination for the character to 
which yy is to be translated. (F 
stands for figures shift.) The per- 
missible values of yy are : 2A, 3F, 
4A through 50, 5A through 61, 6A 
through 6F, and 7A through 7F. 

Example ; If the transmission code used by 
a WT terminal is the ITA No. 2, and if you 
wish to translate an EBCDIC X character 
(hexadecimal 6C in EBCDIC) to an ITA No. 2 
X character (combination 6 in figures 
shift), you would code: 



TRSLSCTW X6C=F6 

Similarly, if you wish to translate an 
EBCDIC * character (hexadecimal 5C in EBCD- 
IC) to a X character, you would code: 

TRSLSCTW X5C=F6 

And if you wish both the X and * characters 
to be translated to X characters, you would 
code: 

TRSLSCTW X6C=F6,X5C=F6 



Note : You can code the same macro several 
times, each with a different name, to cre- 
ate as many translation tables as needed. 
This permits several terminals using the 
same transmission code, but varying 
character arrangements to operate in the 
same installation. 
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APPENDIX G: BTAM MACRO INSTRUCTION FORMAT CHARTS 



Each operand of each BTAM macro instruction can be coded in one or more ways, as indi- 
cated in the table to the right. Listed below are the meanings of each of the column 
headings in the table. The same information is given for each of the user-table- 
defining macro instructions for the IBM 2715; see the table following the BTAM Macro 
Instructions table. 

Abbrevi at i ons Used in Macro Instruction Tables 



Abbreviation 

Sym 
Dec Dig 



Meaning 

You may code the operand as: 

Any symbol valid in the assembler language. 

Decimal digits, within the range shown in the micro instruction 
description. (The sequence of digits is assembled as a single 
integer, not as individual digits.)* 



Register 



Char 

Dec Char 

Hex Char 

Code 

RX-type 
Rel Exp 

Abs Exp 



Register notation; that is, a number of a general register, enclosed 
in parentheses. You must previously have loaded the specified 
register with the value or address indicated in the operand descrip- 
tion. The value or address must be right- adjusted in the register, 
with all high-order bits set to zero. You may specify registers 
2-12 symbolically (CTREG5) , or with an absolute expression (5). 
Registers and 1 can only be specified absolutely: (0), (1). 

Any character self-defining term, coded without the framing charac- 
ters, C ' . 

Concatenated decimal digits (each digit is individually assembled in 
binary format) . * 

Concatenated hexadecimal digits, coded without the framing charac- 
ters, X' '. 

One of the coded values as given in the individual macro instruction 
description. 

Any address that is valid in an RX-type instruction (e.g., LA). 

A relocatable expression (acceptable as an A-type or V-type address 
constant by the assembler) . 

Any absolute expression as defined by the assembler: self-defining 
terms (decimal, hexadecimal, binary, character), length attributes, 
absolute symbols, paired relocatable terms in the same control sec- 
tion (CSECT) , and arithmetic combinations of absolute terms. 



♦The distinction between Dec Dig and Dec Char may be illustrated by two examples: 

19 coded where Dec Dig is specified is assembled as binary 1 0011; 

19 coded where Dec Char is specified is assembled as binary 0000 0001 0000 1001. 

267 coded where Dec Dig is specified is assembled as binary 1 0000 1011; 267 coded 
where Dec Char is specified is assembled as binary 0000 001 G 0110 0000 0111. 
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BTAM Macro Instructions (1 of 6) 
i t r r t - 



j. + + 4 + 4 + 4 4 + 4 



CHGNTRY 



t 4 4 4 4 4 4 4 4 4 + + 4 4 

listaddr** 

dcbaddr*** 

4 4 4 + 4 4 + 4 4 4 + 4 

listype 

4 4 4 4 4 4 4 4 4 4 j. 4 

list position 

4 4 4 4 + + + + + + 4 4 

numchars** 

4 + 4 4 + _._ + 4 4 + 4 4 4 

action 

4 4 + + + 4 4 + 4 + 4 4 

deb 

MF= 

4 4 4 + + + + + + + + + 

listname 



I 

DCB 



Macro 
Instruction 



ASMTRTAB 



CLOSE 



DFTRMLST 



Operand 



tablename 



DSORG= 

+ + + + + + + 4 + + + + 

MACRF= 

+ + + + + + + ^-. 

DDNAME= 



+ + + + + + + 4 + 4 4 4 



BUFNO= 



BUFL ; 



READYQ=*** 



XX 



yy 



Sym 



-+ + 



4 



4 — 4 — 



Dec 
Dig 



4 



dialchars 
numsent 



Register 



(2-12) 



listype 






dialcount 






(1) 



(0) 



4 — 4 — 4 4 4 4 4 4 4 4 4 4 

BUFCB= 

4 4 4 4 4 4 4 4 4 4 4 4 

EXLST= 

4 4 4 4 4 4 4 4 4 4 4 4 

BFTEK= 

LERB= : 

EROPT= 

DEVD= : 

4 4 4 4 4 4 4 4 

MODE= : 

CODE= : 
J 4 4 4 4 4 4 4 4 



RX- 
type 



Rel 
Exp 



4 4 4 4 4 4 4 4 4 4 4 4 



4 4 4 4 4 4 4 



4 4 



4 4 4 4 4 4 4 

X 
4 ' 



Abs 
Exp 



4 .j 4 



4 4 4 4 4 4 4 4 4 4 

X 



4 4 4 4 4 4 4 4 4 4 

X 



4 



I Dec 
Char J Char 
4 4 



-H + + 



4 4 



4 4 

I 



I 
4 4 



4 

X 

4 

x 
4 4 4 



4 4 

I 
x_ 



Hex 
Char 
4 



4 



4 



4 



Code* 



X 
4 



4 4 



4 



* see macro description for allowable values 
** does not apply to local 3270 display system 
*** applies only to local 3270 display system 
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BTAM Macro Instructions (2 of 6) 

r " -T T T T 



T 

| | Register | | 

| Dec J- r t ^ RX- I Rel 

Sym|Dig| (2-12) | (1)| (0) |type|Exp 



Macro 
Instruction 






DFTRMLST 
(Cont'd) 



nuncnsent 
cntrlseq 



numrec | | X | III I 



I I I ** 
+ + 1. + 

I I I ** 

I I I ** 



AN 
IMD "ill II ~~| ~~| I 



\ + + + + + ™ + 1. 






user length 












LERB 



t 

LOPEN 

ONLTST 



Operand 



sentchar 



tidseq 



ridseq 



AD 



en try length 



idcount 



idsent 



a uth sequence 



user data 



datack 



decbaddr 



— + 



x= 



I X | ill III II I 

X I 



I I 



1 I 



I I 



I X | 



+ 

+ 



I x I 



+ — 



I I 



+ — + + 4 + 



I I 



controlvalue 






I I 



I I 






nlines 111 III I I X 

transmct III 111 I I X 






I I 



intreq 



+ + + + + + + + 1. + + + 



notto III III I I X 

LERPRT Idcbaddr | X | | X | X | 



rln | | | X | | X | | | X 

cid 

CLEARS 



— + + F + + + + 

XI I X I | 



DECB= 






I I 



+ + + + + + + + 

I I X | | | | 
-X X i X ± J 



Abs 

Exp 



I I X | 



+ + i + 



+ 



X 

+ — 

X 



+ — 

X 



Dec | Hex | 
Cha r | Cha r | Char | Code* 






I I I 















I I I I 



* see macro description for allowable values 
**as shown 
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BTAM Macro Instructions (3 of 6) 
r t 1 t- 



T T T T T T T— T~ — T "— ' 



Macro 
Instruction! 



Operand 



Dec 
|Syn|Dig 



"T T 

Register 

T T |RX- |Rel|Abs 

(2-12) I (1) | (0) | type | Exp | Exp | 



I I T 

| Dec | Hex | 
Char I Char I Char I Code* 



DCB= | | | X | | | X | | | | 
j. + + + + + + + + + + + + ., 

AREA= I I I X I I I X I I I | | | 
j. + + + + + + + < + |. .| + 1 

TEXT= J | 

LENGTH= | | 
|. + + + + + + + + + + + + 1 

ENTRY= | | 
j. + 1 + + + + + + + + .+ + H 

RLN= | | 

OPEN | deb | | 

MF= || 
|. + + + + + + 1. + + + 1 + ^ 

listname | | 



READ 

(list form, 

MF=L) 



decbaddr 



I I 



|. + + + + + + + + + + + + ^ 



optype 



I I 



j. + — + — + + — + — j. — h — + — + — + — + — + ^ 

Idcbaddr III III | X | | | | | | 

linoutarea III III I X | | | | | | 

j. + + + + + + + + + + + + 4 



marea 



I I 



j. + + + + + 1. + + + + + + ^ 

outarea | | 



inoutlength | | 
|. + + + + + + + + + + 



inlength 



I I 



I I 



-+ ^ 



j. + — + — + + — + — + — + — + — + — + — ^ + ^ 

outlength | | 
|. + + + + + + + ^ + + + + ^ 

entry | | 
j. + + + + + + + + + + + + ^ 

rln || 

I J I ** 
— + + + + 1 



MF=L I I 



READ 
(Execute 
form, MF=E) 



decbaddr | | 



optype 



I I 






debaddr 



I I 



|. + + + + + + + + + + + + 4 

inoutarea | | | X | | | X | | | | | | , S t 



marea 



S' 



(. + — + — + + + + + — + — + + + + 4 



outarea 



inoutlength | | | X | | | | | X | | | | 'S' 

inlength I I I X | | | | | X | | | | •S i 
« 1 i i 1 I 1 J I i [ L L 1 



i ** as shown 
i 
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BTAM Macro Instructions (4 of 6) 
r r t r *r 



Macro | | | Dec I— 

Instruction! Operand |Sym|Dig|( 

READ | out length | | 

( Cont • d) J- + + +- 

I entry | | 

|rln || 

|MF=E | I 



READ 



| decbaddr 



Register | j j 

r T -J RX- | Rel | Abs 

2-12) | (1)| (0) | type | Exp | Exp 
x + h + + 

X||| I I X 
x x x x x 

X | | | X | | 
j. |. + + + 

X||| I I X 
+ + + + + 

(IIS! 
x + + + + + 



(Standard t + + + + + + + + + 



form) Joptype | | 

| dcbaddr | | 

(inoutarea | | 

| inarea | | 

(outarea | | 

j inoutlength | | 

|inlength \ | 

| outlength | | 

| entry | | | 

Irln III 

RELBUF | dcbaddr | | | 

Ibufferaddr | | | 

REQBUF | dcbaddr | | | 

|returnreg | | | 

| count I | | 

RESETPL | decbaddr 1 | | 

| + x + 

( POLLING | | 

JANSRING j | J 

IATTENT 1 I I 



I I I I I 
+ X + + X 

X||| I X | 
+ + + + X 

X||| | X | 

X + + + + 

X||| I X | 

X||| I X | 

X + + + + 

X||| I I X 

XIII I I x 
+ + X X X 

X||| I I X 
X + + + + 

X||| I X | 
+ + 1- + + 

X||| I I X 

x | X | | X | I 

+ — j. — J. — + — + — 

xill II 

+ — + — + — + — + — 

x I x i I X I I 

+ — + — + — + — + — 

X||| II 

+ — + — + — + — + — 

X I I X I I I X 

+ — + — + — + — + — 

x I x i i I X i 

f""l"""l ^ "( 



I I I I I 
+ — + — I- — + — + — 

til II 



I Dec | Hex | 
Cha r I Cha r j Char j Code* 

I I I 

I I I 

J j | ** 

I I I 
I I I X 

I I I 

I I I 'S« 

I I I f S' 

I I I 

I I I 'S' 

I I I f S' 

I I I 
+ -I + 

I I I 

I I I 

I I I 

I I I 

I I I 
+ + -l + 

I I I 
I I I 

I I I 
+ .j + 

_ l l _ l " 

II I ** 

I I | *¥ 



'_ "" ^ThI0274 L™" T ~" r H" r LI ' ' ' j- ' 

TRNSLATE | dcbaddr | | | X | | | X 

Jtablename | | | X | | | X 

|area I I I X | | | X | 

|. + + + 1. + + +- 

I length | | | X | | X | | 



I 
I 



-+ 

I X 
—x 



+— 
+— 



~+- 

I 
—+■ 

I 

— +- 

I 
— +- 



— +- 
I 

X. 

I 

X. 



I ** 

I 
I 
I 

I 'S' 

X 



i * see macro description for allowable values 
J ** as shown 
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BTAM Macro Instructions (5 of 6) 
r t r t t 



t t T 

| Register | | 

DecJ- T T |RX- |Rel|Abs 

Dig | (2-12) | (1) | (0) | type | Exp | Exp 



TRSLRCT3 | Fnn= | 

TRSLSCTW | Xy v= | 
| + ..l + + 4 + 4 4 + + 4 + + 4 



WAIT j count j 

^ + 4 + + + 4 + + + 4 + + ^ 

ECB= | | | X | X | | X 
|. 4 + + + + 1- + + + + H + 1 

ECBLIST= | 



Macro 
Instruction 






TRSLRCTW 



TRSLSCT3 



TWAIT 



returnreg | 
j. + + + + + 4 + + 4 + + + 4 



WRITE 

(List form, 
MF=L) 



WRITE 
(Execute 
form, MF=E) 



Operand 



|Sym 



Fnn= 



xyy= 



EC B LIST* 



decbaddr 



inlength 



outlength 



entry 



decbaddr 



inarea 



inlength 



I I 



I I 



I I 



I I 



j. + + — + + j. + + 4 4 + ^ + -j 

optype | 
\. + 4 + + + + 4 + 4 4 + + .| 

dcbaddr | 

inoutarea | 

linarea III I I I I X | | | | | | 

out area | 
h 4 + + + + + + + + + + + ^ 

incutlength | 
j. + + 4 4 j. j. 4 + + + + + ^ 



I I 



^ 4 + + + + + + ^__ + + + + + .j 



I I 



|. + ^ + + + j. + + + + 4 + -i 



I I 



I X 



j. + + + ^ + + + + + + + 4 ^ 

rln | 

MF=L III III III I I I ** 



I X | X | | X 
4 4 — 4 4 4 4 4 4 — 4 4 4 4 ^ 

optype I 
f 4 4 4 4 4 4 4 4 4 4 4 4 ^ 

dcbaddr | 
j. 4 4 4 4 4 4 4 4 4 4 4 4 ^ 

inoutarea | 
|. 4 4 4 4 4 4 4 4 4 4 -i 4 4 



I I 



j. 4 4 4 ^ 4 4 4 4 4 4 4 4 ^ 

outarea | 
j. 4 4 4 1. 4 4 4 4 4 4 4 4 4 

inoutlength | | | X | | | | | X | | | | 'S* 
^ 4 4 4 4 4 4 4 4 4 4 4 4 ^ 



/■ 

I * see macro description for allowable value 

I** as shown 

L 



I Dec I Hex | 
Char I Char j Char | Code* 



•S' 



I 'S' 
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BTAM Macro Instructions (6 of 6) 



Macro 
Instruction! 



Operand 



I I 

I |Dec| 

Syro| Dig | 



r r r t t r t 1 

Register I I I I I I I 

T T -JRX- |Rel|Abs| J Dec |Hex | 

(2-12)1 (1) | (0) | type | Exp j Exp | Char | Char | Char jcode* 






WRITE 
(Cont'd) 



outlength | | 



I I X | 






entry 



I I X | 






rln 



I I X 






I WRITE 
(Standard 
form) 



MF=E 



| ** 



4 + — + 1. — + — + + — + + + + + 

decbaddr | X | 



optype 



I I 






dcbaddr 



i X | 



I X | | 



inoutarea | X j 
inarea | X | 



outarea | X | 



inout length 



I I 



I I I 

~ + — + — ^ + 

XI I I i »s 



inlength | X | 



outlength | X | 



I I 



I I X | 






entry 



I X | 



. + + + + + + + ^ 



rln 



4 + ^ + 



I I X | 



J * see macro description for allowable value 

I ** as shown , 

L J 
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2715 User-Table Macro Instructions (Part 1 of 4) 

Register 



Macro 
Instruction 



AS | ID= 

|. x x x x + x x x X + -I x 

ASGROUP= 
J. + + + X + + + ^ X X + X 

DEGROUP* 

tgroupname 

demumber 

ID- 
j. + x x x + x x 

HIGHCTR= 
|. + X X X + X X + X X -| X 

ROUTE* 



ASCTR 






ASLIST 



CONFIGUR 



Operand 



Sym 



LOG j 



AS LOG 



EXTALRM III I 

NEXT AS 



LENGTH= 
data length 
gdiight2 



END ERR* 



Dec 

Dig 



~t — 1 — J — J — 

i i __ i i i j ] > i LJ'JL. 



(2-12) 



J. + — + — + + — X — X — + — X — 



T |rx- |Rel 

(1) | (0) jtypeJExp 



I ** 






device 
j. + + + x x x x + x x -| + 

NORM= 

X 

X 

DIGIT* 

entrypos | | III j j X 

compvalue | | ill } | X 

gdlight3 | | III I I X 

ENTRY= 

MSG= 

INQDISP= 

MODULUS* 

entrypos j | j j j j j X 

data length | | III j | X 

gdlightu | | III | | X 

SELTRAN= 

CORE= 



PC = 

GDU= 

FUNCERR= 



.X X. 



Abs 
Exp 



.—+ x x x_. 

X 



t r t 1 

I I I 

Dec | Hex j j 

Char i Char Char Code* 






i ** as shown 
I 
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2715 User-Table Macro Instructions (Part 2 of 4) 



MONERR= 

+ + + 1 + + + + + _ + + + ^ 

GETID= 

STORID= 
J. + + + + + + + + + + + + ., 

IDCOUNT= 

+ + + + + + + + + + + + ^ 

INQDISP= 



± + + + + + + + + + + + + + ^ 



Macro 
Instruction 



CONFIGUR 
( cont . ) 



CTRGROUP 



ctrno 

sro 

cttest 

ID= 
j. + + + + + + + + + + + + ^ 

SROENAB= 
J. + + + + + + + + + 

CTINIT= 



CTRLIST 



DEVCOD= 
J. __ + + + + + 4 

CTRADR= 



CTRSCHED 



DEULIST 



DISPGUID 



GDUAS 



Operand 



sched 



DIGIT= 
entry pos 
compvalue 



en try pos 
compvalue 



DISPMSG= 
SUPPRES= 



ID= 
GDUNUMB= 



Sym 



Dec 
Dig 



|. + + + + + + + + + 






I. + + + + + + + + + 



Register 



(2-12) 



LENGTH= 
I. + + + + + + + + 



(1) 



-t IRX- 

(0) J type 



y + + — + — + + — + — + + — + — + + + + 4 



t + — + — + + — + — + + — + — + + + + ^ 

CTRRD= 
CTTEST= 
CTROP= 
MSG= 



,. + + + + + + + + + + + + ^ 

MSG= III III I I I x 

I. + — + — + + — + — + + — + — + 4 + + 

MODULUS= 

entrypos III III I I x 

data length III III j j X 

DIGIT2= 



Rel 

Exp 



— + — + — + — ^ + -i 



+ — + — + — + 

X 

+ f + + + + + + + + + + ^ 

X 



+ — + + — + — f — + — + — + — + — + — + 

X 



Abs 

Exp 



Char 



-+ + + 1 



Dec 
Char 



+ + + 



Hex 
Char 



+ + + + 4 



+ + + + 1 



Code* 
., 



+ ^ 



I* see macro description for allowable values 

i , 
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2715 User-Table Macro Instructions (Part 3 of 4) 
r t r t t T" 



Macro 
Instruction 



GDULIST 



PARAMNO= 
j. X X X X X X X + X + + X 

NORGUID= 



DISPMSG= 
\. + X X X + X X X X X X + 

IDENT= 
|. X X + X X + X + + X + X 

MSG= 
|. X X X + X X X X X + X X 

ENTRY= 



Operand 



Sym 



Dec 
Dig 



Register 
j. T r ^ 



(2-12) 



(1) 



(0) 



RX- 
type 



Rel 

Exp 



Abs 

Exp 



Char 



Dec 
Char 



Hex 
Char 



Code* 



GDUTRANS 



TRCODE= 
TRLIST= 



~+ + + 






+ 

+ 



PARAMNUM 



PLN= 



X 

+ 

+ 

X 



— + — 






+ — +~ 
+ — +— 



— I 



PARMLST= 



+ + + + + + + + + + + .| + 



PARMLIST 



CKLNGTH= 
data length 
gdlight 

\- 

CKMONKY= 

CKMODll= 
data length 
entry pos 
gdlight 

CKRANGE= 
f irstpos 
last pos 
comp value 

LOWGUID= 

HIGaiD= 

RNGETST= 
j. 



— + + + + + + + + + 



— + + + + + 



+ 

+ 

+ 



+ 

+ 

+ 



+ 

+ 

+ 



X 
X 
X 

— + 

X 

X 
X 

— + 

X 

— I 

X 

— + 






— + — 



— + — 



— + — 



"I + — 

+ — + — 
— + ^ 



CKMOD1 0= 
data length 
entrypos 
gdlight 
j. + + + 

CKOR= 
data pos 
checkchar 
j. 

ORGJID= 

CKAND= 
st art pos 
endpos 
checkchar 

|ANDGUID= | | | 

J. X -L X X 

I* see macro description for allowable 

L 



—+ + + + + 



X 
X 
X 

X 



X X X 



X 

X X 



— + + + + + + + + + 



-+ + +■ 

I I I 
_X X X. 

values 



.x x x. 

I I X | 

.X X X- 



X 

-+ +" 

I I 

.X X. 
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2715 User- Table Macro Instructions (Part 4 of 4) 
r t t t t 



^ + + + + — + + + + + + + + + ^ 



CKNUM= 

startpos 111 III I I x 
endpos III III 1 1 I x 
gdlight III III I I x 
^ + + + + + + + + + + + + ^ 

TRANSL= 
|. 1 + + |. + + + + + + + + ^ 

IDENT= 
I. + + + + + + + + + + + + + ^ 

| STEND | no operands | | | I I I I I I I I I I 
f + 1 + + 1 + + + + + + + + ^ 



Macro 
Instruction 



PARMLEST 
(cont. ) 



TGROUP 



TRLIST 



Operand 



CKNONUM= 
startpos 
endpos 
gdlight 



TCn= 

tcode 

£ 



asaddr 



Sym 



Dec 
Dig 



Register 



(2-12) | (1)| (0) 



ROUTE= 

+ + + + + + + + 4. + 



TRANSLAT | TRANSCH= 

J. + + + 1. + + + + + + + + 4 

TRANTXT= 
J. + + + + + + + + + + + + + 4 



LOG 
NULL 



TRID= 

+ + + + + + + + + + + + ^ 

X 

^ 

As 
shown 



+ + + + + + + + + + + + 

TEXT= III III III I I I X 

INQDISP= 

+ + 1 + + J. + + + + + + __ 

DEMOD10= 
DEMODll= 

4 — 4 — 4 4 — 4 — 4. 4 4__. + 4 + + 

GDU= III III III I I IX 



RX- 
type 



Rel 

Exp 



Abs 
Exp 



Char 



+ + + 



Dec 
Char 



+ ^ 

As 

shown 
+ + + + + + \ 



Hex 
Char 



Code* 



As 

Shown 
+ 1 



I* see macro description for allowable values 

L 
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APPENDIX H: BTAM CHARACTER SET AND CODE CORRESPONDENCE CHART 



This chart shows the character set and bit 
patterns for the Extended Binary Coded 
Decimal Intercnange Code (EBCDIC), and the 
character sets and transmission code bit 
patterns for each of the remote station 
types supported by BTAM. 

The chart may be used to determine the 
bit patterns , as contained in main storage 
bytes, for each of the various characters 
sent or received by a specific type of sta- 
tion, and to determine the relationships, 
as estaDlished by the arrangement of the 
IBM- provided translation tables, among the 
character sets for the various types. 

For convenience in referring to particu- 
lar chart locations, the Chart's columns 
and rows are given reference numbers. Com- 
bined, these numbers enable reference to a 
particular chart location; for example, 
location 21/17, the intersection of row 21 
and column 17, contains NL. 



Arrangement of Chart 

The chart contains a group of three columns 
for the EBCDIC character set and a group 
for each of the various terminal character 
sets. Within the EBCDIC group, column 3 
contains the 256 bit patterns comprising 
the code. For those bit patterns to which 
characters are currently assigned, the 
characters appear in column 1 (graphics) 
and column 2 (line controls and device con- 
trols) . All currently assigned characters 
are shown, regardless of whether they are 
in the character sets of any of the types 
of remote stations represented in the 
remainder of the chart. 

Each of the remaining groups (columns 4 
through 33) contains the characters com- 
prising the character set of a specific 
station type, along with the transmission 
code bit patterns. Column 34 repeats the 
EBCDIC code presented in column 3, for ease 
of reference. 

In the EBCDIC group, the bit patterns 
and characters are arranged in collating 
sequence from hexadecimal 00 to hexadecimal 
FF. In the remainder of the chart, the 
locations of bit patterns and characters 
are determined by the arrangement of the 
translation tables. 

Character Sets 

This chart shows only the characters com- 
prising the commonly used character set 



options. The options represented in the 
chart are: 

Terminal Option 

IBM 1030 Standard and "H" options 

IBM 1050 System/370 option 

IBM 1060 Standard option 

IBM 2260 Standard option 

IBM 2740 System/370 option 

AT£T 83B3 

"A" and "C options 
WU 115A 

WU TWX Standard option 



IBM 1030 graphics and AT&T 83B3/WU 115A 
graphics that differ for the respective 
options are indicated in the chart by S and 
H, and A and C, respectively. Graphics not 
so marked are the same in both options. 

Transmission Codes 

The notations in the code columns of the 
chart for the various types of stations 
represent the System/370 byte bit pattern 
equivalents of the applicable transmission 
codes. The applicable transmission codes 
are: 

Terminal Code 

IBM 1030 Perforated tape and trans- 
mission code. 

IBM 1050 Perforated tape and trans- 
mission code 

IBM 1060 Perforated tape and trans- 
mission code 

IBM 2260 IBM 2260 transmission code 

IBM 2740 Perforated tape and trans- 
mission code (BCD code) 

AT6T 83B3 5-level Baudot code 

WU 115 A 5-level Baudot code 

AT6T TWX 8- level TWX code 

Representation of Characters and Bit 
Patterns 

Appearance of a character and its asso- 
ciated bit pattern in a character set sig- 
nifies that the appropriate IBM-provided 
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translation tables effect either incoming 
translation (that is, translation of that 
character to the corresponding EBCDIC 
character) , or outgoing translation (that 
is, translation of the corresponding EBCDIC 
character to that character), or both. How 
the bit pattern eippears indicates which of 
these cases applies: 

1 . Where the hexadecimal representation 
of the bit pattern appears in brac- 
kets, only xncoming translation is 
performed. 

2. Where the bit pattern is enclosed in 
parentheses, only outgoing translation 
is performed. 

3. Where the bit pattern is not enclosed 
by brackets or parentheses, both 
incoming and outgoing translation are 
performed. 

Because each unique bit pattern for a ter- 
minal character can be represented only 
once in an "incoming" translation table, 
the character associated with the bit pat- 
tern can be translated to only one EBCDIC 
character. The converse is not true, 
however; any one transmission code bit pat- 
tern can be placed any number of times 
within an "outgoing" table. Therefore, any 
number of EBCDIC characters can be trans- 
lated to the terminal character represented 
by that bit pattern. 

Appearance of two bit patterns opposite 
a single character signifies that the 
character has both an upper-case (or 
figures shift) and a lower-case (or letters 
shift) bit pattern, and that both forms of 
the character are translated to the same 
EBCDIC character. (Exception: In the code 
column for TWX terminals, where two bit 
patterns appear, the left-hand one is the 
even-parity pattern, and the right-hand one 
is the non-parity pattern.) 

Example : The bit pattern of the NL 
character appears in location 21/9. Both 
the lower- and upper-case bit patterns of 
this character are translated to the EBCDIC 
NL character when they appear in an incom- 
ing message. When an EBCDIC NL character 
appears in an outgoing message, BTAM trans- 
lates it to the lower-case form of the NL 
character. 

Where more than one EBCDIC character 
requires translation to the same character 
in a terminal character set, the terminal 
character appears an equivalent number of 
times in the column (for example, locations 
0/23, 6/23, 7/23, 23/23, and 50/23 all con- 
tain the LTRS character) . 

Where a character appears in both the 
graphics and the controls columns for a 



terminal type, its function depends on 
whether it is sent when the line is in con- 
trol mode or in text mode. Depending on 
the type of terminal and the mode, the 
character may perform a control function, 
print as a graphic, or both. For details, 
see the reference manuals for the various 
terminal types. 

Noneguivalent Characters 

Designing the system to accomodate terminal 
types having different character sets and 
control functions has resulted in several 
instances where dissimilar characters have 
been "equated" in translation tables. This 
accounts for the appearance in certain rows 
of this chart of nonequivalent characters, 
for example, in rows 3, 38, and 50. 

In other instances, the same or similar 
functions have different names among the 
various terminal types; for example, HT and 
Tab in row 5 are equivalent, as are DEL and 
Rubout in row 7. In a few cases, terminals 
using the same transmission code have dif- 
ferent meanings assigned to the identical 
bit pattern; for example, bit pattern 79 in 
the transmission code has the meaning PF 
for an IBM 1050, and Subtract for an IBM 
1060. 

Substitutions 

Where blank positions appear in the termin- 
al character set portion of the chart, 
there is no equivalent character for the 
EBCDIC character or bit pattern at the left 
of the chart. Where these blanks appear, 
the SUB character is to be assumed (they 
were omitted to make the chart more read- 
able). That is, in each translation table 
that handles incoming messages, each posi- 
tion representing an invalid transmission 
code bit pattern (that is, one not used by 
a character in the terminal's character 
set) contains the EBCDIC code (3F) for the 
SUB character. In each translation table 
that handles outgoing messages, the trans- 
mission code bit pattern for a substitute 
graphic is contained in each of the follow- 
ing positions: 

• Each position that represents an inva- 
lid EBCDIC bit pattern (a pattern to 
which no EBCDIC character has been 
assigned) . 

• Each position that represents a bit 
pattern for a character having no equi- 
valent in the destination terminal's 
character set. 

For the IBM 1050, 2260, and 2740, and the 
ATST 8 3B3 and WU 115A, this substitute 
character is a colon (:). For the IBM 1030 
and 1060, and the WU TWX, it is a slash 
(/). 
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General Notes 



Control Characters (cont) 



1. Standard abbreviations are used to 
represent the control characters. The 
full names of the characters are given 
in a following section entitled "Con- 
trol Characters." For descriptions of 
these characters, see the reference 
manuals for the various terminals. 

2. Where a "circle" character ((b), (B) # 
etc.) appears in parentheses adjacent 
to a control character, it is an 
alternate name for that control 
character. 

3. Notes pertaining to specific charac- 
ters or bit patterns are indicated by 
superscript numerals next to the 
character or bit pattern. The notes 
appear below, and indicate the chart 
locations to which they apply. 

4. Most of the characters in the "S" and 
"H" character set options (1030) and 
in the "A" and "C" character set 
options; (8333, 115A) are identical. 
Where they differ between the options, 
the translation tables "favor" the "S" 
option and the "A" option, as illus- 
trated in the chart. If messages from 
an "H" option 1030 are sent only to 
another "H" option 1030, the transla- 
tion table may be used as is, and 
similarly, for the 83B3/115A, with 
respect to the "C" option. If mes- 
sages from terminals with the "H" or 
"C" option are to be exchanged with 
other terminal types, you may wish to 
modify the tables. 

5. Some TWX terminals send even-parity 
transmission code bit patterns; others 
send non-parity bit patterns. All bit 
patterns sent by non-parity machines 
have a "1" in tne low-order bit posi- 
tion (that is, the position that 
serves as the parity bit in even- 
parity machines). The RCT2 transla- 
tion table translates either a non- 
parity or an even-parity bit pattern 
to the EBCDIC bit pattern for the 
corresponding character. The SCT2 
translation table always sends even 
parity. 

Control Characters 

ACK Positive Acknowledgment 

^3) End-of -block (same as EOB) 

BEL Bell 

BS Backspace 

BYP Bypass 

© End-of -transmission (same as EOT) 



CAN 

CC 

CR 

CU1 
CU2 
CU3 

® 

DC1 
DC2 
DCU 

DEL 

DLE 

DS 

EM 

ENQ 

EOA 

EOB 

EOC 

EOFC 

EOM 

EOT 

ETB 

ETX 

FF 

FIGS 

FS 

HT 

IFS 

IGS 

IL 

IRS 

IUS 

LC 

LF 



Cancel 

Cursor control 

Carriage (carrier) return 

Customer Use 1 

Customer Use 2 

Customer Use 3 

Machine end-of -address (same as 
EOA) 

Device controls 

Delete 

Data link escape 

Digit select 

End of medium 

Enquiry 

End-of -address 

End-of -block 

End of card 

End of first card 

End-of -message 

End-of -transmission 

End- transmission- block 

End-of-text 

Forms feed 

Figures shift 

Field separator 

Horizontal tabulate 

Interchange file separator 

Interchange group separator 

Idle 

Interchange record separator 

Interchange unit separator 

Lowercase shift 

Line feed 
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Control 


Characters (cont) 


LF-CR 


Line feed-carriage retu 


LTRS 


Letters shift 


toZ 


Minus zero 


® 


Negative response to po 
addressing, or LRC/VRC 


NAK 


Negative acknowledgment 


NL 


New lire 


NUL 


Null 


PF 


Punch off 


PN 


Punch en 


PR*. 


Prefix 


PZ 


Plus zero 


RES 


Restore 


RW 


Record mark 


RS 


Reader stop 


© 


St art-of- address 


SI 


Shift in 


SM 


Set mode 


SO 


Shift out 



Control Characters (cont) 
SOH St art- of- header 
SMM St art- manual-message 
SOS Start-of-significance 
SP Space 
STX Start-of-text 
SUB Substitute 
SYN Synchronous idle 
Tab Tabulate (horizontal) 
TM Tape mark 
TpAuxOff Tape auxiliary off 
TpAuxOn Tape auxiliary on 
Upper- case shift 
Vertical Tabulate 
•Who Are You?' 
Transmitter off 
Transmitter on 



UC 

VT 

WRU 

X-Off 

X-On 

® 



Positive response to polling, 
addressing, or LRC /VRC 



The character set and code correspondence charts (pages H-5 thru H-12) follow the 
index. To improve their usability, move them to follow page H-4 . 

Notes : 

*-Left bracket translates to EBCDIC hex 79; 
no EBCDIC character has been assigned to 
this bit pattern (location 121/3, 121/25). 

a No graphic prints in the "A" character set 
option (location 90/22). 

3 Backslash translates to EBCDIC hex El; no 
EBCDIC character has oeen assigned to this 
bit pattern (locations 225/3, 225/25). 

**IBM 1031 sends the numeric as a hex 20; 
1033 receives the numeric as a hex 15 
(location 2U0/U) . 

5 Right bracket translates to EBCDIC hex 49; 
no EBCDIC character has been assigned to 
this tit pattern (locations 73/3, 73/25). 
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Appendix H: Character Set and Code Correspondence H-7 
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Cod* 
<H*x) 


Character 


Cod* 

(Hox) 
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(33) 
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AS 
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(31) 
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3F 
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PZ 
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PZ 
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CI 


A 




62 


A 




E2 


A 




62 
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A1 
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A 




E2 


A 
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A 




18 
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B 




C2 


B 




64 


B 




E4 


B 




64 


B 




A2 


B 
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B 




E4 


B 




JDlJ 


B 




13 
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C 




C3 


C 




67 


C 




E7 


C 




m 
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A3 
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E7 


C 
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C 




OE 
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D 




C4 


D 




68 


D 




E8 


D 




(68) 


D 




A4 


D 
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D 




E8 
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CCA] 


D 




12 
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E 




C5 


E 




63 


E 




EB 


E 




63 


E 




AS 


E 
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E 




E8 


E 
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E 




10 
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C6 


F 




6D 
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ED 
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6D 
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A6 
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F 




ED 
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F 




16 
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C7 


G 




6E 


G 




EE 


G 




W 


G 




A7 


G 




(A7) 
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EE 


G 
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G 




08 
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H 




C8 


H 




70 


H 




F0 


H 
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A3 


H 
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H 




F0 


H 
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H 




05 
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C9 
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73 


1 




F3 
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73 
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A9 
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F3 
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MZ 
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MZ 
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J 




Dl 


J 




43 
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J 




43 


J 




AA 
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C3 


J 




(891 
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IA 
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D2 
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45 
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C5 


K 




45 
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A3 
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K 




C5 


K 
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K 




IE 
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D3 


I, 




46 
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C6 
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C6 
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09 
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C9 
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C9 
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[8A] 
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E8 


D 




[CA 




D 




12 


D 




22 (23) 


D 




12 







12 


C4 


196 




6B 


E 




E8 


E 




68 


E 




AS 


E 




(A5) 


E 




EB 


E 




[02 




E 




10 


E 




A3 


E 




10 


E 




10 


C5 


197 




60 


F 




ED 


F 




60 


F 




A* 


F 




(A6) 


F 




ED 


F 




tDA 




F 




16 


F 




63 


F 




16 


F 




16 


C6 


198 




6E 


G 




EE 


G 




(6E) 


G 




A7 


G 




(A7) 


G* 




EE 


G 




fa, 




G 




08 


G 




E2 0:3] 


G 




08 


G 




08 


C7 


199 




70 


H 




FO 


H 




. (70) 


H 




A8 


H 




(A8) 


H 




F0 


H 




[03! 




H 




05 


H 




12 D3J 


H 




05 


H 




05 


C8 


200 




73 


1 




F3 


1 




73 


1 




A9 


1 




(A9) 


1 




F3 


1 




[D8] 




1 




OC 


1 




93 


1 




OC 


1 




OC 


C9 


201 


































































CA 


202 


































































CB 


203 


































































CC 


204 


































































CD 


205 


































































CE 


206 


































































CF 


207 








MZ 


54 
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(54) 


















































DO 


208 




43 


J 




C3 


J 




43 
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AA 


J 




(AA) 
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C3 


J 




[89 
[91 




J 




1A 


J 




53 


J 




1A 


J 




1A 


Dl 


209 




45 


K 




C5 


K 




45 


K 




A8 


K 




. (AB) 


K 




C5 
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IE 


K 
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IE 
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IE 


D2 
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46 


L 




Co 


L 




(46) 
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AC 
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(AC) 


L 




C6 
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199 




L 




09 
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33 


L 




09 


L 




09 


D3 


211 




49 


M 




C9 


M 




(4») 


M 




AD 


M 




(AD) 


M 




C9 
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M 




07 


M 




B2 (B31 


M 




07 


M 




07 


D4 
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4A 
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CA 
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AE 
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CA 
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06 


N 
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06 
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06 


D5 


213 




4C 


O 




CC 


O 
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O 




AF 


O 
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CC 


O 




19A 
[88 




O 




03 
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F3 


O 




03 


O 




03 


D6 


214 




4F 


P 




CF 


P 




(4F) 


P 




B0 


P 




(80) 


P 




CF 


P 






P 




00 


- P 




0A [08] 


P 




00 1 


P 


OD 


D7 | 


215 | 
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EBCDIC 



IBM 1030 



Character 



lUf. 



216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
J2L 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 

JSL 



Graphic 



Control 



RM 



Character 


Graphic 


Control 


4 


5 


Q 

R 








S 

T 




U 
V 
W 
X 




Y 

Z 








0« 

1 

2 
3 




4 
5 
6 
7 




8 
9 










1030 



«rol 



IBM 1050 



IBM 1060 



Character 



Graphic 



Control 
8 



RM 



Chora cter 



Graphic 
10 



Control 
11 



IBM 



2260 



IBM 2740 



IBM 7770/7772 



Character 



Graphic 
13 



Cont.ol 
14 



Character 



Graph!' 



16 



Control 
17 



Character 



Grophi' 



19 




Control 



20 









*" '. v * 



.$>, 'T 



•■.^ V M '• ;, 






W$* Si*" 



Character 



Graphic 



22 



Control i 



23 



-W 









::fl 



AT&T 83B3 
W U 115A 



Character 



Graphic 



25 



i 



m 



Control 



26 



» | ii Tif i fl »e 



9m 



Character 



WTrA (ITA2) 



wm (zsc3) 



Character 



Graphic 



28 



\ 5 
S 

T 



Control 



29 



}-*A,:'' J ¥? 



Graphic 










31 



Control 



32 



Character 



Graphic 



34 



Control 



35 




m 






i 



EBCDIC 



Code 



37 



D8 
D9 
DA 
DB 



■5T 

DD 
0E 
OF 



E0 
El 
E2 

E3 



E4 
E5 
E6 

E7 



E8 
E9 
EA 

Si- 



te 

ED 
EE 
EF 



F0 
Fl 
F2 
F3 



F8 
F9 
FA 
F6 



FC 
FD 
FE 
fF 



Ref. 



216 
217 
218 
219 



220 
221 
222 
223 



224 
225 
226 
227 



228 
229 
230 

_22L 



232 
233 
234 
235 



236 
237 
238 
J32- 



240 
241 
242 
243 



"TO" 
245 
246 
247 

TZT 
249 
250 
251 



252 
253 
254 
255 
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APPENDIX I: TRANSMISSION CODE CHART 



This chart may be used in reading transmis- 
sion code as found in main storage. In the 
leftmost column of each section of the 
chart is shown the hexadecimal representa- 
tions of the 256 bit patterns that can 
appear in a System/370 byte. Opposite each 
bit pattern is the character represented by 
that bit pattern in the EBCDIC character 
set and in the character sets for each of 
the types of terminals listed in the 
remaining columns of the chart. (The spe- 
cific character set options represented in 
the chart are the same as those listed in 
Appendix H.) For example, before transla- 
tion to EBCDIC a hexadecimal 04 appearing 
in main storage would represent the digit 
2, if the bit pattern was received from an 
IBM 1030, 1050, 1060, or 2740; the charact- 
er EOT, if from a 2260; or a Space charact- 
er, if from an 83B3, 115A, or World Trade 
telegraph terminal. The absence of a 
character in the column headed ATST TWX 
signifies that the bit pattern 04 is unde- 
fined for TWX terminals. 

Example ; In order to translate 

1601E4CC A5011515 150201CA B1E70190 



as found in storage, first separate the 
characters into pairs: 



16 01 E4 CC A5 01 15 15 



15 02 01 CA Bl E7 01 90 



If this sequence was received from an IBM 
1050, it represents the characters: 



EOA SP B S SP 



01SPNYCSP* 



so that the message entered at the 1050 
terminal was, in part, 

BOS 0001 NYC * 
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09 
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ID 
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20 
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21 
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22 
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a 
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D 
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24 
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$ 
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SP 
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25 


LF 
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26 
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• *. 






• 




7 




27 


28 












>\':- 
















TpAuxOff 




LF 
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2A 


SM 
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4 






4 
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2B 
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2C 
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2D 


2E 
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2E 


2F 
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2F 
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FF 
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- 




30 
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■ 




FF 
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31 
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32 
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34 
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34 


35 


RS 
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35 


36 
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36 


37 
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$ 


© 
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' 


© 
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37 
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38 
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39 
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c" 
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3A 


36 
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LF 




LF 
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FIGS 
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3B 


3C 
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7 


< 
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3C 


3D 
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3F 
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1-6 OS/VS BTAM SRL 



APPENDIX J: LINE AND STATION CONFIGURATIONS SUPPORTED BY BTAM 



Start-Stop Communications 

The types of remote start-stop (asynch- 
ronous) terminals that can communicate with 
a System/370 under BTAM control, and the 
kinds of communication lines that can be 
controlled, are described below. The com- 
munication lines must be connected to the 
computer via an IBM 2701 Data Adapter Unit, 
an IBM 270 2 Transmission Control, or an IBM 
2703 Transmission Control. 

1. Nonswitched lines (point-to-point or 
multipoint), using programmed polling: 

IBM 1030 Data Collection System 
IBM 1050 Data Communications System 
IBM 1060 Data Communications System 
IBM 2260 Display Station — 
IBM 2848 Display Control 
(Remote — 2701 only) 
IBM 2265 Display Station — IBM 28 45 
Display Control (Remote — 2701 
only) 
IBM 2740 Communications Terminal 
(Model 1): Basic; with Checking 1 ; 
with Station Control 2 ; with Checking 
and Station Control 2 ; or with Check- 
ing and IBM 2760 Optical Image Unit 
features (point-to-point only, if 
2740 is equipped with 2760 Optical 
Image Unit) 

(Model 2): Basic or with Checking 1 - 
IBM 2741 Communications Terminal 
Western Union Plan 115A Outstations 
AT6T 83B3 Selective Calling Stations 

2. Switched lines: 

IBM 1050 Data Communications System 
IBM 2740 Communications Terminal 

(Model 1): Dial; Dial, with Check- 
ing; Dial, with Transmit Control; 
Dial, with Checking and Transmit 
Control, or Dial, with Checking and 
IBM 2760 Optical Image Unit 
features. 
IBM 2741 Communications Terminal 
wu Model 33/35 Teletypewriter Exchange 
Terminal (TWX) 

3. Nonswitched multipoint lines using the 
Auto Poll facility (IBM 2702 or 2703 
only) : 

IBM 103 Data Collection System 
IBM 1050 Data Communications System 



IBM 1060 Data Communications System 
IBM 2740 (Model 1 and 2) : with Sta- 
tion Control 2 or with Station Con- 
trol 2 and Checking features 

Binary Synchronous Communications 

The types of remote binary synchronous sta- 
tions (computers or terminals) that can 
communicate with a central System/370 under 
BTAM control, and the kinds of communica- 
tions lines that can be controlled, are as 
follows. The communications lines must be 
connected to the central computer via an 
IBM 2701 Data Adapter Unit or an IBM 2703 
Transmission Control. An IBM 2701 (with 
Synchronous Data Adapter Type II) may be 
attached to either the multiplexer channel 
or a selector channel. An IBM 2703 (with 
Synchronous Base Type 1) must be attached 
to the multiplexer channel. 

1. Nonswitched point-to-point and 
switched point-to-point lines: 

IBM Systen/370 3 

IBM System/360 

IBM System/ 360 Model 20 

IBM System/3 

IBM 1130 Computing System 

IBM 1800 Data Acquisition and 
Control System 

IBM 2 715 Transmission Control Unit 
(Model 1 attaches directly to multi- 
plexer channel of central computer; 
Model 2 communicates with central 
computer via IBM 2701 or 2703) 

IBM 2770 Data Communications System 

IBM 2780 Data Transmission Terminal 

IBM 3650 Retail Store System 

IBM 3735 Programmable Buffered 
Terminal 

IBM 3741 Data Station 

IBM 374 7 Data Converter 



*-Used as a regular terminal or as an opera- 
tor's console, when the operating system 
includes the Multiple Console Support. 



2 Station Control feature cannot be used if 
the 2740 is also used as a console under 
Multiple Control Support. 

3 The remote System/370 may be a Model 135, 
145, 155, 158, 165, 168, or 195. 
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IBM 3750 Switching System (World Trade 
users only; nonswitched point-to- 
point line only) 

IBm 3780 Data Communication Terminal 



The remote stations must be attached to 
an acceptable data adapter or transmis- 
sion control unit (IBM 2701, 2702, or 
2703). (A local 2715 (Model 1) must be 
connected to the multiplexer channel.) 



2. Switched point-to-point lines: 

IBM 3275 equipped with the dial 
feature 

IBM 3650 Retail Store System 

IBM 3660 Supermarket System 

IBM 5275 Direct Numerical Control 
Station 



All remote start-stop terminals that 
are connected to the same multipoint 
line, or are capable of communicating 
with the computer over any given 
switched line termination, must be of 
the same type and must be equipped with 
the same features. (Remote binary syn- 
chronous stations are not subject to 
this limitation.) 



3. Nonswitched multipoint lines: 

IBM System/360 Model 20 

IBM System/3 

IBM 1130 Computing System 

IBM 1800 Data Acquisition and 
Control System 

IBM 2715 Transmission Control Unit 
(Model 1 attaches directly to multi- 
plexer channel of central computer; 
Model 2 communicates with central 
computer via IBM 2701 or 2703) 

IBM 2770 Data Communications System 

IBM 2780 Data Transmission Terminal 

IBM 2972 (Models 8 & 11) General Bank- 
ink Terminal System 

Remote IBM 3270 Display System 

IBM 36 50 Retail Store System 

IBM 3735 Programmable Buffered Termin- 
al (Requires special feature) 

IBM 3741 Data Station 

IBM 37 80 Data Communication Terminal 

IBM 5275 Direct Numerical Control 
Station 



• All devices must be attached to the 
System/370 via the multiplexer channel 
except the IBM 2701 with Synchronous 
Data Adapter Type II, which may be 
attached via the selector channel (non- 
switched lines only) , or to the multip- 
lexer channel. 

• No device may be operated in burst mode 
concurrently with the operation of BTAM 
except the 2701 attached via the selec- 
tor channel. 

• Execution of BTAM requires that the 
interval timer of the central computer 
be working. 

• In a system in which BTAM is used in 
more than one partition, if the BTAM 
Read/Write module (IGG019MA) is resi- 
dent, all device I/O modules that are 
shared by the BTAM-using partitions 
must also be made resident. 



Note : When a 2740 is specified as a 
console during system generation, a 
second partition is created for BTAM; 
thus, the above requirement pertains 
to the system. 



Local Communications 

The local IBM 3270 Display System can com- 
municate with a System/370 under BTAM con- 
trol. The local 3270 display system is 
connected to the computer by means of a 
selector, multiplexer, or block multiplexer 
channel. 

Machine and Programming Requirements 

BTAM operates on any System/370 that meets 
the following requirements: 



• The system must meet the minimum confi- 
guration of OS/VS. 



• Use of the STIMER macro by the user is 
restricted during the time a BTAM Open 
(OPEN) , Line Open (LOPEN) or Close 
(CLOSE) operation is in progress, 
because BTAM routines use STIMER . 



Note : Terminals that are equivalent to 
those explicitly supported may also func- 
tion satisfactorily. The customer is 
responsible for establishing equivalency. 
IBM assumes no responsibility for the 
impact that any changes to IBM-supplied 
products or programs may have on such 
terminals. 
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APPENDIX K: IBM 2980 CHARACTER SET AND TRANSMISSION CODE CHART 



These charts show for each transmission code bit pattern the corresponding 2980 charact- 
er, for each of the models of the 2980 (1, 2, and 4) . Also shown is the EBCDIC character 
equivalent for that bit pattern. 



8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 

4 


Model 
1 


Model 
2 


Model 
4 


00 


NUL 














01 


SOH 






1 








02 


STX 


STX 


STX 


STX 


STX 


STX 


STX 


03 


ETX 


ETX 


ETX 


ETX 


ETX 


ETX 


ETX 


04 


PF 






open 
chute 






open 
chute 


05 


HT 


HT 


HT 


HT 


HT 


HT 


HT 


06 


LC 








LC 


LC 


LC 


07 


DEL 














08 
















09 


RLF 














0A 


SMM 














0B 


VT 














OC 


FF 














0D 


CR 














0E 


SO 














OF 


SI 














10 


DIE 


OLE 


DLE 


DLE 


DLE 


DLE 


DLE 


11 


DC1 














12 


DC2 














13 


TM 














14 


RES 






turn 
page 
light 






turn 
page 
light 


15 


NL 


NL 


NL 


NL 


NL 


NL 


NL 


16 


BS 














17 


IL 


message 
light 




message 
light 


message 
light 




message 
light 


18 


CAN 














19 


EM 














1A 


CC 














IB 


CU1 














IC 


IFS 


_____ 













8-bit 
pat- 
fern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 
4 


Model 
1 


Model 
2 


Model 
4 


ID 


IGS 














IE 


IRS 














IF 


IUS 














20 


DS 














21 


SOS 














22 


FS 














23 
















24 


BYP* 


BYP 


BYP 


BYP 








25 


LF 


pass- 
book 
index 




pass- 
book 
index 


pass- 
book 
index 




pass- 
book 
index 


26 


ETB 


ETB 


ETB 


ETB 


ETB 


ETB 


ETB 


27 


ESC 














28 
















29 
















2A 


SM 














2B 


CU2 














2C 
















2D 


ENQ 


ENQ 


ENQ 


ENQ 


ENQ 


ENQ 


ENQ 


2E 


ACK 














2F 


BEL 














30 
















31 
















32 


SYN 


SYN 


SYN 


SYN 


SYN 


SYN 


SYN 


33 
















34 


PN* 














35 


RS 














36 


UC 


UC 


UC 


UC 








37 


EOT 


EOT 


EOT 


EOT 


EOT 


EOT 


EOT 


38 

















* Also used as a Terminal Selection Character. 
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8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 
4 


Model 
1 


Model 
2 


Model 
4 


39 








1 








3A 
















3B 


CU3 














3C 


DC4 














3D 


NAK 


NAK 


NAK 


NAK 


NAK 


NAK 


NAK 


3E 
















3F 


SUB 














40 


SP* 


SP 


SP 


SP 


SP 


SP 


SP 


41 
















42 
















43 
















44 
















45 
















46 
















47 
















48 
















49 
















4A 


? 














4B 


• 


3 




1 


• 


1 




4C 


< 














4D 


( 














4E 


+ 














4F 


1 














50 


& 


validate 

I.D. 

char. 


& 


validate 

I.D. 

char 


& 


+ 


& 


51 
















52 
















53 
















54 

















8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 
4 


Model 
1 


Model 
2 


Model 
4 


55 
















56 
















57 
















58 
















59 
















5A 


! 














5B 


$ 


- 


$ 




$ 


I 




5C 


* 


$ 


& 




* 


<; 




5D 


) 














5E 


'• 














5F 


— • 














60 


- 


F 


- 




- 


_ 




61 


/ 


T 


/ 




/ 


? 




62 
















63 
















64 
















65 
















66 
















67 
















68 
















69 
















6A 
















6B 


f 


2 


/ 


/ 


/ 


1 




6C 


% 














6D 

















6E 


> 














6F 


? 














70 
















71 














i 



Also used as a Terminal Selection Character 
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8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 cfiaracter 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 

4 
I 


Model 
1 


Model 
2 


Model 

4 


72 
















73 
















74 
















75 
















76 
















77 
















78 
















79 
















7A 
















7B 


# 


S 


# 


* 


I 


- 


•» 


7C 


& 














7D 


i 














7E 


- 














7F 


" 














80 
















81 


a 














82 


b 














83 


c 














84 


d 














85 


e 














86 


f 














87 


9 














88 


h 














89 


! 














8A 
















8B 
















8C 
















8D 
















8E 

















8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 

4 


Model 
1 


Model 
2 


Model 

4 


8F 
















90 
















91 


i 














92 


k 














93 


1 














94 


m 














95 


n 














96 


o 














97 


P 














98 


q 














99 


r 














9A 
















9B 
















9C 
















9D 
















9E 
















9F 
















A0 
















Al 
















A2 


s 














A3 


t 














A4 


u 














A5 


V 














A6 


w 














A7 


X 














A8 


y 














A9 


z 














AA 
















AB 
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8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 

I 4 


Model 
1 


Modei 
2 


Model 
4 


AC 
















AD 
















AD 
















AF 
















BO 
















Bl 
















B2 
















B3 
















B4 
















B5 
















B6 
















B7 
















B8 
















B9 
















BA 
















BB 
















BC 
















BD 
















BE 
















BF 
















CO 
















CI 


A 


C 


a 


A 


A 


A 


A 


C2 


B 




b 


B 


B 


B 


B 


C3 


C 


4 


c 


C 


C 


C 


C 


C4 


D 


N 
B 


d 


? 


D 


D 


D 


C5 


E 


X 


e 


E 


E 


E 


E 


C6 


f 



B 


f 


F 


F 


F 


F 


C7 


G 


S 


9 


G 


G 


G 


G 



8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
I 


Model 
2 


Model 

4 


Model 
1 


Model 
2 


Model 
4 


C8 


H 


00 


h 


# 


H 


H 


6 


C9 


1 


8 


i 


C 


1 


1 





CA 
















CB* 








M 






.2 


CC 


J 1 














CD 
















CE 


V 














CF 
















DO* 














R 


D1 


J 


4 


i 


J 


J 


J 


J 


D2 


K 


5 


k 


K 


K 


K 


K 


D3 


L 


6 


i 


L 


L 


L 


Q 


D4 


M 


1 


m 


X 


M 


M 


M 


D5 


N 





n 


N 


N 


N 


N 


D6 


O 


9 


o 


O 


O 


O 


1 


07 


P 


+ 


P 


P 


P 


P 


H 


D8 


Q 


R 


q 




B 


Q 


Q 


5 


D9 


R 


A 


r 


c 

▼ 


R 


R 


_ 


DA 
















DB 
















DC 
















DD 
















DE 
















DF 
















E0* 








s 






4 


El 








/ 






Y 


E2 


S 


T 
f 


s 


$ 


S 


S 


S 



A non-EBCDIC code. 



K-4 OS/VS BTAM SRL 



8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 
4 


Model 
1 


Model 
2 


Model 
4 


E3 


T 


B 


t 


A 


T 


T 


T 


E4 


U 


7 


u 


M 


U 


U 


U 


E5 


V 


s 

p 


V 


▼ 


V 


V 


V 


E6 


W 


Q 


w 


* 


W 


w 


W 


E7 


X 


M 


X 


N 
B 


X 


X 


X 


E8 


Y 


5 


y 


T 


Y 


Y 


3 


E9 


Z 


V 


z 




z 


z 


z 


EA 
















EB* 








1 






1 


EC 
















ED 
















EE 
















EF" 
















FO 





u 











) 


. 


Fl 


1 




1 


1 


1 


= 


L 


F2 


2 


H 


2 


2 


2 


< 


S 


F3 


3 


c 

F 


3 


3 


3 


; 


# 


F4 


4 


M 


4 


4 


4 




O 


F5 


5 


L 


5 


5 


5 


% 


P 


F6 


6 


C 


6 


6 


6 


• 


• 


F7 


7 


M 




7 


7 


7 


> 


7 


F8 


8 


M 


8 


8 


8 


* 


8 


F9 


9 


C 


9 


9 


9 


( 


9 



8-bit 
pat- 
tern 
(Hex) 


EBCDIC 
charac- 
ter 


2980 character 


Numeric shift 


Alpha shift 


Model 
1 


Model 
2 


Model 
4 


Model 
1 


Model 
2 


Model 
4 


FA 


LVM 














FB 
















FC 
















FD 
















FE 


EO 














FF 

















A non-EBCDIC code. 
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APPENDIX L: THE TPEDIT MACRO INSTRUCTION (IBM 50 MAGNETIC DATA INSCRIBER) 



GENERAL CHARACTERISTICS 

Data received from the IBM 50 Magnetic Data 
Inscriber (MDI) attachment to the IBM 2772 
kiulti- Purpose Control Unit contains MDI 
control characters. (For full information 
on the IBM 50, see IBM 50 Magnetic Data 
Inscriber Component Description . ) The TPE- 
DIT macro enables the user to edit this 
data. The Edit routine, entered from the 
TPEDIT macro in the user program, edits the 
data as specified, then returns control to 
the user program. You have the option of 
gaining temporary control (via a user- 
specified exit routine) to process error 
records. The Edit routine is written in 
reentrant code. If data is to be received 
from more than one MDI at a time, you must 
provide a separate parameter list for each 
of them. 



r t t 

Name | Operation | Operand 




MINLN=n t , REPLACE= 
X'19* )] 
X'xx' J 

[,EDIT=(EDITDp 
( EDITR J 
[,RECFM=(VJ] 

( , ERROPT= ( IGNORE ) ] 
(name j 
[,VERCHK=(NOCHK )] 
(VOKCHK) 

[,buffer=(no )] 
(yes) 



When the user program issues a READ 
macro, it receives one block of data, which 
may contain one or more MDI logical records 
(or none) . The Edit routine extracts one 
record from this block of data, edits it 
and gives it to the user program with a 
return code indicating whether or not the 
user program input area is empty. If the 
input area is not empty, the user program 
must reissue the TPEDIT macro to obtain 
another record. When control is returned 
to the user program with an indication that 
the input area is empty, the input area can 
be reused. If the input area contains a 
partial record, the available portion is 
edited into the work area, and maintained 
there. The Edit routine gives a return 
code indicating that the input area is 
empty but a record is not available. It is 
your responsibility to obtain the remainder 
of the record via READ macros. When con- 
trol is given back to the Edit routine, the 
characters in the input area (until EOR is 
encountered) are treated as the remaining 
portion of the partial record. 



TPEDIT Macro Instruction 

The TPEDIT macro is used to specify the 
type of editing to be done on the input 
received from the IBM 50 MDI attachment to 
the IBM 2772. 



MINLN 

specifies the" minimum acceptable 
length of an input record. For EDIT= 
EDITD, SOR and EOR codes are excluded 
from the length; for EDITR, SOR and 
EOR are included in the length. 

REPLACE 

specifies the code to be used as a 
replacement character whenever the 
Edit routine detects a 2772 replace- 
ment character (that is, the EBCDIC 
SUB character, X f 3F*) in the input. 
X*19' is chosen as the assumed value 
because it is an end-of-data (ED) 
signal for an IBM 50 MDI cartridge and 
therefore can never appear as a valid 
data byte. For REPLACE=X • xx f you spe- 
cify xx as hexadecimal characters of 
your choosing. These choices may be 
made from the code chart in Figure 
116, with exceptions as noted below. 

Programming Note : BSC control characters 
should not be used as replacement charac- 
ters if the data is to be transmitted via 
BSC facilities after editing. 

Hexadecimal characters representing special 
purpose MDI codes that should not be used 
as replacement bytes are: 



X'OOMLZ) 



X'lE* (VOK) X^U 1 (P4) 



X'llMDUP) X^C* (RM) X»75 f (P5) 

X , 12MLZS) X'71MP1) X*76MP6) 

X'ISMCAN) X f 72* (P2) X'77 , (P7) 

X'IDMGS) X'13* <V3) X'78 a CP8) 



Appendix L: The TPEDIT Macro Instruction (IBM 50 Magnetic Data Inscriber) L-l 







































00 




01 




10 




11 






00 


01 


10 


11 


00 


01 


10 


11 


00 


01 


10 


11 


00 


01 


10 


11 






1st Hex D 





1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


































0000 







LZ 










Space 


& 


Minus 





















0-8-2 







0001 


1 




DUP 










/ 


PI 










A 


J 




1 


0010 


2 




LZ 
Start 












P2 










B 


K 


S 


2 


0011 


3 
















P3 










C 


L 


T 


3 


0100 


4 
















P4 










D 


M 


U 


4 


0101 


5 
















P5 










E 


N 


V 


5 


0110 


6 
















P6 










F 


O 


W 


6 


0111 


7 
















P7 










G 


P 


X 


7 


1000 


8 




CAN 










| 


P8 










H 


Q 


Y 


8 


1001 


9 




ED 






















1 


R 


Z 


9 


1010 


A 










c 


1 






















1011 


B 












S 


, 


I 


















1100 


C 








RM 


< 


* 


% 


& 


















1101 


D 




GS 






( 


) 


Under- 
line 


Prime 


















1110 


E 




VOK 






+ 


; 


> 


= 


















mi 


F 










1 


-• 


? 


« 




















t t 

Bits 2nd Hex 
4,5 Digit 
6,7 


































IBM 50 Code 
Nome 


EBCDIC Code 

Name 




IBM 50 Code Name 
(See Note) 






LZ (LZ Fill) 
DUP 
LZ Stort 
CAN (Concei) 


NULL 
DC 1 
DC 2 
Can 


PI (Prog 1) 
P2 (Prog 2) 
P3 (Prog 3) 
P4 (Prog 4) 


ED (End Date) 
RM (Rec Mork) 
GS (Group Sep) 
VOK (Ver OK) 


EM 
DC 4 
IGS 
IRS 


P5 (Prog 5) 
P6 (Prog 6) 
P7 (Prog 7) 
P8 (Prog 8) 










Nc 


>t< 


s: Codes are assigned for IBM 50 use only. 





















Figure 116. IBM 50 MDI Control Codes 



EDIT 



specifies the type of editing to be 
done. 



EDITD 

causes the input to be edited and 
start-of-record (SOR) and end-of- 
record (EOR) delimiters to be deleted. 



EDITR 

causes the input to be edited and the 
start-of-record and end-of-record 
delimiters to be retained as part of 
the output. 

The edit consists of the following 
functions. Records are extracted one 
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at a time from the input area by scan- 
ning for the record delimiting codes 
(SOR and EOR) . DUP codes are replaced 
by the character from the correspond- 
ing location of the record that was in 
the work area when control was last 
returned to the Edit routine. (This 
does not apply to the first record of 
a cartridge.) Left-zero fields are 
right-adjusted, with leading zeros 
inserted where necessary. Left-zero 
start codes, records containing a can- 
cel code:, and group separator codes do 
not appear in the output stream. Line 
control characters (ETB, ETX, STX, and 
DLE STX) are always deleted if found 
in the input area. 



RECFM 



specifies the format of the output 
from the Edit routine. If RECFM=V, a 
segment descriptor word is appended to 
each record as shown. 

Segment Descriptor Word 



i t 

I nn | 

L JL. 



bb 



Data 



Logical Record 

where nn (2 bytes) is the length of 
the logical record and bb (2 bytes) is 
binary zeros reserved for system use. 

This four- byte field is included in 
the record length returned to the user 
program via a parameter list. 

Note ; Allow for this four-byte field 
when determining the size of the work 
area (see section on Input to the TPE- 
DIT macro) . 

If RECFM=U, no segment descriptor word 
is appended to each record. 

ERROPT 

specifies whether a user error exit 
routine is provided to handle 
erroneous records . 

IGNORE 

an error exit routine is not provided. 
The error conditions are to be disre- 
garded and the record is to be passed 
normally to the user program. 

name 

specifies the name of the user error 
exit routine to be entered when the 
Edit routine detects logical errors or 
replacement characters in the record. 

VERCHK (valid only if ERROPT=name is coded) 
specifies whether the records are to 
be checked for verify-OK (VOK) codes. 



If you specify VOKCHK and a record 
does not contain the verify-OK code, 
the record is passed to the error exit 
routine. 



When the Edit routine encounters an 
erroneous record and control passes to 
this user-supplied routine, register 
13 contains the address of a 72-byte 
register save area aligned on a full- 
word boundary, and register 1 contains 
the address of a two- word parameter 
list aligned on a fullword boundary. 
The parameter list is defined as 
follows: 

Word Contents 

1 Record address 

2 Address of record length 

The record length includes the four- 
byte error description word appended, 
as shown, to the data record. In 
addition, if RECFM=V, the logical 
record length (nn) includes these four 
bytes when the record is passed to the 
error exit routine. 

If RECFM=V is specified: 



Error 
Description Word 

r t r — t — r — t — r " 

| nn| bb | | | | | Data 

t J X X JL X X // 



Logical record 

If RECFM=U is specified: 

Error 
Description Word 



r — t — t — t — t- 
I I I I I 

L X X X X. 



//- 

Data 
//- 



Logical record 

Information on the Error Description 
Word may be found under Error Record 
Identification. The error exit rou- 
tine can be used to analyze and, if 
possible, correct the erroneous reco- 
rd. When control returns to the Edit 
routine via register 14, you must set 
register 15 to zero if you wish to 
bypass the error record. To direct 
the Edit routine to pass only that 
segment of the record in error and 
process the rest of the record normal- 
ly, set register 15 to a nonzero 
value. Note that neither acceptance 
nor bypassing of the erroneous record 
changes its effects on subsequent 
records. The Edit routine removes the 
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error description word when control 
returns from the error exit routine. 

BUFFER 

specifies whether or not the user data 
is in BTAM buffers obtained through 
dynamic buffering operations. If you 
specify YES, the Edit routine edits 
all data in the input area until the 
area is empty. 

Note : The entire buffer chain must 
have been posted complete in the DECB 
before you issue the TPEDIT macro. 

Input to TPEDIT Macro 

Register 1 must point to a four-word para- 
meter list (aligned on a fullword boundary) 
containing : 

Word Contents 
1 Input Address 

If you are using dynamic buffering, 
this address points to the first 
buffer in the chain. The Edit rou- 
tine edits all records in the buff- 
er chain before indicating that the 
input area is empty. If dynamic 
buffering is not used, this is the 
address of the data to be edited. 

2 Input Length 

If dynamic buffering is used, this 
is the length of one buffer. If an 
I/O area is used, this is the 
length of the data to be edited. 

3 Edit w 3rk area address 

The work area required by the Edit 
routine for a given parameter list 
is obtained in either of two ways. 
The work area can be provided by 
the Edit routine (via an uncondi- 
tional GET MAIN), or you may provide 
it. 

If the work area is to be pro- 
vided by the EDIT routine, this 
word must contain binary zeros. 
The Edit routine issues a GETMAIN 
macro to obtain the required 
storage and places the address of 
the storage obtained in this word. 
If you provide the work area, this 
word contains the address of the 
area supplied. The amount of 
storage needed in addition to the 
fixed amount required is determined 
from: 

(1) the maximum record length. 

(2) whether a user exit exists (72 
bytes for a register save area 
and 4 bytes for an EDW are 
required by the macro if an 
exit is specified) . 

(3) whether RECFM=V. 



The size (in bytes) of the work 
area may be determined from the 
formula : 

S = 84 + 76E ♦ R ♦ 4V 

Where: 

S is the size (in bytes) of the 
work area. 

E = if ERROPT=IGNORE is coded 
= 1 if ERROPT=NAME is coded 

V = if RECFM=U 

= 1 if RECFM=V 

R is the length of the longest 
record to be processed. 

Maximum record length. 
This is the length, in bytes, of 
the longest valid edited record. 
For EDIT=EDITD the length should 
exclude SOR and EOR codes ; for 
EDIT=EDITR, the length should 
include SOR and EOR codes. 

The value of the maximum record 
size should not include the four- 
byte segment descriptor word added 
to a variable length record. 

Records that exceed the maximum 
record size are considered 
erroneous records. Register 13 
must contain the address of a 72- 
byte register save area aligned on 
a fullword boundary. 



Return Codes 

After the Edit routine has edited a record, 
it provides in register 15 a return code 
indicating record availability and status 
of the input area, prior to returning con- 
trol to the user program. The return codes 
and their meanings are as follows: 



Code 

(hex) 

00 



04 



08 



Meaning 

A record is available; input area 
is empty. The routine has edited 
the last logical record in the 
input area and is passing the 
record to the user program. 

A record is available; input area 
is not empty. The routine has 
sdited one logical record and is 
passing that record to the user 
program. 

No record is available; input 
area is empty. The last record 
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in the input area was incomplete; 
that is, it was a partial record. 



OC 



End-of-data 
detected. 



(ED) code was 



For return codes 00 and 04, the record 
address and the address of the record 
length are given to the user program in a 
two- word parameter list aligned on a full- 
word boundary. The address of the paramet- 
er list is returned in register 1. The 
parameter list has the following format: 

Word Contents 

1 Address of the record 

2 Address of the record length 



• The record is longer than the user- 
specified maximum length record. 

• The length of the record is not equal 
to the length of the first valid record 
of the same program level encountered 
on the MDI cartridge from which data is 
being obtained. 

• The record has a data duplication 
dependency on a previous record having 
one of the foregoing errors. 

The level status is set to zero whenever 
the Edit routine encounters (1) a record 
without one of the previous errors, (2) a 
canceled record, or (3) the first record of 
a cartridge. 



RECORDS CONTAINING ERRORS 

This section describes what the Edit rou- 
tine considers to be records containing 
errors. Once the Edit routine has deter- 
mined a record to be in error, it passes 
that record to the user error exit routine, 
if ERROPT=name is specified in the TPEDIT 
macro statement. If an error exit routine 
is not specified, the erroneous record is 
returned to the user program. 

The Edit routine maintains information 
about each record as it is being edited. 
This information is summarized in the Error 
Description Word (EDW) described below. 
When the EDW contains a nonzero value in 
either the Level Status (byte 0) or the 
Type Status (byte 1), the record is consi- 
dered an erroneous record and the EDW is 
inserted between the four- byte record 
length field and the data portion if RECFM= 
V is specified. Otherwise, the EDW is 
appended to the start of the record to help 
you analyze the error. Figure 116 shows 
the format of the EDW. 

Level Status (Byte 0) 

The level status indicator identifies 
erroneous records that result from interre- 
cord dependency and that cannot be identi- 
fied in the type status byte. The level 
status is presented with each erroneous 
record and has one of the values shown in 
Figure 117. 

A level status of other than zero is 
presented with erroneous records resulting 
from the following: 

• The star t-of -record (SOR) location has 
a character defined as an error. 

• The record contains two or more data 
check bytes in succession. 



Type Status (Byte 1) 

The type status indicator identifies reco- 
rds in error because of SOR, EOR, length, 
field, and/or data check error conditions. 

The type status is presented with each 
erroneous record and has a value of: 

For any record that has no identifi- 
able errors, but contains question- 
able data due to a level status of 
other than zero (see Level Status) . 

1 For any record that (1) has a SOR 
character of other than PI through P8 
or a GS code, or (2) has an EOR 
character of other than a VOK code 
when you have specified VERCHK= 
VOKCHK, or (3) has an EOR character 
of other than a VOK code or RM code 
when you have specified VERCHK=NOCHK. 

2 For any record that has an incorrect 
length because it is: 

• Longer than the specified maximum, 
or 

• Shorter that the specified minimum 
(MINLN), or 

• Not equal to the length of the 
first valid record of the same pro- 
gram level encountered on the MDI 
cartridge from which data is being 
obtained. 

4 For any record that has one or more 
field errors. A field error is a 
field or fields where duplication 
and/or left-zero justification func- 
tions did not occur due to an error 
condition. 

8 For any record that has a data check 
error. 
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Byte 0: Level status 

- for any error record that will not cause questionable data to be in the following 

records . 

1 - for any error record that may cause questionable data to be in the following 

records. 

2 - for any error record that (1) contains questionable data due to the error level 

of preceding record(s) and (2) may cause questionable data to be in the following 
records; and where the level status of the previous record was either 1 or 2. 



Byte 1; Type status 

- No identifiable errors. 

1 - Start-of -record (SOR) or end-of record (EOR) in error. 

2 - Length error. 
4 - Field error. 

8 - Data check error. 

Note ; This field may contain combinations of these error types; for example, a C 
(hexadecimal) indicates a data check error and a field error. 



Byte 2: Program Level 

1 - PI 5 - P5 E -none of the preceding levels. Start-of- record 

2 - P2 6 - P6 (SOR) is in error. 

3 - P3 7 - P7 

4 - P4 8 - P8 



H 



Byte 3: Record Status 

U - Unverified record. 

V - Verified record. 

E - Neither U nor V. End-of-record (EOR) is in error. 



Note : The error description record is in EBCDIC format. For example, a 2 is repre- 
sented as X'F2"; a C is represented as X*C3'. 

L 

Figure 117. Format of Error Description Word 



The type status indicator can also have 
hexadecimal values of 3, 5, 6, 7, 9, A, B, 
C, D, E and F. These values indicate 
various combinations of SOR, EOR, length, 
field, and data check errors. For example, 
a value of A indicates a record with a data 
check error (8) as well as an incorrect 
length error (2). 

Note : A data check error is indicated by 
the presence of 2772 replacement characters 
(that is, EBCDIC SUB characters, X'3F* ), in 
the input . 



Program Level (Byte 2) 

This byte contains an indication of the 
start-of-record (SOR) character associated 
with this record. (See Figure 108 for 
values. ) 



Record Status (Byte 3) 

This byte contains an indication of the 
end-of-record (EOR) character associated 
with this record. (See Figure 109 for 
values. ) 



EXAMPLES OF RECORDS CONTAINING ERRORS 

Figure 118 shows some of the errors that 
may occur during processing and their 
effect on the error description word (EDW). 
For these records, the maximum record 
length is specified as 50, EDITR and VOKCHK 
are specified, and the hexadecimal REPLACE 
character is ' 5B' ($). An asterisk in the 
records indicates the presence of a DUP 
code in the location before editing. 
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(Record 2). 



19EV 


V 


$111378 RECORD NUMBER 2AK 


(Record 3) 


201V 


V 
1357987 RECORD NUMBER 3AK 


(Record 4) 


081V 


V 
P O 
1358977 REC$RD NUMBER 4AK 


[Record 5) 


131U 


P R 
1358436 RECORD NUMBER 5M 


(Record 6) 


241V 


V 
1358436 RECORD NUMBER 6$K 



(Input record 7) 




233E 


P 

3998865 RECORD NUMBER 7A MAXIMUM 00001430 IN WAREH 


V 

O 

OUSEK 


l- - 


) 



(Error record 7) 



(Error record 8) 



1 21 EV 


V 

o 

OUSEK 




(Input record 8) 
(Error record 9) 




081V 


V 
P O 
1367582 RECORD NUMBER 8AK 


, 


, 





Resulting Error 
Description Word ■ 



Figure 118. Examples of Erroneous Records (IBM 50 MDI) 



Record 1 was a valid record. It con- 
tained a program level 1 code and thus 
established the valid length for all pro- 
gram level 1 records received from the 
cartridge. 

Record 2 has a data check in the SOR 
location. Level status is set to 1 because 
the SOR location might have contained a 
cancel code that would cause any data dup- 
licated into the following record to be 
questionable . 

Record 3 has no identifiable error but 
may contain questionable data because it 
contained DUP codes and follows a record 
with a level status of 1. 

Record H has a data check error. 
Because it contained no DUP codes, the 
level status is set to 0. 



Record 5 is shorter than first program 
level 1 records received from the cartridge 
(length error) . This record also contains 
an RM code rather than a VOK code in the 
EOR location (VOKCHK was specified) . 
Because the Edit routine cannot determine 
why the record is short, all data dupli- 
cated from this record is questionable; the 
level status is therefore set to 1. 



Record 6 contains a DUP code that is 
beyond the last position of the preceding 
record. 



Record 7 is longer than the maximum spe- 
cified record length. Note that it is 
passed as two records. The first record 
indicates an EOR error and a length error; 
the second indicates an SOR error. 
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Record 9 has a data check error. 
Because it contained no DUP codes, the 
Level Status is set to zero. 



PROGRAMMING CONSIDERATIONS 

• All canceled records are bypassed and 
are not passed as erroneous records. 

• All input records less than three bytes 
in length (SOR location, one data byte, 
EOR location) are treated as canceled 
records. An input record of this size 
may be the remaining portion of a 
record that was longer than the maximum 
user-specified record size. 

• Data duplication occurs with the DUP 
code replaced by the character from the 
corresponding location of the previous 
record that was in the work area when 
control was last returned to the Edit 
routine. 



The DUP code is encountered in a record 
and its position would cause duplica- 
tion of an error replacement character. 

• For either of the following conditions, 
left-zero justification does not occur, 
the left-zero-fill code (LZ) is 
replaced with the user-specified error 
replace character, and a field error is 
indicated: 

The left-zero- fill code (LZ) is encoun- 
tered without its corresponding left- 
zero-start code (LZS). 

The user-specified maximum record size 
is exceeded before the valid end of a 
left-zero field is encountered. 

• If dynamic buffering is being used, the 
BSC control characters ETB and ETX 
should not be entered as data on IBM 50 
MDI cartridges. 



For any of the following conditions, 
data duplication does occur and the DUP 
code is replaced with the user- 
specified error replacement character 
and a field error is indicated: 

The DUP code is encountered in the 
first record of a cartridge. 

The DUP code is encountered in a record 
and the previous record was a canceled 
record . 

The DUP code is encountered in a record 
and its position would cause duplica- 
tion of the previous record's end-of- 
record delineator location or a posi- 
tion beyond the length of the previous 
record. 



END-OF-CARTRIDGE CODE 

A unique code, written by the IBM 50 MDI, 
is used to signal the 2772 control unit 
that all meaningful data on a cartridge has 
been read. For the MDI cartridge, the end- 
of-cartridge code is the ED character 
(X 1 ^ 1 ), which is equivalent to the EBCDIC 
end- of -medium (EM) character (X'19*). 

After initiation of a Read operation the 
MDI continues to read data from the tape 
until it senses the ED character. When the 
MDI sends this character to the 2772, the 
2772 signals the tape unit to rewind the 
tape and then transmits the data in its 
buffer to the central computer. 
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APPENDIX M; SAMPLE 2715 TABLE LOAD MACRO ASSEMBLY 



PAGE 1 

//TEST JOB MSGLEVEL=1 

//STEP EXEC ASHFC 

//ASM.SYSLIB DD DSN=SYS1 .MACLIB,DISP=OLD 

//SYSIH DD * 

CONFIGUB COBE=32,PC«YES,INQDISP=YES,GDU=YES,GETID=F0,STORID=F5, 
IDCOUNT=8,MONEBB=(t,5) ,FUNCEBB= (6,7) , ENDEBB= (8,9) 

* THE COBB=32 OPERAND OF THE CONFIGOB HACRO 

* INDICATES THAT THE 2715 HAS 32K OF STOBAGE 

* AVAILABLE. CODING PC-YES, INDICATES THAT 

* PULSE COUNTERS EXIST ON THIS 2790 SYSTEM. 

* INQDISP=YES INDICATES THAT INQUIBY DISPLAY 

* RILL BE USED ON THE 2790 SYSTEH. GDU-YES 

* INDICATES THAT 2798 GUIDANCE DISPLAY UNITS 

* ARE ON THIS 2790 SYSTEH. THE USER CAN 

* CEFINE EIGHT IDENTIFIERS. THE GET IDENTIFIER 

* CHARACTER IS THE EBCDIC CHARACTER AND THE 

* STOBE IDENTIFIES CHABACTER IS THE EBCDIC 

* CHARACTER 5 . IF A MONITOR KEY CHECK FAILS, 

* ERBOB GUIDANCE LIGHTS 4 AND 5 RILL BE 

* TUBNED ON AT THE 2798. RHEN AN INVALID 

* FUNCTION IS BECOGNIZED, EBBOR GUIDANCE 

* LIGHTS 6 and 7 RILL BE TUBNED ON AT THE 2798. 

* RHEN A PBIHiTUBE TEBMINATION EBBOB OCCURS, 

* ERROR GUIDANCE LIGHTS 8 AND 9 RILL BE 

* TUBNED ON AT THE 2798. 
* 

* THE FOLLOWING AS MACROS DEFINE 60 AREA 

* STATIONS RITH ID'S BETREEN AND 59 

* FROM RHICH TBANSACTIONS CAN BE ENTEBED. 

* ROBKOUT AND NOBHAL ABE THE NAMES OF THE 

* TGBOUP MACBOS THAT DEFINE THE TBANSACTION 

* CODES THAT CAN BE USED FBOH THE DATA ENTBY 

* UNITS ON THI SYSTEM. CONTROL IS THE NAME OF 

* THE TGBOUP MACBO THAT DEFINES THE TBANSACTION 

* CODES THAT CAN BE USED FROM THE ABEA STATIONS. 

* FOR EXAMPLE, THE AS HACRO DEFINING THE ABEA 

* STATION RHOSE ADDBESS IS DECIMALLY BEPRESENTED 

* BY ID=01 INDICATES THAT ROBKOUT IS THE NAME 

* OF THE TGROUP MACBO DEFINING RHICH TRANSACTIONS 

* CAN BE USED BY THE 32 DATA ENTBY UNITS CN 

* THIS ABEA STATION. THE TBANSACTIONS THAT CAN 

* BE USED BY THE DATA ENTRY UNITS ARE NOT THE 

* SAME AS THOSE THAT CAN BE USED BY THE ABEA 

* STATIONS IN THIS TABLE LOAD. 
* 

* 
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PAGE 2 



AS ID=00,DEGROUP= (WORKOUT, 32) 

AS ID=01,DEGROUP=(WORKOUT,32) 

AS ID=02,DEGROUP= (WORKOUT, 4) 

AS ID=03,ASGROUP=CONTROL,DEGROUP= (NORMAL, 32) 

AS ID=04,ASGROUP=CONTROL 

AS ID=05,ASGROUP=CONTROL 

AS ID=06,ASGROUP=CONTROL 

AS ID=07,ASGROUP=CONTROL 

AS ID=08,ASGROUP=CONTROL 

AS ID=09,ASGROUP=CONTROL 

AS ID=10,ASGROUP=CONTROL 

AS ID=11,ASGROUP=COHTROL 

AS ID=12,ASGHOUP=CONTROL 

AS ID=13,ASGROUP=CONTROL 

AS ID=14,ASGROUP=CONTROL 

AS IE>=15,ASGROUP=CONTROL 

AS I D= 1 6 , ASGROUP*CONTROL 

AS ID=17,ASGROUP=CONTROL 

AS ID=19,ASGROUP=CONTROL 

AS ID=20,ASGROUP=COHTROL 

AS id=2i;asgroup*cc»trol 

AS ID=22,ASGROUP=CONTROL 

AS ID=23,ASGROUP=CONTROL 

AS ID=24, ASGROUP=CONTROL 

AS ID=25,ASGROUP=CONTROL 

AS ID=26,ASGROUP=CONTROL 

AS ID=27,ASGR0UP=C0MTHQL 

AS I D=» 2 8 , ASGROUP=CONTROL 

AS ID=29,ASGROUP»CONTROL 

AS ID=30,ASGROUP»CONTROL 

AS I D= 3 1 , ASGROUP-CONTROL 

AS ID=32,ASGROUP=CONTROL 

AS ID=33,ASGR0UP*C0NTR0L 

AS ID=34,ASGROUP=eONTROL 

AS ID=35,ASGROUP=CONTRQL 

AS ID=36,ASGROUP=C0NTr6l 

AS ID=37,ASGR0UP=C0NTR0L 

AS ID=38,ASGROUP=CONTROL 

AS ID=39,ASGR0UP=C0NTH0I, 

AS ID=U0 # DEGROUP-(WORKOUT1,4) 

AS ID=in,DEGROUP=(WORKOUT1,<0 

AS ID*42,DEGROUP=(WORKOUT1,4) 

AS ID=43,DEGBOUP*(HORKOUT1 ,4) 

AS ID=44,ASGROUP=CONTROL,DEGROUP=(NORHAL,4) 

AS ID=»45,ASGROUP=C0HTROL,DZGB0UP= (NORMAL, 4) 

AS ID=46, ASGBOUP=CONTROL,DIGROUP= (NORMAL, 4) 

AS ID=47,ASGROUP=CONTROL,DEGROUP=(NORMAL,4) 

AS ID=48,DEGROUP= (WORKOUT, 4) 

AS ID=49,DEGROUP= (WORKOUT, 4) 

AS ID=50,DEGROUP= (WORKOUT, 4) 
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AS ID=51,DEGROUP=(NORKOUT,4) 

AS ID=52,ASGFOUP=CONTBOL 

AS ID=53,ASGROUP=CONTROL 

AS ID=54,ASGEOUP=CONTFOL 

AS ID=55,ASGROUP=CONTROL 

AS ID=56,DEGROUP= (WORKOUT, 4) 

AS ID=57,DEGROUP= (WORKOUT,**) 

AS ID=58,DEGFOUP= (WORKOUT, 4) 

AS ID=59,ASGROUP=CONTROL 

* THE FOLLOWING GDUAS MACROS INDICATE THAT 

* THIS SYSTEM HAS FOUR AREA STATIONS WITH 

* 2798 GUIDANCE DISPLAY UNITS ATTACHED. THE 

* GDUNUHB OPERAND INDICATES THE NUMBER OF 

* 279 8S ON THAT PARTICULAR AREA STATION. 

* THERE ARE A TOTAL OF 48 2798 GDUS ON 

* THIS SYSTEM. 

* 

GDUAS ID*00,GDUNUHB=16 

GDUAS ID=02,GDUNUHB=4 

GDUAS ID*43,GDUNUHB=16 

GDUAS ID=44,GDUNUHB=12 
* 

* THE FOLLOWING TGROUP MACROS ASSOCIATE 

* SPECIFIC TRANSACTION CODES WITH USER 

* DEFINED TRANSACTIONS. THE TRANSACTION 

* CODES CAN BE SPECIFIED FROM EITHER DATA 

* ENTRY UNITS OR FROM AREA STATIONS BUT CAN 

* HOT BE SPECIFIED FROM 2798 GUIDANCE DISPLAY 

* UNITS. 

* 

CONTROL TGROUP TC1*BADGE, TC2*BADGE1, TC3= MANUAL, TC4=CARD, TC5=CARD1 , 
TC6=CARD2,TC7=BADGI, TC9= (EXPAND, E) 

* THIS TRANSACTION GROUP IS ENTERED BY THE 

* 2715 WHEN THE USER SELECTS TRANSACTION 

* CODES 1-7 OR 9 IROM AREA STATIONS WHOSE 

* ADDRESS IS DECIMALLY REPRESENTED BY IDS 

* FROM 03-39, 44-47, 52-55, OR 59. IF 

* TRANSACTION CODE 1 IS SPECIFIED BY THE 

* USER AT ONE OF THE ABOVE AREA STATIONS, 

* THE TRANSACTION DEFINED BY THE TRLIST 

* MACRO WITH THE NAME BADGE IS ENTERED 

* BY THE 2715. LIKEWISE, THIS TGROUP MACRO 

* ASSOCIATES ALL ALLOWABLE TRANSACTION 

* CODES THAT CAN BE SPECIFIED FROM THE 

* ABOVE AREA STATION WITH A USER DEFINED 

* TRANSACTION BEGINNING WITH A TRLIST MACRO. 

* WHEN TRANSACTION CODE 9 IS SPECIFIED ON 

* ONE OF THE ABOVE AREA STATIONS, THE USER 

* MUST SPECIFY ONE MORE TRANSACTION CODES 

* AS INDICATED BY TBE FOLLOWING EXPAND 
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TGROUP MACRO- TRANSACTION CODES 91,92,93, 
91,95, AND 96 ABE ASSOCIATED WITH A 
DIFFEBEHT TBANSACTIOH. THIBTEEN 
DIPPEBENT TRANSACTIONS CAN BE SPECIFIED BT 
OPERATORS ON THE ABOVE AREA STATIONS. 
CODING E AS IN THE TC9 OPERAND INDICATES 
THAT THE ADDITIONAL TRANSACTIONS POINTED 
TO BY THE POLLOHING EXPAND TGBOUP flACBO 
CAN BE SPECIFIED BY THE OPEBATOBS ON THB 
ABOVE AREA STATIONS. 
EXPAND TGROUP TC1=EXP1 ,TC2=EXP2 ,TC3*EXP3, TC4*EXP4,TC5»EXP5, TC6=BIP5 
NOBHAL TGRODP TC1*DEU 1,TC2*DEU2,TC3»DBU3,TC4*DEU4 ,TC5* (EXPDEU,E) , 
TC6-DED6 ,TC7*ALABH,TC8*ALRHTX, TC9«TEXT 

THIS TRANSACTION GROUP IS ENTBBED BT THE 
2715 RHEN A TBANSACTION CODE OF 1,2,3,4,51, 
52,53,54,6,7,8, OR 9 IS SPECIFIED AT A DATA 
ENTRY UNIT ON AN AREA STATION HHOSE ADDRESS 
IS DECIHALLY REPRESENTED BY IB-03 ,14,45,46, 
OB 47. 

EXPDEU TGBOUP TC1*DEUEXP,TC2*DEUEXP,TC3»DEDEXP,TC4=DEUEXP 
WORKOUT TGROUP TC1» (ALRHESG,B) ,TC2= (ALRHESG, E) ,TC3«EXP, TC4«CPO, 
TC5»RBAD,TC6»READST,TC7»READSID,TC8«DISK,TC9*DISK 
WORKOUT1 TGROUP TC1»RDIPSG,TC2*RDEPSGH ,TC3*RDEPSGB,TC4*BDBPGPH, 
TC5=BDEPGPB,TC6=RDRSTIP,TC7»RDRSTEPfl, 
TC8=(EXPAND1,E) ,TC9= (EXPAND2 ,E) 
EXPAND1 TGROUP TC1=RDSTIPH,TC2=RDSTBPH, TC3*RDSTEPB,TC4=HDSIDEPH, 

TC5=RDSIDGPB,TC6*RDSIDGPB,TC7=iBIPB,TC8»WREPB,TC9*CPU 
ALBHESG TGBOUP TC1= ALARfl,TC2* ALRHTX,TC3*TIXT, TC4*EXPALH, 

TC5=EXPALHTX,TC6»E XPTX ,TC7=CPU ,TC8*CPU ,TC9*CPU 
EXPAND2 TGROOP TC1«RDGPEPAA,TC2*RDGPEPBB,TC3=RDSIEPAA, 
TC4»RDBSIEP,TC5«RDSIIPAA,TC6«RDSIIPAB 

THE FOLLOWING ASCTB MACROS DEFINE THB AREA 
STATIONS WITH PULSE COUNTEBS ATTACHED. ONE 
ASCTR HACRO HUST BE CODED FOB EVEBY ABEA 
STATION VITH PULSE COUNTERS ATTACHED. 

ASCTR ID=01,HIGHCTR=23, ROUTE* (DISK, LOG) 

THIS ASCTR HACRO INDICATES THAT 23 IS THE 
HIGHEST COUNTER ON THE AREA STATION WITH 
ID=01 ON BHICH EITHER COUNT TESTING OB 
SCHEDULE READOUT FUNCTIONS ARE TO BE 
PERFORBED BY THE 2715. OVEBFLOB AND COUNT 
TEST RESPONSE FIBS SAGES BILL BE BOUTED TO 
THE 2715 DISK AND THB 2740. 
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ASCTR 10=40, HIGHCTR=00,ROUTE=CPU,NEXTAS=42 

THIS ASCTR HACRO INDICATES THAT NO COUNTERS 
ON THE AREA STATION WITH ID=40 WILL USE 
COUNT TESTING OR SCHEDULE READOUT FUNCTIONS. 
OVERFLOW MESSAGES WILL BE TREATED AS 
PRIORITY DATA TO BE ROUTED TO THE CPU BT 
2715. NEXTAS=U2 INDICATES THE NEXT AREA 
STATION THAT HAS COUNTERS FOR WHICH COUNT 
TESTING OR SCHEDULE READOUT FUNCTIONS WILL 
BE PERFORMED HAS ID=42. 
ASCTR ID=U1,HIGHCTR=00,FOUTE=CPU,NEXTAS=42 

ASCTR ID=U2, HIGHCTR=2, ROUT E= (CPU, EXTALRM, ASLOG) 

ASCTR ID=48,HIGHCTR=00,ROUTE=CPU,NEXTAS=0 

CODING NEXTAS=0 IN THIS ASCTR HACRO 
INDICATES THAT THERE ARE HO HORE AREA 
STATIONS ON THE 2790 SISTEH THAT HAVE 
COUNTERS THAT WILL USE COUNT TESTING OR 
SCHEDULE READOUT FUNCTIONS. 
ASCTR ID=5 8,HIGHCTR=00,ROUTE=CPU,NEXTAS=0 



THE FOLLOWING CTRGROUP HACROS DEFINE EVERY 
COUNTER FOR WHICH COUNT TESTING OR SCHEDULE 
READOUT MAY BE PERFORMED. 



CTRGROUP 1, 1,1U,ID=01,SROENAB=YES,CTINIT=NCT 

THIS CTRGROUP MACRO INDICATES THAT THE 
READOUT SCHEDULE USED WILl BE THE FIRST 
SCHEDULE (1 MINUTE) DEFINED BY THE 
CTRSCHED MACRO FOR COUNTER 1 ON THE AREA 
STATION WITH ID=0 1. THE COUNT TEST 
SCHEDULE TO BE USED WILL BE THE FOURTEENTH 
SCHEDULE (183 MINUTES) DEFINED BY THE 
CTRSCHED MACRO. SROENAB=YES INDICATES THAT 
SCHEDULE READOUT WILL BE AUTOMATICALLY 
STARTED AT ICPL TIME AT THE 2715 FOR THIS 
COUNTER. CTINIT=NCT INDICATES THAT NO COUNT 
TESTING WILL BE STARTED AT ICPL TIME BY THE 
2715 FOR THIS COUNTER. 

CTRGROUP 2,2,7,ID=01 ,SROENAB=YES,CTI NIT= NCT 

CTRGROUP 3,3,10,ID=01,SROENAE=YES,CTINIT=UNASP 

CTRGROUP 6, 13,8, ID=01,CTINIT=UNASP 

CTRGROUP 7,5,9,ID=01,SROENAB=YES 

CTRGROUP 11,9,11,ID=01 ,SROENAB=IES,CTI NIT= NULL 

CTRGROUP 16 ,4,8,ID=01,CTINIT=NCT 

CTRGROUP 17,6,1,ID=01,SROENAB=YES,CTINIT=NCT 

CTRGROUP 23,7,12,ID=01,SROENAB=YES,CTINIT=NCT 

CTRGROUP 1, 1,0,ID=42,SROENAB=YES 

CTRGROUP 2,0,14,ID=42,CTINIT=NCT 
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CTRSCHED 1,2,3,4,4,3,2,1,3,1,6,90,83,183 

THE CTRSCHED HACRO DEFINES ALL THE SCHEDULES 
THAT CAB BE USED FOR SCHEDULE READOUT OR 

COUNT TESTING. EACH SCHEDULE IS DEFINED IN 
MINUTES. FOURTEEN SCHEDULES ARE DEFINED HERE. 

THE FOLLOVING GDUTRANS HACROS ASSOCIATE USER 
DEFINED TRANSACTION CODES FOR THE 2798 GDU 
HITH DEFINED TRANSACTIONS. THE TRCODE OPERAND 
INDICATES THE TRANSACTION CODE. THE TRLIST 
OPERAND INDICATES THE NAHE OF THE TRLIST HACRO 
THAT DEFINES THE CORRESPONDING TRANSACTION. 

GDUTRANS TRCODE»00,TRLIST*TESTO 
GDUTRANS THCODE*01,TRLIST=TEST1 
GDUTRANS TRCODE*02,TRLIST*TEST2 
GDUTRANS TRCODE*0 3,TRLIST=TEST3 
GDUTRANS TRCODE*04,TRLIST*TEST4 
GDUTRANS TRCODE=05,TRLIST=TEST5 
GDUTRANS TRCODE«06, TRLIST-TEST6 
GDUTRANS TRCODE»07,TRLIST*TEST7 
GDUTRANS TRCODE»08,TRLIST*TEST8 
GDUTRANS TRCODE»10,TRLIST=ROUTE1 
GDUTRANS TRCODE»1 1,TRLIST»ROUTE2 
GDUTRANS TRCODE* 12,TRLIST»TESTJOB1 
GDUTRANS TRCODE*1 3,TRLISI»TESTJOB2 
GDUTRANS TRCODE" 1 4, TRLIST=TESTJOB3 
GDUTRANS TRCODE»1 5,TRLIST»CARDORD 
GDUTRANS TRCODB*16 ,TRLIST=U ALHAINT 
GDOTRANS TRCODE*19,TRLIST=INV1 
GDUTRANS TRCODE=20,TRLIST»INV2 
GDUTRANS TRCODE=21, TRLIST»INV3 
GDUTRANS TRCODE*22,TRLIST»INV4 
GDUTRANS TRCODE»23, TRLIST=INV5 
GDUTRANS TRCODE*24,TRLIST»STOCK 
GDUTRANS TRCODE=25,TRLIST=I NPROC 
GDUTRANS TRCODE=26,TRLIST=LEADTIHB 
GDUTRANS TRCODE=27, TRLIS1«RATING 
GDUTRANS TRCODE=28,TRLIST=SUPPLIER 
GDUTRANS TRCODE=29,TRLIST«INTRANS 
GDUTRANS TRCODE=30,TRLIST*LINE 
GDUTRANS TRCODE*3 1,TRLIST«BIN 
GDUTRANS TRCODE=32,TRLIST*RAf HAT 
GDUTRANS TRCODE=33,TRLIST«ORDER 
GDUTRANS TRCODE=34 ,TRLIST«QUALCON 
GDUTRANS TRCODE=35,TRLIST=QUOTE 
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GDOTRANS TRCODE=36, TRLI ST=LASTPOR 
GDOTRANS TRCODE=37,TRLIST=ECONQTY 
GDOTRANS TRCODE=38, TRLIST=CREDIT 
GDOTRANS TRCODE=39 ,TRLIST=QOADEQN 

* THE FOLLOWING PARAHNOH HACROS ASSOCIATE OSER 

* DEFINED PARAMETER LIST VOBBERS HITH PARAHETER 

* LISTS TO BE OSED BY THE 2715 TO CHECK DISPLAY 

* ENTRIES FROH THE 2798 GDO. 

THE PLN OPERAND DEFINES THE PARAHETER LIST 
NOHBER AND THE PARHLST OPERAND INDICATES THE 
NAHE OF THE PARHLIST HACRO THAT DEFINES THE 
CORRESPONDING PARAMETER LIST. THE USER SPECIFIES 
WHICH PARAMETER LIST HE BISHES THE 2715 TO OSE 
BHEN CHECKING A 2798 DISPLAY ENTRY BY CODING 
THE PARAHETER LIST NUHBEB OF A DEFINED 
PARAMNUM HACRO IN THE PARAHNO OPERAND OF THE 
GDOLIST HACRO. 

PARAHNOH PLN=01,PARHLST=PAR1 
PARAHNOH PLN=02,PARHLST=PAR2 
PARAHNOH PLN=03,PARHLST=PAR3 
PARAHNOH PLN=04,PARHLST=PAR1 
PARAHNOH PLN=05,PARHLST=PAR5 
PARAHNOH PLN=06,PARHLST=PAR6 
PARAHNOH PLN=07,PARHLST=PAR7 
PARAHNOH PLN=08,PARHLST=PAR8 
PARAHNOH PLN=09,PARHLST=PAR9 
PARAHNOH PLN=10,PARHLST=PAR10 
PARAHNOH PLN=11 # PARHLST=PAR11 
PARAHNOH PLN=12,PARHLST=PAR12 
PARAHNOH PLN=13,PARHLST=PAR13 
PARAHNOH PLN=H»,PARHLST=PAR1»» 
PARAHNOH PLN=15,PARHLST=PAR15 
PARAHNOH PLN=16,PARHLST=PAR16 
PARAHNOH PLN=17,PARHLST=PAR17 
PARAHNOH PLN=18 # PARHLST=PAR18 
PARAHNOH PLN=19,PARHLST=PAR19 
PARAHNOH PLN=20,PARHLST=PAR20 
PARAHNOH PLN=21,PARHLST=PAR21 
PARAHNOH PLN=22,PARHLST=PAR22 
PARAHNOH PLN=23,PARMLST=PAR23 
PARAHNOH PLN=24,PARHLST=PAR24 
PARAHNOH PLN=25,PARHLST=PAR25 
PARAHNOH PLN=26,PARHLST=PAR26 
PARAHNOH PLN=27,PARHLST=PAR27 
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PARAHNUH PLN=28,PARHLST=PAR28 
PARAHNUH PLN=29,PARHLST=PAR29 
PARAHNUH PLN=30,PARHLST=PAR30 
PARAHNUH PLN=31,PARHLST=PAR31 
PARAHNUH PLN=32,PARHLST=PAR32 
PARAHNUH PLH=33,PARHLST=PAR33 
PARAHNUH PLN=31»,PARHLST=PAR3« 
PARAHNUH PLN=35,PARHLST=PAR35 
PARAHNUH PLN=36,PARHLST=PAR36 
PARAHNUH PLN=37,PARHLST*PAR37 
PARAHNUH PLN=38,PARHLST=PAR38 
PARAHNUH PLN*39,PARHLST=PAR39 

THE FOLLOWING PASHLIST HACROS GENERATE THE 
PARAHETER LISTS TO BE USED BY THE 2715 TO 
CHECK DISPLAY ENTRIES FROH THE 2798 GDU. 

PARI PARHLIST CKHONKY=NO,TRANSL=I ES 

THIS HACRO INDICATES THE 2715 WILL NOT 
CHECK THE DISPLAY ENTRY TO SEE IF THE HON IT OR 
KEY IS ON AND THE TRANSLATE FUNCTION HAY BE 
USED. 
AR2 .PARHLIST CKLNGTH= (17,11) 

THIS HACRO INDICATES THAT IF THE LENGTH OF A 
2798 GDU ENTRY LENGTH IS NOT 17 CHARACTERS 
LONG (16 DATA CHARACTERS PLUS HONITOR KEY BYTE), 
THEN OPERATIONAL GUIDANCE LIGHT 11 WILL BE 
TURNED ON AT THE 2798 TO INDICATE AN ERROR. 

PAR3 PARHLIST CKHONKY=YES, CKHOD1 1= ( 15, 2, 13) , IDEHT«IES 

THIS HACRO INDICATES THAT THE 2715 WILL CHECK 
THE HONITOR KEY BYTE IN THE GDU ENTRY TO INSURE 
THAT IT WAS ON. IF THE HONITOR KEY IS OFF, THE 
ERROR GUIDANCE DEFINED BY THE HONERR OPERAND 
OF THE CONFIG UR HACRO HILL BE DISPLAYED ON THE 
2798. THE HODULUS 11 CHECK WILL BE 
PERFORHED BY THE 2715 IN POSITIONS 
15 AND 16. THE CHECK CHARACTER HILL BE IN 
POSITION 17. IF THE HODULUS 11 YALUE DOES NOT 
EQUAL THE CHECK CHARACTER THEN OPERATIONAL 
GUIDANCE LIGHT 13 WILL BE TURNED ON AT THE 
2798 TO INDICATE AN ERROR. THE STORE OR GET 
IDENTIFIER FUNCTION HAY BE USBD IN THIS DATA 
ENTBY. 

PAR* PARHLIST CKHONKY=YES,CKHOD10= (1 5,2, 13) ,IDENT*IES 
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PAR5 PARHLIST CKOR = (2,C1,C6, D2,D7, E4) , 0BGUID»9 

* THIS HACBO INDICATES TBAB AN OB CHECK WILL BE 

* PEBFOBHED OH THE CHABACTEB IN POSITION 2 OP THE 

* 2798 GDU ENTBY FOB ONE OF THE FOLLOBIHG EBCDIC 

* CHABACTEBS: A,F,K,P,OB 0. IF THE CHABACTEB IN 

* POSITION 2 IS NOT ONE OF THE SPECIFIED 

* CHAHACTERS, THEN OPEBATIONAL GUIDANCE LIGHT 9 

* HILL BE TDBNED ON AT THE 2798 TO INDICATE AN 

* EBBOR. 

PAB6 PARHLIST CKOB= (3,C2,C7, D3, D8, E5) ,ORGUID=9 

PAR7 PARHLIST CKOR= (4,C3,C8,D4 ,D9,E6) ,ORGUID=9 

PAB8 PARHLIST CKOR= (5, C4,C9, D5,E2, E7) , ORGUID=9 

PAR9 PARHLIST CKOR= (6,C5,Dl , D6 ,E3,E8) ,ORGUID=9 

PAB10 PARHLIST CKOR= {7, E9,7B, P1 , F6,7C) ,ORGUID=9 

PAH11 PARHLIST CKOR= (8, 7F,5A ,F2,F7,61 ) ,0RGUID=9 

PAR12 PARHLIST CKOR= (9, 7E, 5E, F3, F8, 15) . ORGUID=9 

PAR13 PARHLIST CKOR= (10,7 A,5C,F4, F9, 25) ,ORGUID=9 

PAR14 PABHLIST CKOR= ( 1 1,6F, 4E,F5,F0, 05) ,0RGUID=9 

PAR15 PARHLIST CKOB= (12 ,5B,6B) , OBG0ID=9 

PAB16 PARHLIST CKOB= ( 13,50, 4B) ,ORGUID=9 

PAR17 PARHLIST CK0R= (14,60,40) , ORGUID=9 

PAR18 PARHLIST CKOR= (15, 5A) ,ORGUID=9, * 

CKAND=(2,14,F1,F2,F3,F4,F5,F6,F7,F8,F9,F0,7C,61,1S) , * 

ANDGUID=16 

THIS HACRO INDICATIS THAT AN OR CHECK BILL BE 
PERFORMED ON THE CHARACTER IN POSITION 15 OF 
THE 2798 ENTRY FOR AN 1 CHARACTER. IF IT IS NOT, 
OPERATIONAL GUIDANCE LIGHT 9 HILL BE TUBNED 
ON AT THE 2798 TO INDICATE AN EBBOB. ALSO, AN 
AND CHECK IS PERFORHED AND THE CHABACTEBS IN 
POSITIONS 2 THBOUGH 14 BUST BE EXACTLY THE 
FOLLOHING CHABACTEBS: 1 , 2,3 ,4,5 ,6,7,8,9,0, », 1, 
NEH LINE. IF THE AND CHECK IS NOT SATISFIED, 
OPEBATIONAL GUIDANCE LIGHT 16 HILL BE 
TURNED ON AT THE 2798 TO INDICATE AN ERROR. 

PAR19 PARHLIST CKOR= (16,05) ,ORG0ID=9, * 

CKAND= (2,15,7F,7E,7A, 6F,5A, 5E,5C, 4E,5B, 50,60, 25,6B,4B) , * 
ANDGUID=16 

PAR20 PARHLIST CK0R= (17, 4E) ,0RGUID=9, * 

CKAND=(2,16,D8,D9,E2,E3,E4,E5,E6,E7,E8,E9,7B,40,6B,4B, * 
05) ,ANDGUID=16 

PAR21 PARHLIST CKAND= (2, 17, C1 ,C2,C3 ,C4,C5 ,C6,C7 ,C8 ,C9 ,D1 , D2 , D3, D4 * 

D5,D6,D7) ,ANDGUID=16 

PAR22 PARHLIST CKNUH= (2, 17, 12) 

THIS HACRO INDICATIS THAT CHARACTERS IN 
POSITIONS 2 THROUGH 17 BUST BE NUHERIC. IF 
ALL THE CHARACTERS IN THE FIELD ARE NOT 
NUHERIC, OPERATIONAL GUIDANCE LIGHT 12 
HILL BE TURNED ON AT THE 2798 TO INDICATE AN 
ERROR. 
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PAR23 PARHLIST CKN0NUH= (2,17, 10) 

* THIS HACRO INDICATES THAT POSITIONS 2 THROUGH 

* 17 WILL BE CHECKED TO INSORE THAT ALL 

* CHARACTERS ARE NON-NUHERIC. IF A HUHERIC 

* CHARACTER IS POUND IN THE PIELD # 

* OPERATIONAL GUIDANCE LIGHT 10 WILL BE TURNED ON 

* AT THE 2798 TO INDICATE AN ERROR. 

PAR24 PARHLIST CKRANGE= (2, 17, 73 ,00, 00,00, 00,00,00,00,00 ,00, 00,00, * 

00,00,00,00) ,HIGUID=9,LOWGUID=13 
PAR25 PARHLIST CKHONKT=YES,CKLNGTH= (8,11) ,CKNUH= (7,8,12), * 

CKAHD= (2,6,5B,00,00,00,4B) ,ANDG0ID=10 
PAR26 PARHLIST CKHONKY=YES,CKLNGTH= (17,11) ,CKH0D1 1= (6,11,13) , * 

IDENT=YES,CKHOD10= (5,2,9) , CKOR= (8, 5C,60, FO ,4E, 40, * 

ORGUID=10 
PAR27 PARHLIST CKLNGTH=(13, 11) ,CKHOD10= (11,2,13) ,CKHONKY= YES, * 

IDENT=YES 
PAR28 PARHLIST CKNUH= (2,4, 12) ,CKNONUH = (5,6 , 10) ,CKRANGE= (7 ,8 ,8 1,81) , * 

HIGUID=9,LOWGUID=13 
PAR29 PARHLIST CKLNGTH= (3 , 1 1) ,CKOR= (2 ,C1 ,C2 ,C3 ,C4 # C5) ,ORGUID= 10, * 

CKM0H= (3,3,11) 
PAR30 PARHLIST CKOR= (2,4E,60) ,ORGUID= 10,CKNUH= (3, 5, 12) 

PAB31 PARHLIST CKLNGTH= (6, 1 1) ,CKRANGE= (2,6, 10,09,55 ,00,00 ) , * 

HIGUID=9,LOWGUID=13 
PAR32 PARHLIST 

PAR33 PARHLIST CKLNGTH= (7 , 1 1 ) ,CKNUH= (2, 7, 12) , IDENT=YES 

PAR34 PARHLIST CKLNGTH=(5, 11) ,CKOR= (2, 4E, 60) ,ORGUID=10, * 

CKRANGE= (3,5,10,50,00) , * 

RIGUID=9,L0WGUID=13,RNGETST=EHB0R 
PAR35 PARHLIST CKLNGTH= (1 1 , 1 1 ) , CKOR= (4,C4,E3) ,OBGUID= 10,CKAND= (2, 3, * 

E2,D3) ,ANDGUID=10,CKRANGE= (5,11,55,88,00,73,80,39,78) , * 

HIG0ID=9,LOWGUID=13,BNGETST=ERROR 
PAR36 PARHLIST CKLNGTB= (9 , 1 1) ,CKHOD 1 1= (7, 2, 13) , IDENT=YES 

PAR37 PARHLIST CKHONKY=YES,IDENT=YES 

PAB38 PARHLIST CKRANGE= (2,3,50,90) , * 

HIGUID=9,L0WGUID=13,RNGETST=ERR0R 

* THIS HACRO INDICATES THAT A RANGE CHECK WILL BE 

* PERFORMED ON POSITIONS 2 AND 3 TO CHECK THAT 

* THEIR VALUE LIES BETWEEN 00 AND 59. IF THE 

* VALUE OP THE PIELD IS HIGHER THAN 59, 

* OPERATIONAL GUIDANCE LIGHT 9 IS TURNED ON 

* AT THE 2798. IF THE VALUE OF THE FIELD IS 

* LESS THAN 0, OPERATIONAL GUIDANCE LIGHT 13 

* IS TURNED ON AT THE 2798. RNGETST=ERROR 

* INDICATES THAT THE 2715 WILL NOT ACCEPT 

* RANGE TEST BOT TREATS IT AS AN ERROR. 
PAR39 PARHLIST CKLNGTH= ( 1 1 , 1 1 ) ,CKNUH= (8 , 1 1 , 12 ) , 

CKAND= (2,7,F2,F3,F9,F5,P1,F1),ANDGUID=13 * 
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D61 


DISPGUID 


DISPHSG=* 


D62 


DISPGOID 


DISP»SG=« 


DG3 


DISPGUID 


DISPBSG«* 


DG4 


DISPGUID 


DISPHSG=' 


DG5 


DISPGUID 


DISPBSG-* 


DG6 


DISPGUID 


DISPBSG=» 


DG7 


DISPGUID 


DISPDSG- 1 


DG8 


DISPGUID 


DISPBSG*" 


DG9 


DISPGUID 


DISPHSG>' 


DG10 


DISPGUID 


DISPBSG** 


DG11 


DISPGUID 


DISPBSG= • 


DG12 


DISPGUID 


DISPHSG** 


DGU 


DISPGUID 


DISPBSG=* 


DG15 


DISPGUID 


DISPBSG=* 


DGU 


DISPGUID 


DISPBSG** 


DG17 


DISPGUID 


DISPBSG=* 


0G18 


DISPGUID 


DISPBSG'* 


DG19 


DISPGUID 


DISPBSG** 


DG20 


DISPGUID 


DISPBSG=* 


DG21 


DISPGUID 


DISPBSG** 


DG22 


DISPGUID 


DISPBSG=* 


DG23 


DISPGUID 


DISPBSG=* 


DG24 


DISPGUID 


DISPBSG=* 


DG25 


DISPGUID 


DISPBSG=* 


DG26 


DISPGUID 


DISPBSG** 


DG27 


DISPGUID 


DISPBSG=* 



the folloitmg dispguid hacros define the 
display guidance bessages that can be 
displated when a transaction step is entered, 
the hseft indicates which hessage he hants 
displayed at the 2798 for a step by coding 
the name of a dispguid hacbo in the disprsg 
operand of a gdullst hacro. coding suppres=no 
in any of the follohing dispguid bacbos 
indicates that whenever the defined data in 
the particular hacro is iritten to the 2798 
display by the 2715, that data will be returned 
to the 2715 on the next activation of the 
Enter key unless it has been changed by the 
operator. coding suppresses or ohitting the 
operand indicates that wbenever the defined 
data in the particular dispguid hacro is 
britten to the 2798 display by the 2715, that 
data will not be returned to the 2715 on the 
next activation of the enter key. 



2=1ENTR TESTDATA* 

DEPRESS ENTER *,SUPPRBS»NO 

STEP 2* 

STEP 3* 

STEP 4* 

STEP 5* 

GET/STORE* 

3-1ENTR SERVCODE* 

3-2BLDG/COLUBN* 

BAT 1-1 • 

BAT 2-2 • 

SELECT LBVR TO 3* 



BAT 1-2 

OLD PART* 

NEW PART' 

TRANSLATE* 

ENTER TEXT* 

LOCATE20-ORDER21' 

STOCK24-INPBOC25* 

PRICE22-OTHER23* 

QU035-LP36-QTY37* 

LT26-RAT27-SUP28* 

IT29-IIN30-BIH31* 

RH32-OHD33-QC34* 

RAIT YOB ANSWER* 

23951 1*,SUPPRES*NO 



SL* ,SUPPRES*NO 
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DG28 DISPGUID DlSPHSG=»TOTAL PURCHASE 1 

DG29 DISPGUID DISPHSG=*3-2 TO ADR=» 

DG37 DISPGUID DISPHSG=«QUAD EQN A=« 

DG38 DISPGUID DISPHSG=»B=» 

DG39 DISPGUID DISPHSG=«C=» 

THE FOLLOWING TRANSLAT flACROS EACH ASSOCIATE 
A USER DEFINED TRANSLATE CHARACTER WITH UP TO 
14 CHARACTERS OF TEXT. THE USER CAN ONLY USE 
THE TRANSLATE FUNCTION ON ANY TRANSACTION 
STEP (GDULIST HACRO) THAT HAS A PARAHETER LIST 
NUHBER (PARAHNO OPERAND) ASSOCIATED VITH A 
.. PARHLIST HACRO THAI HAS TRANSL=TES CODED. 

TRANSLAT TR ANSCH=C3,TRAHTXT=« CE • 
TRANSLAT TR ANSCH=C4,TRANTXT=» DOCTOR* 
TRANSLAT TRANSCH=C6 ,TRANTXT=» FIRE* 
TRANSLAT TR ANSCH=C9,TRANTXT=» IBH HAINT* 
TRANSLAT TRANSCH=D4,TRANTXT=« HOVER REQUIRED* 
TRANSLAT TR ANSCH=D9,TRANTXT=« ;N» 
TRANSLAT TR ANSCH=E3,TRANTXT=« TEL REPAIR* 
TRANSLAT TR ANSCH=E5,TRANTXT=« VENDING HACH* 

* THE FOLLOWING HACROS DEFINE THE USER 

* TRANSACTIONS. EACH TRANSACTION BEGINS VITH A 

* TRLIST HACBO WHICH GENERATES THE TRANSACTION 

* LIST HEADER AND CONTAINS FROH 1 TO 16 

* HACROS: ASLIST, DEDLIST, CTRLIST, GDULIST. FROH 1 

* TO 160 TRANSACTIONS HAY BE SPECIFIED BY THE 

* USER WITH TRID VALUES BETWEEN AND 159. 
* 

CPU TRLIST ROUTE=CPU,TRID=0 

DEDLIST 
» THE CPU TRANSACTION CONSISTS OF 1 STEP AND 

* WILL BE ROUTED TO THE CPU. 
BADGE TRLIST ROUTE= (LOG) ,TRID=1 

ASLIST B,NORH=19 

* THE BADGE TRANSACTION CONSISTS OF 1 STEP AND 

* WILL BE ROUTED TO THE 2740 ATTACHED TO THE 2715. 

* THE DATA ENTRY WILL BE A BADGE ENTERED AT THE 

* AREA STATION WITH GUIDANCE LIGHT 19 TURNED ON 

* WHEN THE TRANSACTION STEP IS ENTERED. 
BADGE1 TRLIST ROUTE= (CPU, LOG) ,TRID=2, DEHOD10=YES, INQDISP'YES 

ASLIST B,NORH=31,HODULUS= (2,10,4) ,LENGTH= (1 1 ,2) ,INQDISP=7 

* THE BADGE1 TRANSACTION CONSISTS OF 1 STEP AND 

* WILL BE ROUTED TO BOTH THE CPU AND THE 2740. A 

* MODULUS 10 CHECK WILL BE PERFORHED OR POSITIONS 
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2 THROUGH 10 AND HILL BE CHECKED WITH THE SELF- 
CHECK CHARACTER IN POSITION 11. IF THE MODULUS 
10 CHECK FAILS, GUIDANCE LIGHT 4 WILL BE TURNED 
ON. THE DATA ENTRY WILL BE A BADGE ENTERED AT 
THE AREA STATION WITH GUIDANCE LIGHT 4 TURNED 
ON iHEN THE TRANSACTION STEP IS ENTERED. THE 
LENGTH OF THE CATA ENTRY HILL ALSO BE CHECKED 
AND IF THE LENGTH IS NOT 11, GUIDANCE LIGHT 2 
HILL BE TURNED ON. THIS TRANSACTION IS ALSO AN 
INQUIRY DISPLAY TRANSACTION. GUIDANCE LIGHT 7 ON 
THE AREA STATION HILL BE TURNED ON HHEN THIS 
TRANSACTION IS RECEIVED BY THE 2715 AND ROUTED 
TO THE CPU AS PRIORITY DATA. THIS IS REALLY THE 
INQUIRY-IN-PROCESS GUIDANCE LIGHT. IF THE 
INQUIRY IS ABORTED BY THE OPERATOR AT THE 2791 
AREA STATION, GUIDANCE LIGHT 1 HILL BE TURNED ON 
AUTOMATICALLY. ALL AREA STATIONS THAT USE 
INQUIRY DISPLAY TRANSACTIONS HUST RESERVE 
GUIDANCE LIGHT 1 FOR TBE INQUIRY ABORT 
SITUATION. 
HANUAL TRLIST ROUTE* (DISK, LOG) ,TRID= 3 

ASLIST H,NORH=27,LENGTH=(5,23) 

ASLIST H,NORM=26, LENGTH* (5, 22) 

ASLIST H,NORH=25,LENGTH*(7,21) ,ENTRY=H 

THE HANUAL TRANSACTION CONSISTS OF 3 STEPS 
AND HILL BE ROUTED TO THE 2715 DISK AS DEFERRED 
DATA AND TO THE 2740. HANUAL DATA ENTRIES HILL 
BE HADE FOR ALL 3 STEPS. FOR THE FIRST STEP, 
GUIDANCE LIGHT 27 HILL BE TURNED ON HHEN THE 
STEP IS ENTERED AND GUIDANCE LIGHT 23 HILL BE 
TURNED ON IF THE DATA ENTRY LENGTH IS NOT 5. 
FOR THE SECOND STEP, GUIDANCE LIGHT 26 HILL BE 
TURNED ON HHEN TBE STEP IS ENTERED AND GUIDANCE 
LIGHT 22 HILL BE TURNED ON IF THE DATA ENTRY 
LENGTH IS NOT 5. FOR TEE THIRD STEP, GUIDANCE 
LIGHT 25 HILL BE TURNED ON HHEN THE STEP IS 
ENTERED AND GUIDANCE LIGHT 21 HILL BE TURNED OH 
IF THE DATA LENGTH IS NOT 7. THE THIRD STEP IS 
A MULTIPLE ENTRY STEP SO THAT 7 CHARACTERS CAN 
BE ENTERED. 
CARD TRLIST ROUTE= (LOG) ,TRID=4 

ASLIST C,NORH*17 
CARD1 TRLIST ROUTE= (DISK, LOG) ,T BID=5 

ASLIST C,NORH=30,DIGIT=(2,1,10) ,LENGTH= (47, 1 1) 

ASLIST H,N0RH=18,LENGTH=(6,11) 

* THE CARD1 TRANSACTION CONSISTS OF 2 STEPS AND 

* HILL BE ROUTED TO THE 2715 DISK AND TO THE 
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2740. THE PIRST STEP WILL BE A CARD ENTBT WITH 
GUIDANCE LIGHT 30 TURNED ON WHEN THE STEP IS 
ENTERED, IF THE CHARACTER IN POSITION 2 OP THE 
DATA ENTRY IS NOT THE EBCDIC CHARACTER P1, THEN 
GUIDANCE LIGHT 10 IS TURNED ON. IF THE LENGTH OF 
THE CARD ENTRY IS NOT 47, THEN GUIDANCE LIGHT 11 
IS TURNED ON. THE SECOND STEP WILL BE A HANUAL 
ENTRY WITH GUIDANCE LIGHT 18 TURNED ON WHEN THE 
STEP IS ENTERED. IP THE LENGTH IS NOT 6, THEN 
GUIDANCE LIGHT 11 IS TURNED ON. 
CARD2 TRLIST ROUTE= (CPU, LOG) ,TRID=6 ,DEHOD1 1=YES,INQDISP=YES 

ASLIST C,NORfl=29,HODULUS=(2,15,5) ,LENGTH=(17, 11) 

ASLIST B,NORH = 20 r LENGTH=(11 ,2) 

ASLIST H,N0RH=15,INQDISP=7 
EXP1 TRLIST ROUTE= (CPU, LOG) , TRID=7, DEHOD10=YES, INQDISP'YES 

ASLIST B,NORH=16,HODULUS= (2,9,4) ,INQDISP=7 
EXP2 TRLIST ROUTE= (CPU ,LOG) ,TRID=8, DEHOD1 1=YES 

ASLIST B,NORH=16,MODULUS= (2,9,5) 

* THE EXP2 TRANSACTION CONSISTS OP 1 STEP AND 

* BILL BE ROUTED TO THE CPU AND TO THE 2740- THE 

* DATA ENTRY WILL BE A BADGE ENTERED AT THE AREA 

* STATION WITH GUIDANCE LIGHT 16 TURNED ON WHEN 

* THE TRANSACTION STEP IS ENTERED. A HODULUS 11 

* CHECK WILL BE PERFORMED ON POSITIONS 2 THROUGH 

* 10 AND WILL BE CHECKED WITH THE SELP-CHECK 

* CHARACTER IN POSITION 11. IF THE HODULUS 11 

* CHECK PAILS, GUIDANCE LIGHT 5 WILL BE TURNED ON. 
EXP3 TRLIST ROUTE= (CPU, LOG) ,TRID=9 ,DEHOD10= YES ,INQDISP=I ES 

ASLIST B,NORH=16,HODULUS= (2,7,4) 

ASLIST C,N0RH=17,INQDISP=7,ENTRY=H 

EXP4 TRLIST ROUTE= (LOG) ,TRID=10 

ASLIST B,NORfl=16,DIGIT=(3,5,10) ,LENGTH= (11 ,11) 

* THE EXP4 TRANSACTION CONSISTS OF 1 STEP AND 

* WILL BE ROUTED TO THE 2740. THE STEP WILL BE A 

* BADGE ENTRY WITH GUIDANCE LIGHT 16 TURNED ON 

* WHEN THE STEP IS ENTERED. GUIDANCE LIGHT 10 WILL 

* BE TURNED ON B Y THE 2715 IF THE CHARACTER IN 

* POSITION 3 IS NOT THE EBCDIC CHARACTER F5. 

* GUIDANCE LIGHT 11 NILL BE TURNED ON IF THE 

* LENGTH OF THE DATA ENTRY IS NOT 11. 
EXP5 TRLIST BOUTE= (LOG) ,TRID=1 1 

ASLIST B,NORH=16 

DEU1 TRLIST ROUTE=LOG, TRID=1 2 

DEULIST DIGIT= (2, 1) ,DIGIT2= (3,1) 

* THE DEU1 TRANSACTION CONSISTS OF 1 STEP AND 

* WILL BE ROUTED TO THE 2740. THE DATA ENTRY WILL 

* BE HADE FROM A DATA ENTRY UNIT. AN ERROR HILL BE 

* INDICATED AT THE DEU IF POSITION 2 DOES NOT 

* CONTAIN THE EBCDIC CHARACTER F1 OR IF POSITION 

* 3 DOES NOT CONTAIN THE EBCDIC CHARACTER F1. 
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DEU2 TRLIST ROUTE* (LOG) ,TRID=1 3,DEHOD1 0=YES 

DEOLIST DIGIT2=(2,1),HODULUS= (3,10) 
DE03 TRLIST ROUTE= (LOG) # TRID=14,DEH0D1 1=YES 

DEULIST DIGIT2= (2,5) ,HODULUS= (3,10) ,LENGTH=13 
DEU4 TRLIST ROUTE= (LOG) ,TRID=1 5 

DEULIST DIGIT= (2,6) ,DIGIT2= (3,9) LENGTH=11 
DEUEXP TRLIST ROUTE= (LOG, NULL) ,DEH0D1 0=YES,TRI D=16 ,TEXT= YES 

DEULIST MODULUS* (3,10) ,MSG=» THIS IS AN EXPANDED TRANSACTION* 
THE DEUEXP TRANSACTION CONSISTS OF 1 STEP AND 
HILL BE ROUTED TO THE 2740 AND TO THE PRINTER 
ATTACHED TO THE AREA STATION THAT HILL BE 
SPECIFIED BY THE OPERATOR IN THE FIRST DATA 
ENTRY. THE DATA ENTRY HILL BE ENTERED FROH A DEU 
AND A DEFINED HESSAGE (IMPLICIT TEXT) HILL BE 
INCLUDED HITH THE TRANSACTION. A MODULUS 10 
CHECK HILL BE PERFOBHED ON POSITIONS 3 THROUGH 
10 AND HILL BE COHPARED HITH THE CHECK 
CHARACTER IN POSITION 11. IF THE MODULUS 10 
CHECK FAILS, THEN THE RED ERROR BUTTON HILL BE 
INDICATED AT THE DEU. 
DEU6 TRLIST ROUTE= (LOG) ,TRID=17 

DEULIST 
EXPALH TRLIST ROUTE= (CPU, 59) ,TEXT=YE S,TRID=18 

DEULIST HSG=«* VENI VIDI VICI AT THO PRINTERS, I HOPE* 

THE EXPALH TRANSACTION CONSISTS OF 1 STEP AND 
HILL BE ROUTED TO THE CPU AND TO THE PRINTER 
ON THE AREA STATION HHOSE ID IS 59. THE DATA 
ENTRY HILL BE ENTERED FROH A DEU AND A DEFINED 
HESSAGE HILL BE ROUTED ALONG HITH THE 
TRANSACTION. 
EXPALHTX TRLIST ROUTE= (CPU, 59) ,TEXT=YES,TRID=19 

DEULIST HSG=» • TYPE AT THO PRINTER AND NO ALARM* 
EXPTX TRLIST ROUTE=U2,TRID=20 

DEULIST 

CTRLIST DEVCOD=B,CTRADR=IMP,CTRRD=SINGLE,CTTEST*MULL, X 

CTROP=READ 
RDIPSG TRLIST ROUTE=LCG,TRID=2 1 

DEULIST 

CTRLIST DEVCOD=B,CTRADR=INP,CTRRD=SINGLE,CTTEST«MULL, X 

CTROP-READ 

THE RDIPSG TRANSACTION CONSISTS OF 2 STEPS AND 
HILL BE ROOTED TO THE 2740. THE FIRST STEP IS A 
DATA ENTRY FROH A DEU. THE SECOND STEP IS THE 
PULSE COUNT DATA ENTRY. THIS STEP HILL CAUSE THE 
SINGLE COUNTER HHOSE IMPLIED ADDRESS RESULTS 
FROM THE CONVERSION OF THE DEVICE ADDRESS OF 
THE DEU INITIATING THE REQUEST. THERE HILL BE 
NO CHANGE IN THE PRESENT COUNT TEST CONDITION 
OF THE COUNTER. 
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BDEPSGM TBLTST FOUTE=LOG,TRID= 22 

DEDLIST 

CTRLIST DEVCOD=H,CTRADR=EXP,CTRRD=SINGLE,CTTEST=NULL, X 

CTROP=BEAD 

THE BDEPSGH TRANSACTION CONSISTS OF 2 STEPS 
AND WILL BE BO UTED TO THE 2740. THE FIRST STEP 
IS A DATA ENTfiY PBOH A DEO. THE SECOND STEP IS 
THE PULSE COUNT DATA ENTHI SET OP TO BEAD THE 
SINGLE COUNTER WHOSE ADDBESS IS EXPLICITLY 
SPECIFIED IN THE MANUAL DATA ENTRY. THERE WILL 
BE NO CHANGE IN THE PBBSENT COUNT TEST 
CONDITION OF THE COONTEB. 
BDEPSGB TRUST ROUTE=LOG,TRID= 23 

DEULIST 

CTBLIST DEVCOD=B,CTBADB=EXP,CTBBD=SINGLE,CTTEST=NULL, X 

CTBOP=BEAD 
BDEPGPH TRLIST ROUTE* LOG, TRID=24 

DEULIST 

CTBLIST DEVCOD=M,CTRADR=EXP,CTRRD=GROOP,CTTEST*NULL, X 

CTBOP=BEAD 
BDEPGPB TRLIST BOUTE=LOG,TBID= 25 

DEULIST 

CTBLIST DEVC0D=B,CTBADB=EXP,CTBBD=GHO0P,CTTEST=N0LL, X 

CTROP=READ 

* THE BDEPGPB TBANSACTION CONSISTS OF 2 STEPS 

* AND WILL BE BOUTED TO THE 2740. THE FIBST STEP 

* IS A DATA ENTBY FROM A DEO. THE SECOND STEP IS 

* THE PULSE COUNT DATA ENTBY SET UP TO BEAD THE 

* GROUP OF COUNT EBS THAT WILL BE EXPLICITLY 

* SPECIFIED IN THE BADGE DATA ENTBY. THESE WILL 

* BE NO CHANGE IN THE PBESEMT COONT TEST 

* CONDITIONS OF ANY OF THE COUNTEBS. 
RDRSTIP TRUST BOUTE=LOG,TBID=26 

DEULIST 

CTBLIST DEVCOD=B,CTRADB=IMP,CTBHD=SINGLE # CTTEST=NULL, X 

CTBOP=BEADBST 

THE BDBSTIP TRANSACTION CONSISTS OF 2 STEPS 
AND WILL BE BOUTED TO THE 2740. THE FIBST STEP 
IS A DATA ENTBY FBOH A DEO. THE SECOND STEP IS 
THE POLSE COUNT DATA ENTBY. THE SINGLE COUNTER, 
WHOSE ADDRESS IS IMPLIED FBOH THE CONVERSION 
OF THE DEVICE ADDRESS OF THE DEU INITIATING 
THE BEQUEST, WILL BE BEAD AND THEN THAT COONTEB 
WILL BE BESET. THEBE WILL BE NO CHANGE IN THE 
PBESENT COUNT TEST CONDITION OF THE COONTEB. 
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RDRSTEPH 



**♦ FIRST SET 
********* 

RDSTIPH 



RDSTBPH 



RDSTEPB 



RDSIDEPN 



RDSIDGPM 



ROSIDGPB 



WRIPB 



TRLIST ROOTE=LOG,TRIE=27 
DEOLIST 

CTRLIST DEVCOD=H,CTBADR=EXP,CTRRD=SINGLE,CTTEST=NOLL, X 

CTROP=READRST 
OF EXPANSION TRANSACTIONS FOR 2796 TC81-TC89 ♦** 

********* 
TRLIST RODTE= (LOG, 42) ,TRID=28 
DEOLIST 
CTRLIST DEVCOD=fl,CTRADR=IHP,CTRRD=SINGLB,CTTEST=IOLL # X 

CTROP=READSET 
TRLIST ROUTE= (LOG,42) ,TRID=29 
DEOLIST 

CTRLIST DEVCOD=H,CTRADR=EXP,CTRRD=SINGLE,CTTEST=NOLL, X 

CTROP=READSET 

THE RDSTEPH TRANSACTION CONSISTS OF 2 STEPS 
AND HILL BE ROOTED TO THE 2740 AND TO THE 
PRINTER ON THE AREA STATION HHOSE ID IS 42. 
THE FIRST STEP IS A DATA ENTRY FROH A DEO. 
THE SECOND STEP IS THE POLSE COORT DATA ENTRY 
SET OP TO READ THE SINGLE CQONTER, WHOSE ADDRESS 
IS EXPLICITLY SPECIFIED IN THE HANOAL DATA 
ENTRY, AND THEN TO SET THE COOHTER TO THE 
EXPLICITLY SPECIFIED YALOE. THERE WILL BE NO 
CHANGE IN THE PRESENT COONT TEST CONDITION OF 
THE COONTER. 
TRLIST RO0TE=(LOG, 42) ,TBID=30 
DEOLIST 
CTRLIST DEVCOD=B,CTRADR=EXP,CTRRD=SINGLE,CTTEST=N0LL, X 

CTROP= BEADS ET 
TRLIST RO0TE=(LOG,42) ,TBID=31 
DEOLIST 
CTRLIST DEVCOD=M,CTRADR=EXP,CTRRD=SINGLE,CTTEST=N0LL, X 

CTFCP=RDRESID 
TRLIST RO0TE=(LOG,42) ,TRID=32 
DEOLIST 
CTRLIST DEVCOD=H,CTRADR=EXP,CTRRD=GROOP,CTTEST=HOLL, X 

CTEOP=RDRESID 
TRLIST RO0TE=(LOG,42) ,TRID=33 
DEOLIST 
CTRLIST DEVCOD=B,CTRADR=EXP,CTRRD=GRO0P,CTTEST=N0LL, X 

CTSOP=RDRESID 
TRLIST RO0TE=LOG,TRID=34 
DEOLIST 

CTRLIST DEVCOD=B,CTRADR=mP,CTRRD=SINGLE,CTTEST=NOLL, X 

CTROP=SET 
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WREPH 



RDGPEPAA 



RDGPEPBB 



RDSIEPAA 



RDHSIEP 



RDSIIPAA 



RDSITPAB 



EXP 



READ 



TRUST RO0TE*LOG,TRIC=35 
DEULIST 

CTRLIST DEVCOD=H,CTRADR=EXP,CTRFD*SINGLE,CTTEST»N0LL, X 

CTROP=SET 

THE HREPM TRANSACTION CONSISTS OF 2 STEPS AND 
HILL BE ROOTED TO THE 2740. THE FIRST STEP IS 
THE PDLSE COUNT DATA ENTRY SET OP TO SET THB 
SINGLE COONTER, WHOSE ADDRESS IS EXPLICITLY 
SPECIFIED IN THE HANOAL ENTRY, TO THE HANOAL 
VALOE SPECIFIED AT THE DEO. THERE HILL BE NO 
CHANGE IN THE PRESENT COONT TEST CONDITION OF 
THE COONTER. 
TRLIST ROOTE=42,TRID=36 
DEOLIST 
CTRLIST DEVCOD=B,CTRADR=EXP,CTRRD=GHO0P,CTTEST=M0LL, X 

CTROP=READ 
TRLIST R00TE«59,TRID=37 
DEOLIST 

CTRLIST DEVCOD«M,CTRADR-EXP,CTRRD»GROUP,CTTEST=NULL, X 

CTROP-READ 

TRLIST RO0TE=42,TEXT»YES,TRID»38 
DEOLIST 

CTRLIST DEVCOD=B,CTRADR=EXP,CTRRD=SINGLE,CTTEST»M0LL, X 

CTROP=BEAD,HSG«»A SINGLE COONTER SHOOLD ACCOMPANY X 
THIS MESSAGE* 
TRLIST R00TE*42,TEXT=YES,TRID=39 
DEOLIST 

CTRLIST DEVCOD=N,CTRADR=EXP,CTRRD=SINGLE,CTTEST»NOLL, X 

CTROP-READ # HSG»'A SINGLE COUNTER SHOOLD ACCOMPANY X 
THIS MESSAGE' 
TRLIST ROOTE'42 # TEXT*YES,TRID»40 
DEOLIST 

CTRLIST DEVCOD=B,CTRADR=IHP,CTHBD=SINGLE.CTTEST=NOLL, X 

CTROP=READ,NSG* f •••THIS IS AN ALARM MESSAGE HITH X 
A COONTER 1 
TRLIST ROUTE=59,TEXT=YES,TRID=41 
DEULIST 

CTRLIST DEVCOI>B,CTRADR=IMP,CTRRD=SINGLE,CTTEST=NULL, X 

CTROP>READ # HSG-*' ** ALARM MESSAGE AT TWO AREA STATIONS X 
AND A COUNTER VALUE AT ONE* 
TRLIST ROUTE=LOG,TRID=42 
DEOLIST 
CTRLIST DEVCOD=B,CTRADR=EXP,CTRRD=SINGLE,CTTEST=NOLL, X 

CTROP=READ 
TRLIST ROUTE=LOG,TRID=43 
DEULIST 

CTRLIST DEVCOD=B,CTRADR=IHP,CTRRD=SINGLB,CTTEST=H0LL, X 

CTROP=READ 
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READST TBLIST B0UTE=LOG,T RID=44 

DEULIST 

CTBLIST DEVCOD=B,CTRADB=IHP,CTBBD=SINGLE,CTTEST=NULL, X 

CTROP=READSET 
READSID TRLIST ROUTE=LOG,TRID=45 

DEULIST 

CTBLIST DEVCOD=B,CTRADB=IMP,CTRRD=SINGLE,CTTEST=NULL, X 

CTBOP=RDRESID 
ALARH TBLIST ROUTE= (LOG, 42) . TEXT=YES,TRID=46 

DEULIST MSG=»» • 
ALARHTX TBLIST BOUTE= (LOG, 42) , TEXT=Y BS ,TRID=47 

DEULIST HSG^" VENI ?IDI VICI • 
TEXT TBLIST ROUTE= (LOG, 42) , TEXT=YES,TBID=48 

DEULIST HSG=» • THE ALARH HAD EETTEB MOT HAVE SOUNDED* 
DISK TBLIST HOUTE=DISK, TRID=4 9 

DEULIST 
TESTO TRLIST TBID=60,BOUTE=LOG 

GDULIST FARAHNO=01 , NORGU ID=1 , DISPHSG=DG1 7 
GDULIST PARAHNO=02,NORGUID-1 ,DISPHSG=DG1 
GDULIST PARAHNO=33, NORGU ID=(1, 3, 5) ,IDEHT=4 

THE TESTO TRANSACTION CONSISTS OP 3 STfPS AND 
HILL BE BOUTED TO THE 2740. ALL 3 STEPS HILL 
BE DATA ENTRIES FROH THE 2798. HHEN THE FIRST IS 
ENTERED, GUIDANCE LIGHT 1 IS TURNED ON AT THE 
OPERATOR GUIDANCE PANEL AND THE HESS AGE DEFINED 
BY DISPGUID HACRO DG17 HILL BE DISPLAYED OH THE 
2798 GUIDANCE DISPLAY PANEL. THE 2715 HILL USE 
PARAMETER LIST NUMBER 01 TO GET TO THE 
PARAHETER LIST DEFINED BY PARRIIST HACBO, PARI. 
THIS PARAHETER LIST HILL BE USED IN CHECKING 
THE FIRST DATA ENTRI. HHEN THE SECOND STEP IS 
ENTERED, GUIIANCE LIGHT 1 IS TURNED ON AT THE 
OPERATOR GUIDANCE PANEL AND THE MESSAGE DEFINED 
BY DISPGUID HACBO DG1 HILL BE DISPLAYED ON THE 
2798 GUIDANCE DISPLAY PANEL. THE 2715 HILL USB 
PABAHETEB LIST NUHBEB 02 TO GET TO THE 
PAHAHTER LIST DEFINED BY THE PABHLIST HACRO 
PAR2. THIS PARAHETER LIST HILL BE USED IN 
CHECKING THE SECOND DATA ENTRY. HHEN THE THIRD 
STEP IS ENTERED, GUIDANCE LIGHTS 1,3, AND 5 HILL 
BE TURNED ON AT THE OPEBATOB GUIDANCE PANEL AND 
THE HESSAGE DEFINED IN THE FIFTH IDENTIFIES 
IN THE IDENTIFIES TABLE HILL BE DISPLAYED ON 
THE 2798 GUIDANCE DISPLAY PANEL. THE 2715 HILL 
USE PARAMETER LIST NUHBER 33 TO GET TO THE 
PARAHETER LIST DEFINED BY THE PABHLIST HACRO 
PAR33. THIS PARAHETER LIST HILL BE USED IN 
CHECKING THE THIRD DATA ENTRY. 



Appendix M: Sample 2715 Table Load Macro Assembly M-19 



PAGE 20 



TEST1 



TEST 2 



TEST! 



TEST4 



TEST5 



TEST6 



TEST7 



TEST8 



ROUTE1 



TRLIST TRID^61,R0DTE=L0G 

GDULIST PARAMNO=03,NORGUID=1 ,DISEMSG=DG1 

GDULIST FARAMNO=04,NORGUID=1,DISPHSG=DG3 

TPLIST TRID=62,ROUTE=LOG 

GDULIST PARAHNO=0 5,NORGUID=1,DISPHSG=DG1 

GDULIST PARAMNO=06,NORGUID=1 ,DISFHSG=DG3 

GDULIST PARANNO=07,NORGUID=1,DTSPHSG=DG4 

GDULIST PARAMNO=08,NORGUID=1 ,DISPHSG=DG5 

GDULIST PARAMNO=09, NCRGU ID=1 , DISPHSG=DG6 

TRUST TRID=63,ROUTE=LOG 

GDULIST PARAMNO=10,NORGUID=1,DISPHSG=DG1 

GDULIST PARAHNO=1 1 ,NORGUID=1 ,DISPMSG=DG3 

GDULIST PARANNO=12,NORGOID=1,DISPMSG=DG4 

GDULIST PARAHVO=13,NORGUID=1 ,DISPMSG=DG5 

GDULIST PARAMNO=14,NORGUID=1,DISPMSG=DG6 

TRLIST TRID=64,ROUTE=LOG 

GDULIST PARAMNO=15,NORGUID=1,DISPMSG=DG1 

GDULIST PARAMNO=16,NORGUID=1,DISPMSG=DG3 

GDULIST PARAMNO=17,NORGUID=1,DISPSSG=DG4 

TRLIST TRID=65,ROUTE=LOG 

GDULIST PARAHN0=18,N0RGUID=1,DISPHSG=DG1 

GDULIST PARAMNO=19,NORGUID=1 ,DISFMSG=DG3 

GDULIST PARANNO=20,NORGUID=1,DISPNSG=DG4 

GDULIST PARAMNO=21,NORGUID=1,DISPMSG=DG5 

TRLIST TRID=66.ROUTE=LOG 

GDULIST PARAHNO=22,NORGUID=1 ,DISPHSG=DG1 

GDULIST PARAHNO=2 3,NORGUTD=1,DISPHSG=DG3 

TRLIST TRID=67,ROUTE=LOG 

GDULIST PARAHN0=24,N0RGUID=1,DISPMSG=DG1 1 

GDULIST PARANNO=38,NORGUID=1 ,DISPHSG=DG3 

TRLIST TRID=68,ROUTE=LOG 

GDULIST PARANNO=26,NORGUID=1 ,DISPHSG=DG1 

GDULIST PARAHNO=37,NORGUID=1,DISPMSG=DG7 

TRLIST TRID=70,ROUTE=(LOG,42) ,TEXT=IES 

GDULIST PARAMNO=28,NORGUID={1,5) ,DISPMSG=DG9 

GDULIST PARAMNO=02,NORGUID-1 ,DISFHSG=DG8 ,ENTRY=H, 
MSG='**EBERGENCY' 

THE ROUTE1 TRANSACTION CONSISTS OF 2 STEPS AND 
WILL BE ROUTED TO THE 2740 AND TO THE PRINTER 
ON THE AREA STATION WHOSE ID IS 42. BOTH STEPS 
WILL BE DATA ENTRIES FROM THE 2798. WHEN THE 
FIRST STEP IS ENTERED, GUIDANCE LIGHTS 1 AND 5 
ARE TURNED ON AT THE OPERATOR GUIDANCE PANEL 
AND THE MESSAGE DEFINED BT DISPGUID MACRO DG9 
WILL BE DISPLAYED ON THE 2798 GUIDANCE DISPLAY 
PANEL. THE 2715 WILL USE PARAMETER LIST NUMBER 
28 TO GET TO THE PARAMETER LIST DEFINED BY THE 
PARMLIST MACRO PAP28. THIS PARAMETER LIST WILL 
BE USED BY THE 2715 IN CHECKING THE FIRST DATA 
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R0UTE2 



TEST JOB 1 



TESTJOB2 



TEST JOB 3 



CAR DOR D 



UALMAINT 



INV1 
INV2 
INV3 

iNva 

INV5 



ENTRY. HHEM THE SECOND STEP IS ENTERED, GUIDANCE 
LIGHT 1 IS TURNED ON AT THE OPERATOR GUIDANCE 
PANEL AND THE NESS AGE DEFINED BY DISPGDID HACRO 
DG8 HILL BE DISPLAYED ON THB 2798 GUIDANCE 
DISPLAY PANEL. THE 2715 RILL USE PARABBTER LIST 
NUMBER 02 TO GET TO THE PARAHETER LIST DEFINED 
BY THE PARHLIST MACRO PAR2. THIS PARAHETER LIST 
HILL BE USED BY THE 2715 IN CHECKING THB 
SECOND DATA ENTRY. BULTIPLE ENTRIES CAN BE 
ENTERED ON THE SECOND STEP. IMPLICIT TEXT RILL 
BE INCLUDED WITH TEE TRANSACTION HHEN IT IS 
ROUTED. 

TRLIST TRID=71,R00TE= (LOG, NULL) 

GDULIST PARANNO=38,NORGUID»1 ,DISPHSG=DG29 

GDULIST PARAHNO=28,NORGUID=(1,5) ,DISPHSG=DG9 

GDULIST PARAMN0=32,N0RGUID=1,DISPHSG=DG18 

TRLIST TRID=72,ROUTE=LOG 

GDULIST PARAHNO=29,NORGUID=(1,2) ,DISPMSG*DG1 1 

GDULIST PARAHNO=33,NORGUID=4 

GDULIST PARAHNO=31,NORGUID=5 

TBLIST TRID=73,ROUTE=LOG 

GDULIST PARAMNO=29,NORGUID=(1,2) , DISPHSG=DG1 1 

GDULIST PARAMNO=32,NORGUID*3 

GDULIST PARAHNO=33,NORGUID=6 

GDULIST PARAMNO=33,NORGUID=(1,7) ,DISFHSG«DG1 1 

GDULIST PARAHNO=33 , NORGO ID= ( 1, 8) , DISPHSG»DG1 1 

TRLIST TRID=74,ROUTE=LOG 

GDULIST PARAHNO=29,NORGUID=(1,2) , DISPMSG-DG1 1 

GDULIST PARAMNO=33,NORGUID=»» 

GDULIST PARAHNO=3»,NORGUID=5 

TRLIST TRID=75,ROUTE=LOG 

GDULIST PARAHNO=35,NORGUID=(1,tt) ,DISPHSG=DG1»I 

GDULIST PARABNO=33,NORGUID=7 

TRLIST TRID=76,ROUTE=LOG 

GDULIST PARAHNO=33 # NORGO ID=( 1,2) , DISPHSG=DG10 

GDULIST PARAMNO=33,NORGUID=3,IDENT=4 

GDULIST PARAMNO=36,NORGUID=U 

GDULIST PARAHNO=33,NORGUID=(1,5) , DISPMSG=DG15 

GDULIST PARAMNO=33,NORGDID=(1,5) ,DISPHSG=DG16 

TRLIST TRID=79,ROUTE=LOG 

GDULIST PARAMNO = 20,NORGUID=(1,8) ,DISPHSG=DG19 

TRLIST TPID=80,ROnTE=LOG 

GDULIST PARAHNO=20,NORGUID=(1,8) ,DISPHSG=DG20 

TRLIST TRID=81,R0UTE=L0G 

GDULIST PARAMNO=20,NORGUID=(1,8) ,DISPHSG=DG21 

TRLIST TRID=82,R0UTE=L0G 

GDULIST PARAMNO=20,NORGUID=(1,8) ,DISPHSG=DG22 

TRLIST TRID=83,ROUTE=LOG 

GDULIST PARAHNO=20,NORGUID = (1,8) ,DISPMSG=DG23 
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STOCK 



NPROC 



LEADTIrtE 



BATING 



SUPPLIER 



INTRANS 



LINE 



BIN 



BAMJ1AT 



ORDER 



QUALCON 



QUOTE 



LASTPUR 



ECONQTY 



CREDIT 



QOADEQN 



THLIST TRID=84,ROUTE=CPU,INQDISP=YES 

GDULIST PARAHNO=39,NORGUID=(1,4,8) , DISP!1SG=DG2 4 

GDULIST PARAHNO=32,NORGUID=1 ,DISPHSG=DG26 , ENTRY= H 

IF THE INQUIRY IS ABORTED BY THE OPERATOR AT 
THE 2798, GDU GUIDANCE LIGHT 16 BILL BE TUHNED 
ON AUTOMATICALLY AT THE 2798. ALL 2798»S THAT 
USE INQUIRY DISPLAY TRANSACTIONS BUST RESERVE 
GUIDANCE LIGHT 16 FOR THE INQUIRY ABORT 
SITUATION. 
TRLIST TRID=85,ROUTI=CPU,INQDISP=YES 
GDULIST PARAHNO=39,NORGUID=(1,U,8) ,DISPHSG=DG25 
GDULIST PARAflNO=32,NORG0ID=1 # DISPMSG=DG26 # ENTRY=H 
TRLIST TRID=86 ># R0UTE=CPU,INQDISP=YES 
GDULIST PARAHNO=39,NORGUID=<1,4) ,DISPBSG=DG27 
GDULIST PARAHNO=32,NORGUID=1,DISPHSG=DG26,ENJRI=H 
TRLIST TRID=87,ROUTE=CPU,INQDISP=YES 
GDULIST PARAHNO=39,NORGUID= (1,4) , DISPHSG=DG27 
GDULIST PARAHNO=32,NORGUID=1 ,DISPMSG=DG26, ENTRY=H 
TRLIST TRID=88,R0UTE=CPU,INQDISP=YES 
GDULIST PARAHNO=39,NORGUID=(1# l ») ,DISPHSG=DG27 
GDULIST PARAMNO=32,NORGUID=1 ,DISPMSG=DG26 , EHTRY=H 
TRLIST TRID=89,ROUTI=CPU,INQDISP=YES 
GDULIST PARAHNO=39,MORGUID=(1,U) ,DISPrtSG=DG27 
GDULIST PARAHNO=32,NORGUID=1,DISPMSG=DG26,ENTRY=H 
TRLIST TRID=90 r ROUTE=CPD»INQDlSP=YES 
GDULIST PARAHNO=39,NORGUID-<1,4) ,DISPBSG=DG27 
GDULIST PARAHNO=3 2,NORGUID=1,DISPaSG=DG26,ENTRY=H 
TRLIST TRID=91,ROUTE=CPU,INQDISP=YES 
GDULIST PARAMNO=39 # NORGUID= (1,4) , DISPHSG=DG27 
GDULIST PARAHN0=32 # N0RGUID=1,DISPHSG=DG26,ENTBY=H 
TRLIST TRID=92,ROUTE=CPU,INQDlSP=YES 
GDULIST PARAHNO=39, NORGUID= (*»» 4) , DISPHSG=DG27 
GDULIST PARAHNO=32,NORGUTD=1,DISPHSG=DG26,ENTRY=M 
TRLIST TRID=93,ROUT£=CPU,INQDISP=YES 
GDULIST PARANNO=39,NORGUID=(1,4) ,DISPHSG=DG27 
GDULIST PARAMNO=32,NORGUID=1,DISPHSG=DG26,ENTRY=H 
TRLIST TRID=94,ROUTE=CPU,INQDISP=YES 
GDULIST PARANNO=39,NORGUID=(1,4) , DISPHSG=DG27 
GDULIST PARAHNO=32,NORGUID=1 ,DISPMSG=DG26 , ENTRY= H 
TRLIST TFID=95,ROUTE=CPU,INQDTSP=YES 
GDULIST PARAHNO=39,NORGUID=(1,4) ,DISPMSG=DG27 
GDULIST PARAHNO=3 2,N0RGUID=1,DISPHSG=DG26,ENTRY=H 
TRLIST TRID=96,R0UTE=CPU,INQDISP=YES 
GDULIST PARAHNO=39,NORGUID=(1,4) ,DISPHSG=DG27 
GDULIST PARAHNO=32,NORGU ID=1 ,DISPMSG=DG26, ENTBY=H 
TRLIST TRID=97,ROUTE=CPU,INQDISP=YES 
GDULIST PARAMNO=39, NORGUID=(1, 4) , DISPHSG=DG27 
GDULIST PABAMNO=32,NOR-GCtXD=1,DlSpflSG=DG26,ENTR*=fl 
TRLIST TRID = 98,R0DTE=CPU,I1IQDISP=YES 
GDULIST PARAHN0=27,R0RGUID*(1 # 2) , DISPMSG=DG1 2 
GDULIST PARAt1NO=25,NORGUID = 1 ,DISPMSG=DG28 
GDULIST PARAHNO=32,NORGUID=1,DISPMSG=DG26, ENTRY=H 
TRLIST TRID=99,ROUTE=CPU,INQDISP=YES 
GDULIST PARAHNO=30,NORGUID=1,DISPHSG=DG37 
GDULIST PARAHNO=30,NORGUID=1 ,DISPMSG=DG38 
GDULIST PARAMNO=30,NORGUID=1,DISPHSG=DG39 
GDULIST PARAHNO=32,NORG0ID=1 ,DISPHSG=DG26, ENTRY= H 
STEND 



END 
/♦ 
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APPENDIX N; SAMPLE START- STOP AND BSC PROGRAMS 



ire ceject code 



A00R1 AD0R2 «T»«7 SCLRCE STATFMFNT 



F2CSEP6* !C/C*/7C 



3 

4 

c 

6 

i 
p 

IC 

11 

12 
13 
1* 
15 
16 
17 
If 
IS 

2«: 

21 
22 
2? 

2* 
25 
26 
27 
2P 
2? 
ir 

31 
32 
33 
3* 
3! 
36 
37 
3P 
39 

4? 

41 
*2 
43 
44 
A! 
46 
47 

*e 
49 
s c 

51 
5? 

52 
54 
55 
K 6 
«7 
51: 
59 
6C 
61 
62 
6? 
64 
65 
66 
67 
6« 
69 
7C 
71 
72 
73 
74 
75 
76 
77 
78 
79 
PC 
PI 
P2 
P3 
64 
85 
P6 
87 
P8 
pc 

<?":. 

= 1 



FXAPFLF2 CSECT 

SAMPLE FXFANCEC ID VERIPKATICN PRCGRAM 

his program is rFsiONFO fob * finapy synchronous switchec linf 

CVFP WHICH AN IPM 277C OR 27PC CAN CALL THF CENTRAL COMPUTER. 

HE PPCCRAM UTILIZES SOU CP THE EXPANOEt IC VERIFICATION CAPAPUI- 

1 1ES. THE IP OF THF 27Pft IS RR: THF If CF T(-f 2">7ft IS WW. 

IF THF t'SFT wlSHFS TC FXFfUTE this PPCC-FAM, HE MIST MCCIFY IT 

TT 05F THF IC'S CF HIS PARTICULAR TERMINALS. 

OPERATION: 

(1.) WHEN THP FPOGPAM IS STARTED, A MESSAGE t 'SWTEST HAS BEGUN 
EXECUTION', WILL PF PRINTED ON THF CCNSCILF. 

1 ? . } IF THE IIN'F CAN NOT FF CPENEC, A MESSAGE, 'OPEN CID NOT 

COMPLFTE SUCCESSFULLY', WILL BE PRINTPO ON THE CONSOLE ANO 
THF PPCCFAM IS APFN'CFP. 

(?.) tF THE ll*fc IS OPENED SUCCESSFULLY, THE TF^INAl CFEkATCR 
CAN THEN "IAL THF COMPUTER FROM EITHER TERMINAL ANC 
SEND CATA. WHEN All CF THE DATA HAS PFEN RFAO FRCP THE 
TFPM1N4L. THE PPPGPAM DISCONNECTS THF LINE. 

<4.) THF TFR^INAL OPFPATOR CAN THF MANUALLY OIAL FROM EITHER* 
TEFMIt-Al AND RECflVF SIX MESSAGES PE*ORE THF LINE IS OIS- 
CCNNFCTFC. 

15.) THF PPrC-RA"' THEN ISSUFS TWC CHGNTRY MACRCS TO CHANGE THE 
CCNTPCL BYTE VALUF FCP EACH AUTHORIZED 10. A SNAP CUMP IS 
TAKEN eEFORE AND AFTER THE CHGNTPY MACROS IN CRCER TC SHCW 
THE TERMINAL LIST CONTENTS EEPCE ANC APTFR ISSUING THE 
CHGNTPY MACPCS. UN CRDEP TO RECFIVE THE SNAP 

DUMP, THF ISER MIST PROVIDE A DO CARD FOR HIS SNAP CCB DDNAME 
IN HIS JCL.) 

16.) A MF^SACF, 'SWTEST H*S SUCCESSFULLY CCMPLFTEO', WILL BE 
PRINTED CN THE CCNSCLE. 

NCTFS - 

AFTER EACH REAC AND WRITE OPERATION, THE PRCGRAP CHECKS FCP 
NCPPAL CCPPLPTICN. 

IF ThF OPERATION WAS A READ - 

11.1 WHICH CCPPLETEr NORMALLY WITH NC BITS IN PECPLAGS TURNEO 

CN, THE PROGRAM CONTINUES WITH THE NFXT OPFPATICN. 

(2.) WHICH COMPLETEC NCRKALLY WITH A BIT ON IN CFCFLAGS. THE 

PROGRAM TAKES A SNAP DUMP. THEN CHECKS FOR AN INVALIC 10. 

(A.) IP AN INVALIP IC WAS RECHVEC. A MESSAGE, • ANi INVALIO 
IC W/S PECEIVEO', IS PRINTEC CN THE CTNSrLE AND THF 
PROGRAM DISCONNECTS THF LINE. 

•P.) IP AN INVALID 10 WAS NOT FECFIVEO, THE PRCGRAM 
CISCCNNFCTS THE LINE. 

(3.) WHKH RNOFD WITH ERROR, THE PROGRAM T4KES A SNAP CUPP ANC 
IF A PATS CHECK OCCURRED CN A REAC CONTINUE OPERATION, 
PERFTPMS » PFAP REPEAT. IF THF FRPCB WAS NCT « CATA CHECK, 
AN ERROR MESSAGE, 'FPROR CANNOT ?E HSNOLEO P.Y POCGRAM 1 , IS 
PRINTE1 ON THF (ONSOLF. 

IF THE OPERATION WAS A WRITE - 

II.) WHICH COMFLETFO NORMA! LY WITH NO FITS TURNPO ON IN 

OECFLAGS, THE Pf-CCA* CONTINUES WITH THF NEXT OPFPATICN. 

12.) WHICH COMPLETED NORMALLY AND IS NrT A WRUF C^NEC.T, THE 
FPCGRAM OI<CONNECTS f H E LINE. 

13.) WHICH COMPLETED NORMALLY ANC IS A WRITE CONNECT, THF WRITF 
f.CNNFCT IS REISSUED IF A WACK OP IT NAK WAS RFCFIVFC. IF AN 
INVALID '0 WAS FECFIVEO, A MESSAGE, MNVALIO ID RECEIVFC - 
NOTHING TRANSMITTED TC TERMINAL 1 , IS PRINTFO CN THE CONSOLE. 
CTHFRWISP, THE PROGRAM DISCONNECTS THE LINE. 

14.) WHICH COMPLETED WITH ERROR, THE FRCGRAM TAKES A SNAP OUMP 
AND CHECKS FOP A TJMFOUT CONDITION. 

(A.) ic THE ERROP WAS A TIMEOUT, THE PRCGRAM REIMTIATFS 

THE PPEFATWN. 

(P.) 1= THE ERRCP WAS NCT A TIMEOUT. AN'EBRCO "ESSAGE, 

•ERROR CANNOT BE HANOLED PV PRCGRAM', »S PRINTETJ ON THE 
fON^CL*. 

PRINT NfTEf; 



Appendix N: Sample Start-Stop and BSC Programs n-1 



^'VE <1*,!2) 



SAVF REGISTERS 



mere* n 5C~ 

:orrct 
c^pccc 
cccrcc 

COrcCt 5POC C7C6 
CCC^C« MP CC2 
OCCCCF *lf? C^6 
CCCC 12 *170 C73A 





5 9 EnTpy 




ICC 




1^1 




112 


C07CC 


1C* 


007CB 


l? c - 


0C60C 


1C6 


erne 


107 




109 




lie 



establish arrRESSAeiL ity 

ES T A6LISH ADDRESSABILITY FOR CCe 
AND CEC8 

STORE APQRESS CF <«VE AREA 



fALP 3ASEREG.0 

LSING »,BASEREG 

USING IHACCfl.CCFKFG 

USING I FCTCFCP.C ECBRFG 

ST SAVERFG.SAVE+* 

L« SAVFPEG.SAVE 

LA rCPRFGt MYTCB 

LA nFf.BPFG.MYCErB 



KTr '?VFST HAS BEGUN EXECUTICN* 

OPEN ( SNAPOCB, (OUTPUT! ) OPEN THE SNAP CCE 



LCC CPJECT COOE 



CC0052 ?1K 6030 

000C56 *7ic cc9a 



0C0C8E *7F0 C2<=0 



aocri 


AOOR2 


STMT 


SCLRCF 


STATF 


KfKT 






126 




OPEN 


(*vcCF( 


COC3C 




133 




TM 


TCPTFLGS.X'IC 




OGOAP 


13* 




«r 


"EG IN' 






136 




WTC 


TPEN OIC NOT 




C02<>6 


1*6 




P 


FXIT 



F3CSEP69 1C/P6/70 



GPEN THE LINE CCe 



niO OPEN COMPLETE SUCCESSFULLY 
IF SC, ISSUE PEAC CONNECT 



1*8 PRINT GFN 

1*9 ERRPLCCK LERB 1 
150+ERRBLCC* OC OF>0< 



ALIGN TAPLF AND ATTACH NAME 



cocopc ocoooooc 

000C9C POOC 
C00C92 OOOC 
COOCS* OCPC 

00CC96 cc 
OO0C97 CO 

cocrsg or 
cpcc**; cc 

coccsa cf 

C0CC9P CA 
0CCC9C 05 
C0CC9C C5 

CCCC9E COOC 



0CC0AC 



CCCCCA *590 C29A 
0P0CCE *7F0 CC9A 



C02A0 
OOCAC 



152** 
153 + 
15* + 

15 5* 
156* 
157 + * 
156* 
15<:* 
lfiC* 

16 I* 

Ift2 + * 
163* 
16* + 
165 + 
166* 
167*» 
16e + 

17C 

172 BEGIN 

17* RTC 

187 

iae 



ACCUMU 
CC 
OC 
CC 

re 

CCUNTF 
CC 
OC 
CC 

re 

THRESH 

CC 

OC 

cc 
or 

RF.SE°V 

OC 



LAT 

<= T 
H'C 
H'C 
H'C 
R? 

X'C 

X'C 

X'O 

X'C 

CLP 

Yl 1 

YLl 

YL1 

YLl 

EC 

XL2 



ORS 

• TRANSMISSIONS 

• DATA CHECKS 

• INTERVENTIONS 

' NCNTEXT TIMECUTS 

• TRANSMISSIONS 

• DATA CHECKS 

• INTERVENTIONS 

• NCNTFXT TIMFCUTS 
S 

(255) TRANSMISSIONS 
(101 QATA CHECKS 
<5» INTERVENTICNS 
(5) NCNTFXT TIMECUTS 



PRINT NCGEN 

ECU ♦ 

READ MYOECe,TC,MYCCB,f , ANSRL 1ST , 1 ,M«= = F 



BAL 
8 



".TIC 
RTC 



CHECK SIO CCN'DITICN CCTE 
REISSUE REAC CONNECT 



0CCCC2 

000CD2 5850 7C1* 0001* 

CC00C6 C5C2 5CC1 C812 COCCI CC818 
CCCOOC *7PC CICC 00112 



OOCCFA <,5SC C29A 
OCOCFE *7FC crcc 



002AC 
00002 



1=C RTT 
191 
1"2 
1°3 

195 

20* 
205 



ECU * 

L AFEG.DECENTRY 

CLC U3,AREG),«X'0COO0O' 

BE WTTO 

REAC «YCECB,TT,,,,,l,MF=E 



PAL 



<5,Tir 

»TT 



PCINT TO TERMINAL LIST 

WAS VAL10 IC RECFIVEO 

IF NOT, CISCONNECT THE LINE 



CHECK SIO CONDITION CCCE 
REISSUE OEAC CONTINUE 



LCC 


OBJECT COCE 


ACCR1 


A00R2 


STMT 


SOURCE STATFMCM 


000102 


5P5C 7CCC 




COOOC 


207 


L AREG.OECAPFA 


CCC1C6 


«=537 50C0. 


CCCOC 




2CP. 


C.LI O(ARFG) ,X'?7» 


C001CA 


*78C CICC 




00112 


209 


PE WTTP 


CCC10E 


*7FC CCCC 




00^02 


21C 


3 RTT 



F30SEP69 10/^6/70 



GET ACCRESS r.F MESSAGE AREA 
HAS EOT BEEN RECEIVED 
IF SC, OISCCNNECT THE LINE 
IF NOT, REAO MORE TEXT 



C0C12* *5SC C29A 
0T012P *7F0 CICC 



0C2AC 
00112 



219 
22C 



WRITE MVCECB,TC,MF=E 



BAL 9.TIT 

B WTTT 



check sin ccnoiticn ccr.E 

REISSUE WRITE CISCCNNECT 



0CC12C *IBC C*e6 



C0C166 *59C C29A 
OCCUA *7FC C12A 



CC2AC 
CC13C 



222 

22* WTC 



2*C 
2*1 



LA APEARECCUTMSG PCINT TO OUTPUT MESSAGE 

WRITF MYCECB.TC.MYDCP. , ( APEAREG ) t 58 ,C I ALL I ST , 1 , MF = E 



PAL 



•'.TIP 
WTC 



CHECK SIC CCNOITICN CCCE 
REISSUE WRITE CONNECT 



N-2 OS/VS BTAM SRL 



00<U6E 5850 7C14 0CP14 

0OC172 n5C2 50CB CB15 C0CC8 C081B 

C0C178 477C C17C C0182 

rc^nc C20i pr>ci csce occoi o*Bi4 



2*3 
244 
245 
246 
247 
24* 



t APEG.OECEMRY 

CLC B^?,AREGl.■X•E6E6^D• 

P.NE wfT2770 

KVC H2,AREAREG),0C1SP 



PCINT TC TERMINAL LIST 
WAS IC RECEIVED FPC* 2770-RR.ENQ 
PRANCH IF SCT 

IF SC, »CVE THE CEVICE CONTROL 
CHARACTER FOR THE PRINTER 
1N7C THE OLTPUT MESSAOE 



con»>2 



COfUC 4590 C2SA 
?CC1BC 47FC C17C 



C02AC 
C0162 



250 NCT2770 
252 WTT 



265 
266 



ECU 



WRITE ">CFCB,TT,,<AREAREGI,27,,1,MF«£ 



BAL 

e 



<i,Tir 

WTT 



CHECK <I0 CCNOITICN COCE 
REISSUE WRITE CONTINUE 



0CC1B4 41PB 001B 

CCfUPB 5BAC C8CA 

OOOieC 41AA CCC1 

OOMCC 50A0 C«CA 

C00K4 ssot c»cr 

™C1C8 477C C17C 



0C813 



0001* 
008 IC 
00001 
C0B1C 

C0162 



C0C1CC C703 C»CA CBCA CMC C81C 



268 

269 
27C 
271 
272 
271 
274 



LA APEAREG,27(AREARFGI 

L CTREG, COUNTER 

LA CTREG, KCTREC) 

ST CTREG, CCCNTER 

CLI CCUN7ERO,X«06« 

BNE WTT 

XC CCUNTER(4»,CCUNTER 



PCINT TC NEXT CLTPLT MESSAGE 
UPDATE COUNT OF 
MESSAGES SENT 
SAVE THE NEW COUNT 
HAVE SIX MESSAGES eEEN SENT 
IF NCT, PCINT TO NEXT MESSAGE 
RESET COUNTER TC 1ERC 



CCC1E4 459C C29A 
CCC1E8 47FC CICC 



002AC 
r01C2 



276 WTO 



283 

284 



WRITE *Vt>ECe,TCt»'F.E 



BAL 

B 



<»,TIC 
WC 



CHECK SIO CCNOITICN CCOE 
REISSUE WRITE OISCCNNECT 



CCC1EC 



2B6 SNAF 



ECL 



PAGE 



LCC CPJECT COOE 



0CC2BC 



ccc2se 

00C296 «BDC C"»C6 



0C02AC 12FF 
00C2A2 4780 C2CE 



CCC20C 47F0 C27A 



ACCR1 A00R2 STMT 
28B 



007CC 



C204 



294 

309 

324 

33C 

34- CLCSE 

342 

349 



SCLRCE STATEMENT F30SEP69 1C/C6/70 

SNAP IC»2fMF-(F,S0UMP) LOOK AT ANSWER LIST BEFORE CHGNTRV 
CHGNTRV ANSRLIST,SWLST,l,niSC CHANGE CCNTROL BYTE VALUE TC 1 
CHGNTRY ANSRLIST,SWLST,2,0ISC CHANGE CONTROL eVTE VALUE TC I 
SNAP ID«3.MF-<F,S0UMP1 LOOK AT ANS4ER LIST AFTER CHGNTRV 
WTC 'SWTEST HAS SUCCESSFULLY CGMPLETE0' 
ECU * 

CLOSE THE LINE OCE 
CLOSE THE SNAP OCB 



356 EXIT 
35 7 

359 

363 TIC 
364 

366 

376 

382 



CLCSE 
CLCS* 



IMYOCBJ 
ISNAPOCBI 



FCU 
L 



SAVEBEG.SAVE+4 

RETUPN (14,12) 

LTR 15.15 
82 WAIT 

WTC 'SIT WAS NTT GOOD' 

SNAP IC«4,MF»(F,SDUMP> 

e r ir?F 



RESTCRE REGISTERS 
RETURN CONTROL 



EXCP ISSUEC 

ISSUE WAIT IF GOOD SIC 



LCOK AT DEC*LAGS 



0CC2FC 91C1 7CC5 

00C2E4 4fflC C37A 

CCC2EP 

00C2E8 917F 70CC 

0002FC 47f0 C332 

OCC?Ff 95C0 701B 

0002F4 4789 CCC4 



CC0306 "lO 7C1B 
C0C3CA 477C C10C 



C0C334 47FC CICC 



00CC5 



00380 



OCCOC 
0CC1B 



00338 
00004 



occie 



00112 



0P112 



3B4 WAIT 
386 



ECL 



WAITR 1,ECB«(CECBREG) 



392 TH 

393 "Z 

394 TESTCCCF ECU 
'95 T* 



3«»6 
397 
396 

40C 

406 
407 

409 

419 



BNC 
CLI 
BE 



CLI 
BKE 



WTC 
B 



0FCTYPF*1.X'C1 

*RTRTN 

• 

CFCSCECP,X»7F» 

BLFRTN 

CFCFLA^,S,X•CC• 

4«C| 



SNAP I0«5,MC«<E,S0UMP| 



CFCFIAGS.XMO' 
WTTO 



WAIT FCR COMPLETION OF CPERATICN 

IS THIS A RFAD OPERATION 
IF NCT, GO TC WRITE ROUTINE 

WAS ECB PCSTFO NORMALLY 
IF NCT, CHECK ERROR 
ARE ALL FLAGS ZERC 
IF SC, CONTINUE NORMALLY 



WAS AN INVALID IC RECEIVEC 
IF NCT, OISCCNNECT LINE 



•AH INVALID 10 HAS RECEIVED' 
WTTC 



Appendix N: Sample Start-Stop and BSC Programs N-3 



"AGE 



i cc cpjfc core 

!'T0 33 8 



?in- % <,(. <; 5 r3 7 ~ C 5 

C0C344 477Q C456 

00C34F q 1 C e 7010 

OOC352 47f C456 

0O-~^5^ 5PAC CCA 

00035A A1A4 COCl 

C0C35F. 5C«C CSOA 

00C362 55C2 C8CO 

C0C366 47B0 C456 



0C037C 47FC C29A 



aCOPl ACTP2 S T *T SrtaC c StaTE^nt 
'21 8UFFTN FOU * 
'23 



F30SEP69 lC/Ofc/70 



"0450 

0^450 

0081C 
OOOOl 

otpio 

0045C 



479 

43C 
431 
432 
433 
434 
435 
436 
437 

439 

4 46 



SNAP ir=6.MF=(F,SPUMP) 



cli 

P.NE 
TK 

Pf, r 

L 

LA 
ST 
CLI 

BNL 



ir-C.TVPE*l.X»03« 

F TNISH 

CECSFNSCX'OB' 

C 1NI9H 

CTPEG,CCIjNTE,P 

"7PFr,,l(CTFFG) 

CTOEG, COUNTER 

CrUN'TER + 3.X'02' 

c inish 



peat Mvrec3,Tp,HF=e 
e tic 



LCPK AT CFCFLAGS 

IS THIS A «EAO CCNTINUE 

IF NCT, PRINT ERRCR MESSAGE 

HAS FP3CR A nATA CHECK 

IF NTT, PRINT ERPCP PESSACE 

UPDATE CCUNT OF 

ERRCRS 

SAVE NEW CCUNT 

IS COUNT CF ERRORS TWC 

IF SC, WRITE ERROR MESSAGE 



CHECK MO CCNOITICN CCCE 



C0C38C 
C0C384 

ccc3ee 
o:c3sc 

00C394 

00039? 
o A C39r 

0003AO 
0003A4 

occ?Ae 

C003AE 
C0C3e2 
C003B8 

coc3ec 

0003BC 
CC03CC 
0003C4 
00 3C" 
000 3CC 
0003CC 
000306 



"17F 70C0 
47E0 C42C 
9500 7018 
47P9 CCC4 
951C 7CC5 
477C C1CC 
95C0 7C18 
4780 C3P6 
5P5C 7C14 
415= C0C8 
C5C2 50C0 C818 
4780 C3B6 
C5C2 5000 C81B 
477-: C3C4 



OOCOC 

00432 
00018 

C0004 
00CC5 

00102 
00018 

0038C 

00014 

00008 
OOOCC 00P1E 

0«3BC 
OCCCC CCP21 

0"?0A 



5«AC C8CA C0810 

41A4 C0C1 OOCOl 

50AC CPCA 0081" 

95C2 C^CO O0P13 

477C 012A 00130 

r.703 cecA cpoa oceio o*pio 

47fo cicc. com? 



448 WRTFTN Tp ECSOEC R , X • 7F • 

449 <»NC VIPFRR 

45C CLI OECFLAGS.X'OO' 

451 BE 4(9) 

452 CLI OECTYPE+l.X- 1C 

453 BNE WTD 

454 CLI OECFLAGS,X'CO« 

455 BE RETURN 

454 L ARFC.DECENTRY 

457 LA APEG,8(AREG) 

45' CLC "i 3,APEG) ,»X'C90«30' 

459 BE RETURN 

4*0 CLC 0<3,AREG»,«X•E6F6^C , 

461 BNE FINI 

462 RETLPK FCU * 

463 L CTREG. COUNTER 

464 LA CTREG.KCTREG) 

465 ST CTREG.CCUNTER 

466 CLI CrLNTER♦3,X•02 , 

467 BNE WTC 

46E XC COUNTER (4) .COUNTER 

469 fj WTO 



WAS ECB PCSTED NORMALLY 

IF NCT. CHECK ERRCP 

ALL FLAGS ZERO 

IF SC, CONTINUE NORMALLY 

IS OPERATION WRITE CONNECT 

IP NCT, DISCONNECT THE LINE 

WAS WACK RECEIVED 

IF SC, CHECK FOR SECONC TIME 

POINT TC TERMINAL LIST 

PTINT TO *EAO-IN-A*EA 

WAS IC NAK RECEIVEC FRCM 278C 

IF SO, CHECK FOR SECOND TIME 

WAS IC NAK RFCEIVEC FRCM 277C 

IF NOT, CHECK FOR INVALID 10 

UPOATE CCUNT OF 

TIPES RECEIVEC 
SAVE NFW CCUNT 

HAS THIS eEEN RECEIVEC TWICE 
IF NCT, REISSUE WRITE CONNECT 
RESET COUNTER TC ZERC 
OISCfNNECT THE LIKE 



O0O3E8 9510 7C18 
OCn?FC 477C CICC 



OCC42E 47FC C1E6 



00102 



471 FIM 
473 



47S 

48C 



482 
492 



SNAP ir«7,MF»IE,SnUMP) 



CLI 

e.\E 



WTC 
R 



OECFLAGS.X'10' 

w*r 



LCOK AT THE 5ENSE IN THE CECe 



WAS AN INVALID 10 RECEIVEC 
IF NCT, DISCONNECT THE LINE 



•INVALIC ID RECEIVED-NOTHING TRANSMITTED TC TERMINAL 1 
SNAP 
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LCC OBJECT CODE 
00C432 



0*044C <;501 7010 

000444 4770 045* 

00C448 5PAC C8CA 

00044C 41AA 0CC1 

00045C 50AC CPCA 

ooc4«4 9so2 cecn 

0^r,45S <,749 COCO 



00C48P 47F* 0774 



AOCRl A00R2 STMT 50LRCE STATEMENT 
<,Q4 WRFCR FCU * 



F3CSEP69 1C/06/70 



OCCK 





5C2 


CLI 


004 5C 


503 


BNE 


CC81C 


504 


L 


000C1 


505 


LA 


C08K 


506 


ST 




507 


CLI 


coooo 


508 


BL 



SNAP IC»S,MF-(E,SCUMPt 



OECSFNSC.X'Ol' 

FINISH 

CTREG.CCLNTER 

CTREG,l(CTPECI 

CTREG.CCLNTER 

CCUNTER*3,X'02' 

3(0) 



^IC FINISH WTC 
C0280 52C B 



WAS ERRCR TIME CUT 

IF NCT, PRINT ERRCR "ESSAGE 

UPDATE CCUNT OF 

ERRCRS 
SAVE NEW CCUNT 
IS ERRCR CCUNT 2 
IF NCT, REISSUE OPERATION 



'FRRfP CANNOT eE HANDLEC EY PROGRAM! 
HOSF 



N-4 OS/VS BTAM SRL 



ccc4pc 


0227C1 


00C4PF 


F3C6C<;E24CC«:E240 


ooc.4a« 


1526 


30C4A7 


02 


O0**f 


E?C.eCff24CC?E?«0 


C0C4CC 


1526 


CCCAC2 


C2 


C004C3 


E3C6CSE24CC9E240 


COC4CP 


1526 


OCC40C 


02 


CC04CF 


E3CECSE24CCSE240 


OOO* Ft 


l c 26 


CCC4FE 


02 


0004FS 


E3C6CSE240CSF240 


00C511 


1526 


00C512 


C2 


00C514 


E3C8CSE240C<SE240 


C0052C 


1526 



522 
523 
524 
525 
526 
527 
526 
52S 
53C 
S31 
532 
533 
534 
535 
536 
531 
53? 
53S 
540 



outmsg 



PRINT 


GEN 








OC 


X»0227C1' 








OC 


C'TMS IS 


TEST 


MESSAGE 


1' 


OC 


XM526* 








CC 


X«C2« 








rc 


C'TMS IS 


TEST 


MESSAGE 


2 • 


OC 


X»1526« 








r.C 


X»C2« 








OC 


C'TMS IS 


TEST 


MESSAGE 


3 • 


OC 


x«1526« 








CC 


X«02« 








OC 


C'THIS IS 


TEST 


MESSAGE 


4 • 


OC 


X« 152ft' 








CC 


X'C2' 








OC 


C'THS IS 


TEST 


MESSAGE 


5 • 


nc 


X'1526' 








cc 


X'C2' 








ex 


C'THIS IS 


TEST 


MESSAGE 


6 • 


CC 


X'1526' 









542 
543 
544 
545 
54 6 
547 



IF Tt-F LSE» XISHES TC EXFCLTE THIS PPCGPAP. HF t-LST CCCE US 
CFTRMLST PAClfS TO t-ANrtf THE ID'S OF HIS PARTICULAR TERMINALS. 



54< ANJRLIST OFTPMLST SkLST , AN ,4,0, 2, 107C t < CSC12C I , t E6E62C ) 



0C053C 
CC053C FF 
C0C531 COOOOC 
000534 C2 
0CO53J C4 
00C536 C3 



55C*»N5RLIST cs 



551* 


CC 


552* 


OC 


553* 


OC 


554* 


nc 


555* 


cc 



OF PUT CN FUIL WCPO BOUNCARY CCCL 
Xll'FF' IOENTIFV AS SWLST OCOL 

XL3'0' PTR TC MATCHING SECUENCE OOCL 
Hll'2» KUMPER CF LIST ENTRIES COOL 
Hll'4« ENTFY LENGTH COOL 

HLl'3' REAC-IN-AREA l.ENGTJ- OOCL 



PAGE 



LCC CFJECT CODE 



A0CR1 AC0P2 STMT SCLPCE STATEMENT 



F3CSEP69 lf/06/70 



0CC537 CC 
00053E COCOCC 
000536 C2 
0CC53C ICO 
00053E C90S20 

000541 CO 

000542 E6E62C 
00054* CC 



556* 
557* 
556* 
55S» 
56C* 
56U 
562* 
563* 



CC *L1'0' NC. TF DIAL DIGITS OOCL 

CC XL3'0' REAC-IN-AREA OOOL 

CC Hll'2' IOCCUNT OCCL 

OC XL2M07C' IOSENT OCOL 

CC X'0<»0°2C' AUTHCRIZEC SECUENCE OCOL 

OC XLl'OO' CONTROL "BYTE VALUE CF C OOOL 

OC X'E6E62C AUTHORIZEC SEOUENCE OCOL 

OC XLl'OO' CCNTRCL eYTE VALUE CF 0?0L 



00C54E 
C0C54? FF 
00054S CCCCOC 
0CC54C C2 
00C54C C K 
00C54E C4 
0CC54F CO 
C0C55C CCCCCCCC 
000554 CI 
00C555 2C 
000556 CSOSIOTC 
00C55A CI 
000556 E6E61C7C 
00055F CI 



565 DIALLIST t 

566*0IAlLlST OS 

567* 

568* 

56?» 

57C* 

571* 

572* 

573* 

574* 

57*4 

576* 

577* 

576* 

57S* 



CC 
OC 
CC 

OC 
CC 
OC 
CC 
CC 
CC 
OC 
OC 
OC 
CC 



»«LST SULST,MO,5,0,l,20,(DSCSlC7C,l).(E6Etl0 7C.l) 
3F PUT CN FULL wCRO BOUNDARY OCOL 

Xll'FF" 1CENMFY AS SWLST OCOL 

XL3«0' FTP TO MATCHING SECUENCE OOOL 

HL1'2' NLMPEP CF LIST ENTRIES OOOL 

HLl'5' ENTRY LENGTH OCOL 

HL1'4' REAC-IN-AREA LENGTI- OOOL 

HLl'C KC. OF DIAL DIGITS OCOL 

XL4'C REAC-IN-AREA CCOL 

HLl'l' ICCOUNT OCOL 

XL1'20' IDSENT CCOL 
X'09C°107C' AIJTH0RI2E0 SECUENCE OOCL 

YL1UI CCNTRCL BYTE OOOL 
X'F6E6107C« AUTHORIZED SECUENCE OOCL 

YLK1I CCNTRCL RVTE OOOL 



CCC56C OCCCOCCCOOOOOCOO 



581 INAREA 
583 MYCC6 



CC ICCF'0' 



CSCRG-CX,0EV0-BS,MACRF«(R,W»,CCNAME«B277C0Cl, 
LER6«ERPeLCCK,ER0FT»TC , 



00C6CC 
0CC6CC 
00C6FC 



585*» 




586*» 




587* 


CPG 


588*MYCCe 


OS 


ses* 


CRG 



CATA CCNTROl BLCCK 

*-20 TO ELIMINATE UNUSED SPACE 
OF ORIGIN' ON WORO BCUNCRY 
•♦20 TO CPICIN GENERATION 



COMMON ACCESS METHCO INTERFACE 



0CC6FC CC 
0CC6F1 CCCCC1 
C0C6F4 CCCC 
0006F6 1CCC 
CCC6FP 00C10C01 



5<?3* 


CC 


1<H* 


CC 


5<J5* 


PC 


5<»6* 


OC 


5S7* 


CC 



Al 1(0) eUFNC 
*L3(1» 6UFCB 
AL2(C) eUFL 
»L2'00010CCC0C00CC00' 
All) IOEAC 



nSORG 



FCUNOATICN EXTENSION 



CCC6FC CC 
0006FC IP 
C0C6FE FF 
0CC6FF'0C 
CCC7CC CC 



601* 


CC 


^02* 


DC 


603* 


OC 


6C4* 


OC 


605* 


CC 



■ill 'COOOOOCO- eeTEK.BPALN'.HlARCt-Y 

<»L1'00011CC0' PTAH EPOPT CODE 

411(255) 8TAM euFFER CCUNT 
ALKC) 

eLl'OOOCOOCC PECFM 



Appendix N: Sample Start- Stop and BSC Programs N-5 



ire cpject cdcf 
:?c7ci occoc 



ATCR1 ACOR? STMT <rL'RC c STATFM C NT 

6C6* DC AL3(0) EXIST 

*-?e** ftunoaticn blcck 



F30SEPt<; !C/tt/7C 



:0C70<i C2F2F7CTFCC.FCF1 
"CC7 r C C? 
C0C7CC c 
C0C7CF 2020 



tic* 


OC 


M 1 + 


cr. 


M2* 


re 


613 + 


oc 



CLO , 02770CC1' OCNAME 
"LI •COOCOCIO' O^LGS 
PI l'COOCCCCC IFLG 
«L2'001CCCCCC010CC0C' »<ACR 



CClf coococc 

CCC714 CC 

0007l« PC 

cc r 7u ccocccccccocoooo 

0C073C CCCCCCCCOCOOOOOO 



ft 17* 


DC 


ne+ 


cc 


*•!?♦ 


oc 


62C* 


oc 


fc21 + 


cc 



ETA* INTERFACE 

A(FRPBLCCK) CCPLEPfl 
f»l I'CCOCCOCC* HCCE 
Bl.l' lOOCrpCO' PA?,CCOE 
X126'0' CONTROL CHARS 
<.F>0' RESEPVEO 



CCC74C 

C0C74C CCCOCOC 

^007<(<. CO 

CCC74? C3 

o A C7*f oi<;c 

CCC7*F CC r CC*OC 

?oc7«c ccrcc;*c 
0CC75C ccrcocc 
T?C7';<i CCCCC?3C 
"CC758 CT1 
CCC75A CCCC 
0>C75C CC 
CCC75C CC 
CCC75E CCCC 
0CC76C COCCCCOC 
00C7*« COOCOCCC 



(S25* 


cs 


t2k*f vtecp 


re 


627* 


rc 


62E + 


r c 


62S + 


oc 


630 + 


cc 


631 + 


cc 


632 + 


cc 


633 + 


cc 


634* 


cc 


*35* 


cc 


tit* 


cc 


f-31* 


cc 


63P + 


oc 


63<=* 


cc 


64C + 


oc 


i«2 SNAFCCP 


oc 



PYCECP.TT.PYOCP. INARF.A,<,0C,ANSRLIST,1,»'F«L 
TF 

A(0) EVENT CCNTRCL PLCCK 
PLl'COO' 

ALU31 7YPF FIELC 
AL2I400) LENGTH OCCB 

A<"VCC8) CCB AOORESS 
A(INAREA) AREA ACCRESS COOP 
4(0) ERRCR INFO. FIELO ACD* 
A(ANSRLIST) TERMINAL LIST ACCRESS 
AL2I1I LINE NUMBER 
AL2I3I RESPONSE FIELD 
ALU?) TP-CP CCOE 
ALl(O) ERRCR STATLS 
AL2(0) CSW STATUS 
ALMC) CLPRENT ACCR LIST PTP 
ALMP) CUFRENT AOOR POLL PTR 



CSCRG«PS,RECFM=veA,MACRF=W,BLKSIZE»l632,LRECL«125, 
OCi*AME»SNAPSW,CEVO=PR 



CC?7«F 
CC7??. 
CCC7f F 



m** 




fc45 + * 




Ktt + 


CRG 


647+SNAFCCP 


CS 


<■<■£♦ 


CRG 



CATA CONTROL BLCCK 

♦-16 TO ELIMINATE UNUSEO SPACE 
OF ORIGIN CN WCRC BCUNCRY 
**16 TO CPIGIN GENERATION 



0C076F CCC* 
C0C76A COCO 



65C + * 



6S2* 

653* 



CC 
OC 



PRINTER DEVICE INTERFACE 



PL2 , OO0OC0CC000C0OOO« PRTSPtCEVT 
H'C* 



CCMMCN ACCESS METHCC INTERFACE 
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LCC CPJECT CCCE 

C0C7fcC CC 
CCC76C CC00C1 
CCC77C CCCC 
CCC77? 4CC0 
CCC774 CCCC001 



ACCPl A0OR2 ST^T SCURCE STATEMENT 



F3CSEP69 10/06/70 



657* 


OC 


656* 


CC 


65<5* 


CC 


f6C* 


OC 


661 + 


CC 



ALKO) PLFNC 
AL3(1> eUFCB 
AL2(0) BUFL 
ei2'010C00C0C0P00C00« 
A(l) IOBAC 



CCC77P CC 

0CC77« CC00C1 

CCC77C 54 

C0C77C CCCCCC 



665* 


rc 


666* 


CC 


£67* 


CC 


666* 


CC 



FCUNDATICN EXTENSICN 

BLl'OOOCCCCO' BFTEK.BFALNtHIARCHY 
AL3(1» ECCAO 
BLI'OIOICICO* RECFM 
AL3(0t EXLST 



0CC78C E2C«Cir7E2E6«CA0 

00C7PP 02 

C0C78S CC 

00C7e* CC20 



672 + 


OC 


673 + 


OC 


674* 


DC 


e75 + 


OC 



FCUNOATION BLOCK 

CLR'SNAFSW CCNAME 
RLI'OOOCCCIO' CFLGS 
rn'OCOCCCOO* IFLG 
■UZ'OOOCOCCCCCICOCOO' MACR 



C0C78C CC 
C0078C C00C01 
0CC7SC CCCC0CC1 
C0C7S4 CCCC 
C0C7S* C66C 
0CC7S8 CCCCCCCC 
C0C7SC C0000C01 
00C7AC CC 
C007A1 CCC0C1 



6 7<J* 


cc 


68C* 


oc 


fefll* 


cc 


482* 


cc 


683* 


DC 


*84 + 


cc 


(■ 85 + 


oc 


fit* 


cc 


tei* 


cc 



P.SAM-RPAK-CSAK INTERFACE 

»L1'0C0CPCC0' RER1 

AL3(1) CHECK, GEPRt PERP 

A(l) SYNAO 

H'C CINC1, CIN02 

AL2I1632) PLKSIZE 

F'0« WCPC, WCFL, CFFSR, OFFSW 

Atn ioba 

ALUO) NCP 

AL3(1) EOeR, ETPAC 



N-6 OS/VS BTAM SRL 



PSAK-EPAK INTFPFACE 



CCC7A4 CCCCCCC1 

CCC'AE OCCC 

C007AA CC70 

CC07AC CCCOCCC1 



ccc7ec 
cco7ec ci 
ccc7ei cc 

OCC7E2 tt 

c?c7P? 2c 
coc7e* ccocc7">e 
occ7ee ccccccrc 
orc7ec cocrc7cc 

00C7CC CCCCCS3C 
0CC7C* 0CC007B0 
CCC7C4 
CCC7C4 8C 
OOC7C6 



691* 


DC 


6S2 + 


CC 


*<n* 


oc 


694 + 


cc 


606 STlfP 


SNAP 


6S7+SCLPF 


cs 


6<iP* 


6c 


69S* 


cc 


7CC* 


oc 


701* 


cc 


7C2+ 


cc 


7C2 + 


cc 


7C4* 


cc 


705-» 


cc 


7C6* 


DC 


7C7* 


CPG 


7C8* 


CC 


7CS* 


CRG 



4(1) EOeh 

H»0« DIRCT 

AL2U25) LPECL 

All) CNTPL, NOT?, PC INI 



CCe«SNAPCCe.ID»l,PCATA*«(iFCS), 
STCRAGE«(A*SRLIST,SOUMPJ,*F«L 
OF 
tlllll 1C NUHBf" 

Atnci 

ALH134) CFTtCN FLAGS 
ALK32) CPTICN FLAGS 

a<snapoc6i oce accress 

A(C) TCe AOCRESS 

A(*-»<i) ACCRESS CF SNAP-SHCT LIST 

A(AKSRLI5TI STARTING/ENDING ACCRESS 

A(SDUCP) STARTING/ENDING ACOPESS 

*-« 

X'RO' 

•♦3 



11 



LCC OejECT COCE 



AD0R1 A00R2 STMT SCLRCE STATEMENT 



F3CSEP69 K/Ct/70 



0CC7C8 

CCCfllC CCCCCCCC 

CCCfll* mc 

cccoo; 
cococe 

C0C0C7 
COCCCA 

coccce 

CCCOCC 
COCCCC 



711 


SAVE 


CS 


lBF'O' 


712 


CCLMEP 


CC 


F«C« 


713 


0C1SP 


DC 


X'lHO' 


71* 


AREG 


ECU 


5 


715 


DCEPEG 


ECU 


6 


716 


CECePEG 


ECU 


7 


717 


CTPEG 


EOU 


1C 


716 


AREAPEC 


ECL 


11 


719 


BASEPEC 


ECU 


12 



72C SAVEPEG ECL 



SAVE AREA 

CCUKTER 

DC1, SPACE 

REG UJEC TC PCIKT TC CFTRfLST 

OCE REGISTER 

CFCe REGISTER 

CCUNTER REGISTER 

MESSAGE AREA REGISTER 

BASE REGISTER 

SAVE AREA REGISTER 



DCBC OEVO*BS,CSCRG"BX 



724 + * 
72J4* 



CCB SVKBCLIC CEFINITICN FOR 
BTAf LIKE GROUP 



727*IH*CCe CSECT 



7294* 



eTAf USE CRCUP INTERFACE 



CC0C14 
0CCC14 
CC0014 

ccooie 

0COO1A 

ccccic 

CCC02C 
CCC02C 
CCC021 
CCCC22 
C0CC23 
CT024 
COCCK 
CCCCIC 
CCC02* 
C00O24 



731 + 


CRG 


IhA0CB*2C 


732+CCEPLFNC 


OS 


CAll 


733+OCePLFCE 


05 




73A*DCPeLFL 


CS 


AL2 


735+CCECSCPC 


OS 


BL2 


736*cceice*c 


CS 




737 + CCEHAPC 


CS 


0PL1 


7?e*CCf EFTEK 


CS 


?L1 


7?S*CteFPRCF 


OS 


AL1 


7<.C»CCfFLFCT 


CS 


All 


741* 


CS 


AL1 


7<>2*CCEFXLST 


OS 




7<i3* 


CRG 


IMCCB*2e 


7<t<!*CCECEVTF 


CS 


»ll 


745* 


CPG 


^ACCB*36 


746+CCEFICPX 


CS 


BL1 



7<.e*» 



FCUKCATICN BEFORE CPEN 



O0C2E 
CCC02E 
CCCC3C 
C0C031 
00C032 



751* OPC IhACCB*AC 

752*CCECCNAK CS CLP 

753+DCECFLCS CS BL1 

754*CCEIFLC OS PL1 

755*0CEfACR OS BL2 



757** 



FOUNCATICN AFTER TPEN 



0OCC2E 
CCC02E 
00CC2* 
C0CC2C 
C0CC2C 



759* 


CRG 


UACCB-K.0 


76C+CCETICT 


C? 


eL2 


761+CCE^ACPF 


OS 


»L2 


762+PCEIFLCS 


OS 


0PL1 


763*CCECEe»C 


CS 


A 



Appendix N: Sample Start-Stop and BSC Programs N-7 



ice rpjfCT crre 



ACCP1 AC0«2 STMT 5rt l >C c STATF^F^ 



F3CSEP6S 1C/C6/70 



?ccc 
:cc?c 



0CC03* 

coco?* 

".CCC2f 
0CCC3? 
CCCC2A 
0OCO3P. 
C0CC3C 
CO0C3C 
COCO?E 
Orco?F 

crcc*c 

CCC04? 
CCCC*<i 
C0CC45 
CCCC4* 
rioCC*' 

cc?q«e 

CCCC4S 
COCC'C 
rrcc«F 
CCCCfC 



76A*CCFPf *r 


cs 


04 


7t c *ccev>pnF 


cs 


c» 


767 + * 






76f* 


CPG 


!i-*cce*5? 


76<;4[>CEIERP 


OS 


A 


771*CCE>*CCF 


cs 


Rll 


772*Cf.e)'CCrF 


cs 


811 


773+cCE?$«yv 


cs 


Cll 


77«+ccee5vPT 


OS 


r.u 


775+OCREST5X 


cs 


Cll 


776+OCPESSTX 


OS 


CL1 


777*CCeeSTFX 


OS 


Cll 


77p+rceesET)( 


CS 


Cll 


77e*CCE»=$*KC 


OS 


CI? 


7»C + Cr.FPS*Kl 


rs 


C12 


7Hi*rceeyFKc 


OS 


Cll 


7B2*CCEESN*K 


rs 


Cll 


783*DCEESE"fP 


cs 


Cll 


7844CCEESCIE 


rs 


Cll 


785+CCeESECT 


OS 


Cll 


7flt*OCeESSVK 


cs 


C13 


787*CCEe«CM 


OS 


C12 


788*CrEESSAK 


cs 


C12 


78<;*cceE5Pvi 


cs 


CI? 



ETA*' INTERFACE 



coerce 



791 IECTCECP 

7S2*IECTCECF DSECT CFCB DUfKV SECTICN 

793+ * 

79*4* 4 

7Q5+* C ♦ STANCARC EVENT CCNTROl dCCK 

Tit** * 

7<5 7 + * ♦ 

798** ♦ ♦ 

799** <. * CPEBATICN TYFF ♦ AREA LENGTH 

POC** ♦ ♦ 

801** ♦ 

802** ♦ CN-LIKF ♦ 

803** P ♦TERMINAL ♦ ACCRESS CF OCB 

8P4** ♦ TEST ♦ 

80« + * ♦ — 

P06«* ♦ ♦ 

PC7+* 12 ♦PESEPVEC ♦ ACCRESS CF AREA 

808+* ♦ ♦ 

80S** * 

fllC** ♦ ♦ 

All** 16 ♦ SENSE BYTES ♦ RESICUAl CCLNT 

812** ♦ 1 6 2 ♦ 

Rl 3+« * 

*14** ♦ ♦ 

Pl!*» 2C ♦ CCffthr I ACCRESS PF TERMINAL LIST 

Pit** ♦ CODE ♦ 

817** ♦ 



PAGE 
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IPC OPJECT cone 



AOCR1 AOOR2 STHT SCLPCF STATEMENT 



F3CSEP69 1C/06/70 



818** 




♦ 




♦ 


RELATIVE* ♦ 


4 


PIS** 


24 


♦ 


STATIS 


♦ 


LIKE ♦ ACCRESS ♦ VPC/LRC 


4 


82C** 
821** 
822** 




♦ 


FLAGS 


♦ 


NUPBEP * PESPCNSE* RFSPfNSE 


4 




♦ 




♦ 


♦ 


4 


823** 


28 


+ 


TP-CP 


♦ 


FRRTR ♦ CSW STATLS 


4 


824** 




♦ 


rroE 


♦ 


STATUS ♦ 


4 


825** 
82*** 
















* 




* 




4 


E27** 


32 


*PF 


SFPVFO 


♦ 


ACCRESS CF CURRENT 


4 


828** 




♦ 




* 


ACCPFSSING ENTRY 


4 


e29** 
P?C*» 
















♦ 




♦ 




4 


P31** 


3t 


*PF 


SFRVEC 


♦ 


ACCRFSS CF CURRENT 


4 


832** 




♦ 




♦ 


PCLLING ENTRY 


4 
















834** 




♦ 




♦ 


♦ 


4 


835** 


AC 


♦ PE 


SFRVFO 


♦PESFPVFO ♦ WRITE AREA LE^GT^ 


4 


83t*» 




♦ 




♦ 


♦ 


4 


837** 
P?6** 
















* 




♦ 




4 


S3?** 


4*. 


♦ *E 


SFRVFO 


♦ 


AffPFSS CP WRITE AREA 


4 


PAC** 




* 




♦ 




4 


P41** 















N-8 OS/VSBTAM SRL 



ICC CBJECT COCE 

cooooo 

CCCCC4 

cococ* 

cccoce 
coocoe 

cccoec 

coccic 

ooooi i 

C0C012 

C00014 
CC0014 



ACCP1 ACDR2 STMT JCLRCE STATEMENT 



»AGE 1* 
F3CSEP6S 1C/C6/70 



84?*cecscecb n« 

845*rECTYPF OS 

847*declngh os 

P4S*CECCMTT CS 

85C*CECCCB*r. OS 

852*CECAPE# CS 

854*CECSENSC PS 

P56«CECSENS1 CS 

858*ceccclnt os 

86C*CECCMCCC OS 

861*CECENTFY OS 



IF STATUS FLAG ♦ AOCPESS CF TKE TC« 

1H CPERATICN TYPF 

IH AREA LENGTH 

0CL1 RFSEPVEC FCP ON-LINE TEPMNAL TFST 
IF ADDRESS OF OCR 

IF ACORESS CF AREA 

K 1ST SENSF BYTF 

1C 2NC SENSE PYTE 

It- RESICLAL CCU*T 

0CL1 COMMAND CCOE 

IF ACORESS OF TERMINAL LIST 



000C1* 
00CC1S 
000C1A 
CCCCI C 
0000 1C 
0000 IE 
00002C 
00C024 
00C02E 
CCCC2A 
00002C 



8644CECFLAGS OS 

866+CECRLN CS 

868*CECPFSPK OS 

87C*CECTFCCC CS 

872*CECEPRST C? 

874«CECCSWST OS 

876*CEC*CRFT OS 

878*0ECPCIPT OS 

■PC* OS 

882+0ECVLNG OS 

P84*CECWAREA OS 



1C STATUS FLAGS 

1C RELATIVE LINE NUMBER 

IH RESPCNSE FIELDS 

1C TP-CP CCOE 

1C ERROR STATUS 

IK CSW STATUS 

IF ACCRESS CF CURRENT A00P€SSING ENTRY 

IF ACORESS CF CURRENT POLLING ENTRY 

2C RESERVED 

It- WRITE AREA LENGTH 

1* ACORESS CF WRITE AREA 



ccceiE cccccc 

ccoeie e*e«2c 

0CC81E CSCS3C 

0CC821 E6E43C 



ee7 

8P8 
88S 
89C 
P«U 



ENC 



■ H'CCPOOO' 
«X«E6E62C 
•X^C^OQaC* 
■X«E6E63C' 



CRCSS-PEFERENCE 



SYM8CL 



I.EN VALUE DEFN 



ANSRLIST 00CC4 000530 00550 

AREAREG CCCCi OOOCCB OC718 

AREG 0C001 000005 0C714 

BASEREG C00C1 OCOCCC 0071S 

BEGIN CCCCI OCCCAO 00172 

BLFPTN 00CC1 000338 0C421 

CLCSE CCCCI 000280 CC34C 

CCUNTEP CCCC4 0C0810 OC712 

CTPEG CCCCI OOOCCA 0C717 

CCBBFTEK CCCCI OtCC20 CC738 

DCB8SAKC C00C2 000040 0077S 

CCeeSAKl CCCC2 QCCC42 CC7EC 

OCBBSCLE CCC01 000047 00784 

cceestNC cccci 000C44 co7ei 

CCBBSECT C00C1 000C4P CC78« 

CCBBSETe 0CCC1 0CCC46 OC783 

cceesETx ococi 000C3F 0C77e 

CCBBSNAK COCCI 00CC45 CC782 

DCPBSCN'L 0CCC2 0C0C4C 00787 

CCBBSPSV CC0C1 00003A CC77? 

OCBBSPVI 0CCC2 000050 0C789 

CCBBSSAK CCCC2 000C4F CC7EE 

CCPBSSTX OCCCl 00003P 0C776 

CCBBSSYN, CCCC3 C0CC49 0C786 



REFERENCES 










01P0 


C2«6 


C:C4 


0311 


CMS 


0633 


0222 


C232 


C246 


0258 


C268 


0268 


0191 


oi<;2 


C2C7 


C2Ce 


0243 


0244 


0C99 


01C0 










0134 












0396 












0382 


C52C 










026«! 


0271 


CZ72 


C274 


C274 


0433 


0507 












0269 


C27C 


C27C 


C271 


C4?3 


0434 


0506 













1C/C6/70 



0456 C457 0457 0458 046C 



0435 0436 0463 0465 0466 0468 0468 0504 0506 
C434 0435 0463 C464 0464 0465 C5C4 C5C5 05C5 



Appendix N: Sample Start- Stop and BSC Programs N-9 



OC»PST*X CCCCI C00C3F CC777 

••cepjisx cocci ococ3C cc77« 

CCfEJVPT CCCCI 000C3P CC774 

CCFPIKP CCCC OCOCl<i C0732 

PCPPCFCT COCCI OCCC22 CC74C 

CCPIFI CCCC? OTClfl CC7?« 

CCPPIFNC COCCI OO0C1*. CC722 

CCPCCKAK CCCCP 0CC028 CC7?2 

CCPCEedC CCCC CPOC2C CC763 

CCBDEVTP CCCCI CCPOIC CC744 

OCeC5CRG C0CP2 OCOC1A OC735 

CCPFICPX CCCC1 OOC02* CC7<ifc 

OCPFOPCP CCCCI OCC021 CC73S 

CCBEXIST CCCC 0CCC24 CC742 

CCeHIARC COCCI OOCC2C CC737 

CCPIFIG CCCC1 CC0C31 CC754 

CCPIFIGS POCCl CCCC2C OC7*2 

o<"Pice*r orcci ooccic co73« 

CCeiEPB CPCC 0CCP34 CC76S 

OCeHACR CO0C2 OOOC32 CC755 

CCBMACPF CCCC2 O00C2A PC7M 

CCPfFlGS CCCCI CCC02C OC753 0133 

PCBREAC CCCC C00C30 CC7C 

CC°REC OC0C1 OOOCCfc CC715 Old CICfc 

DCBTICT CCCC2 PC0C28 CC76C 

CCPWRITF OCCC 0CCC30 C07fc5 

CCeXCCCE CC0C1 0*CC?«3 PC772 

ccexKrcf cocci e^rie cc77i 

CC1SP CPCC2 0CCP14 CC712 C2«fc 

CRCSS-REPERENCE P#GE 2 

SVHPCl 1^ VALUE CEFN REFERENCES 10/C4/70 

CPcarpp'r cocc oppc20 ooe76 

CFCAREA CCCC CCOCCC 0Ce52 02C7 

CECPREG 000C1 0000C7 CC716 C1C2 C1C7 C387 

rFCCPCCO CC0C1 0C0P14 CC86C 

C>=CCCtNT C0CC2 QC0C12 CCE5E 

C C CC$VST CCCC2 OOCei* 00874 

DFCCCEAC PCCC OCOCCP CC85C 

CFCEMRY COCC 0C0C14 f^Cetl 01«1 C2«3 est 

CFCERP5T 0CCC1 0CCC1C CC872 

CFCLACS COCCI 0C0C1P 0CP64 C2«7 CC6 C5C 045* CA7<) 

rcciNCTF C0CC2 0C0PC6 CC8<i7 

ceccmtt cccci ococoe c:e«<: 

OFCPCLPT CCCC CCCC24 CCP7E 

CFCFSPN .PCCC2 00PC1A CCf6e 

CECLN T.CC1 0CC019 CC66fc 

CFCSCECe CCCC COOCOC 0CF<-3 03" C*8 

CFCSENSC C00C1 iCOnC CC854 C?l C5C2 

CEC.SENS1 "CCCl 0CCC11 0C856 

CFCTPCCC CCCCI C00C1C CCE7C 

CPCTVFE CCCC2 O^OCC CC8A5 03«=2 C2«? Cf2 

CFCWAPEA CCCC 0C0C2C CCe8<i 

CFCINC 0CCC2 "C0C2A CC8E2 

CIAltI<T CCOC 0CP54P CC564 0233 

FNfRY CCCC? CCCCC COCS 

PPCRLCCK CCCC 00CC8C CC15C Ctl7 

EXAPFIF? C-CC1 COCCOC COCCI 

FXIT CCCCI OC02<=* rc356 01**. 

FIM COCCI 0CC3CA CC71 C61 

P1MSF COCC r CC5C CC512 0*?C 0432 C27 C5C3 

TFC.TCFCP CCCCI CCOCCC CC7 C 2 C1C? 

iHACCe CCCCI OOCCCO CC727 OKI C721 C743 C745 C751 C7J? < , 7t8 

tt-PCCC2 COCCI P0CC3A CO 1 1= 0112 

IHP0CC2A CCC2 0' , CC3A CCllt C 1 1 ' 

THPCCC5 CCCCI 0CPCP6 001A2 C13<: 

lhPCC r 5A CCCC2 0CCCP6 CC143 C13P 

IHPCC23 COCCI CCC27C 0022t 03?? 

I^FOC23A CCCC? 00C27F C337 P232 

IHPCC27 CCCCI CCC2CC CC272 036? 

IHPCC27A CCCC2 CCC2C0 C^272 036e 

IHPCP31 CCCCI OOC332 0^*1; 0^12 

K-PCC21A CCCC2 CCC322 OCAlt Cll 

i^ecc3t cocci ccc2p c^ee c*p«i 

It-B0C3fA COCC? 00C2C 0C<i8? O'M 

i" j pcc?e cccci pocef cc = u 05-i» 

H-PC03PA CCCC2 C0CP6 PC517 C?12 

I\APFA CCCC* 0CC56C C05P1 C<?1 

KYCCP CCOOA 0P060C CC5PP 01C6 C13C C17e C1P4 C230 0237 03Afc C630 

fvCECe rccc 00C7-1.C Cf~e2t 01C7 C175 Cl?6 C213 0225 C253 C277 C*«C 

►'0T277C CCCCI 000182 CC25C "2M 

CUTKJIG CCC3 0CC.8C CC^? 0222 

PFVtlRK CCCCI CCC2BC 0C62 C55 C5<5 

ptc cpcc* ococAc ocn; cipf 

BTT '"CCCl 0CCCC2 0C1SC 0?C5 0210 

^AVF CCCC 0CC7C8 CC711 01C4 CIC 1 ! C357 

"'VF.PEG COCCI COOCOC CC72C 01C C1C; C??7 



N-10 OS/VS BTAM SRL 



PAGE 



LTC CJfCT ccrE 

coerce 



AOCP1 AOOR2 STMT SOURCE STATFMFNT 



F3CSEP69 10/06/7C 



1 EXAMPLF1 CSEfT 

2 »»»»#»»*»*»*»*»*»*»***»»»*»*»»»»»***»»*♦»**»♦***»»*<.»****»*»»*»»****»» 

3 * 

SA^etE IP* 274C/276C PRCGRAM 



THIS POCGBAM EXERCISES THE BTAM ONLINE TEST LCGIC FTP A 
NPNSWITCHFO POTNT-TO-PPINT LINE TO WHICH IS CCNNECTED AN 
IBM 274C ECUIFPEC WITH AN IBM 2760 CPTICAL IMAGE UNIT. 

CPERATICN - WHEN THE PRCGRAM HAS REEN STARTEC. TWO MESSAGES 
WILL BE TYPED ON THE SYSTEM CONSOLE: 

IXTRT022 IS LCAOED AT XXXXXXXX 

IXTBT022 FTP NONSWITCHED 2760 HAS STARTEC. 

THE TERMINAL OPERATOR CAN NOW 00 CNF OP THE FOLLOWING: 

I.) PR^BE THE 'LCAO' UTILITY RESPONSE POINT CF THE 2760. 
•LOAO' SHOULD NOT BE PROBED WHEN THE C IL*STRIP IS 
ALREADY LOADED. 

2.» ENTER AN ON-LINE TERMINAL TEST REQUEST MESSAGE FTP ANY 
27*0- OR 2760-TYPE TEST. 

3.) PROeE THE 'UNLOAD' UTILITY RESPONSE POINT. THIS WILL 
CAUSE THE FILM TO BE RETRACTEC AND THE CARTRICGE 
TO BE EJECTED. YOU MAY NCW BEGIN AGAIN. 

4.» ENTER A MESSAGE FROM THE 2740 KFYPCARC RECUESTING A 
CLOSEDOWN. THF 6 CHARACTERS OF THE MESSAGE ARE 
CLOSE* WHFPE **EOT CHARACTER (UPPER CASE) 

THE PROGRAM IGNORES ANY OTHER RESPONSE. THE FOLLOWING 
MESSAGE WILL BE PRINTED ON THE 274C KEYBOARD. 

•THE IMMEDIATELY PRECEOING MESSAGE WAS NCT 

OF THE PROPER FORMAT. 

YOU ARE EXPECTED- TO PROBE UNLCAD CR LCAC, 

CR ENTER AN ONLINE TEST REQUEST MESSAGE.' 



41 



PRINT NfGEN 



CCCCCP 

coerce 

CCCCCC 

cococr 
corrfE 
crcrcp 
coccrc 



rcrcc* C50C 
cocr rt 

rpocCC 



42 WCRKPEG FCL 

44 DCFREG ECU 

45 PASEREG 

46 SAVEREG 

47 RETREG 
46 BRREf 
49 START 



51 

55 
56 
57 



ECL 

EOL 
EOL 
ECL 
FCL 



9 

12 
12 
14 



SAVE <1'.12) 

BALR BASEPEGfC 
USING ♦, PASEREG 
USING IHAOCB.CCPREG 



POINTER TO SAVE AREA 

PAL RETURN REGISTER 

PAL BRANCH ADCRESS REGISTER 



SAVE THE REGISTERS 
ESTABLISH ADDRESSABILITY 



LCC OBJECT CODE 



ACCP1 A0DR2 STMT SOURCE STATEMENT 



F30SEP69 1C/06/7C 



COCO 5CC0 C3F2 003Ff 

OOOrcA P3P4 C3E6 C3F2 0P3EC 0?3Fp 
00001C rr07 C3F6 C307 003FC 0030^ 
00CC16 C2C"> 0024 C3F6 CCC2A C«?EC 



CCCC7C 5CP0 C32F 

cccrfC *ir:c C2?a 

nnCCF' 41*" C5C2 

00C r PP 

COCCPP 92C'f C3T1 



CCC096 911C <T?n 
OOOC'A 477C cere 



C p ? ?4 

CC32T 
CC5CP 



CCC3* 



5P 
59 
6C 
61 

6? WTC 



P2 

»4 

«5 

°t OFFN 

P7 

P9 

°6 
<!7 



ST BASEPFG.BASE 

UNPK UNPACK(9»,BASE(5> 

TR IJNP»CK(8),TRTAPLE-240 

MVC WTre*30(S) .UNPACK 

WTC 

WTC 



COMPUTE THE 
LCAC ACCRESS 
FOR THE 

WTC MESSAGE 



IXTPT022 IS LOADED AT 

IXTBT022 FCR N'CNSWITCHEC 2760 MS STAPTtC 



ST 

LA 

LA 

ECU 

MVI 



TM 
B*7 



SAVERE0-iSAVEA«>FA*4 
SAVEREG, SAVEAREA 
OOPREG.CCP 

* 

ICCOOE.O 

CCB 

CCPCFUGS.X'10' 
OPFNOK 



eASE FOR OOP 
INCICATE OPFN INITIATED 
CPFN THE CCP 
DID OPEN COMPLETE SUCCESSFULLY 



•OPFN DID NOT COMPLETE SUCCESSFULLY' 



Appendix N: Sample Start-Stop and BSC Programs N-ll 



COOOCC 5PSO C32F 



0033* 



in 



SAVEPEG.SAVEAPEA** 
PETUPN (14,12) 



PESTCRE THE REGISTERS 



oocer* 

coccrt 9200 c?fo 



115 CPEKCf 

11* 



ue 



ECU * 

MVI EFPCRCT.O ZEPC ERROR CCUNT 

TRNSLATE DCB,SD*0,ERRMSG, LENGTH TRANSLATE ERROR MESSAGE 



COCCf f 

COCCFE 92<"<i C3FI 



cr?.E? 



00013C 12FF 

CPC132 *77C C2C6 C02CC 

000136 *5FC C1FA C0200 

00C13A C5fl C372 C3CA CC?78 C03EC 

0r01*C 4770 C1AC C0182 

0001** CSC1 C376 C.3CC OC37C CC3E2 

OCOl'A *7P0 C2M C0220 

C0ri*E C5"l C376 C3CE CC37C 0C3F* 

C0015* *77C C1AC 091R2 

C0C15E 9fFF C3F2 0C3F8 

0001?C *78C CI AC 001*2 

CC016C C2C2 C372 C*C3 0??7P CO*"* 

0OC166 

CCC166 S20C C?F1 0C3E7 



CC01AC 12FF 



131 PEACTI 
132 



13* 



ECL * 

MVI 1CCCDE,* INDICATE REAO TI 

RE AC REACECB,TI,,INAREA,27,,l,MF-E 



NORMAL INITIATION 
BRANCH IF NC 



1*8 




LTR 


•6PREG.BRREG 


1*9 




BNZ 


ICFPPPR 


15C 




BAL 


RETREG.WAIT 


151 


CCMPAPF 


ClC 


INAPEA(2I,PREC 


152 




BNE 


ICNORF 


153 




CLC 


INAREA**<2),UNL0AC 


15* 




BF 


CUT 


155 




CLC 


INAREA**(2).L0AD 


156 




BNE 


I CHORE 


157 


* 






158 




CLI 


LCACDCNE.X'FF* 


15S 




P.E 


tGN'CPE 


16C 




MVC 


INAPFA(3),L0A0MSG 


161 


WRITETCC 


ECVI » 




162 




MVI 


ICC0DE,12 


16* 




WRITE 


REAOECB.TCCINAPE, 


IPC 




LTR 


eRPEG,6PPFC 



IS MESSAGE FRCM 2760 

BPANCH IF NO 

IS RECUEST TC UNLCAO 

BPANCH IF VES 

IS RECUEST TC LOAC 

IGNORE MESSAGE IF IT IS NOT 

LCAC CR UNLCAC 
IS FILM ALREAOV LCAOEC 
BRANCH IF YES 
MOVE FAA FCR LOAC 

INCICATE WRITE TCC 



NOFMAL INITIATION 



LCC OBJECT CTE 

C001A2 *77C C2C<S 

CC01A6 *5«=0 C1FA 

CC01»A S2FF C3F2 

:CC1AE *7.F3 CI?* 



AHCP1 A00R2 STMT SCLRCE STATEMENT 



C02CC 
C020C 



C??E8 



0013A 



HI 
182 
1»3 
1** 



BNZ 
BAL 
MVI 
B 



I TERROR 
RETREG.WAIT 
LTACOQNE.X'FF' 
CCMPARE 



PAGE 3 
F3CSEP6? 1C/C6/70 



BRANCH IF NO 
INCICATE FILM LCACEO 



C?Clf2 lfle IGNCFE 

??0ie2 C50* C372 C*C7 0C378 00*00 1*7 

COCief *78S C256 CC25C IBB 

COCIPC 921" C?Fl T3E7 189 



ECL ♦ 

CLC INAREA(5I, CLOSE 

BE ENC 

MVI ICCCDE.16 



IS RECUEST TO CLCSE LINE 

VES 

INOICATE WRITE TI 



C0 r U2 l?FF 

0OC1F* *770 C2C6 

??ClFf *5*0 Cl'A 

C0C1FC *7FC CCF8 



191 



WRITE REACECB,TIP,,EPRMSG,LENGTH,,1,MF»E 





206 


LTR 


PFPEGtBRREG 


C02CC 


207 


BNZ 


ITERROR 


C02rc 


208 


BAL 


RETREG.WAIT 


OCOFF 


20« 


B 


REACTI 



NORMAL INITIATION 
ERANCH IF NO 



C002CC 

C002CC ICEC C3T6 



CCC2CE 9?7F C5FA 
C9C212 *77C C2C6 
0C02U <!200 C3F0 
C0021A «FEC C3C6 
?C021? C7FF 



0C6CC 
0C3F6 



0030C 



211 WAIT 
212 



21* 



ECU 
ST 



RETREG.TEMP 



WAIT l.FCB-REAOECB 



219 


CLI 


REACECB,X«7F« 


22C 


BNE 


ICFRROR 


221 


MVI 


ERPCRCT.O 


222 


L 


RETREG.TEMP 


223 


BP 


RFTREG 



IS CCMPLETION SATISFACTORY 
BRANCH IF NO 
RESET ERROR CCUNT 
RESTCRE RETURN REGISTER 
RETURN 



C0C22C 

CC022C «20? C3E\ 



0C2E7 



225 CLT 
226 



ECU 
MVI 



icroo»=,e 



INDICATE WRITE TIC 



<"002*A 12FF 
•012*C *77C C2C6 
• C025C *5EC CIFA 
l 0025* 92CC C3E2 
i 0025? *7FC COFB 



22P 



WRITF REA0ECB,TIP,,,3,PEWIN0,,MF-E 





2*C 


LTR 


RPPFG.8RREG 


C02CC 


2*1 


BNZ 


ICERROP 


00200 


2*2 


BAL 


RETREG.WAIT 




2*3 


MVI 


LCAOOONE.X'OO 


OOOFf 


2** 


B 


REAOTI 



NORMAL INITIATICN 
BRANCH IF NO 



INOICATE FILM NO LCNGER LOAOEC 



iCC2P* 12*F 
(?T2E/ *77? C2F« 



2*6 ENC 

2*8 

258 

27C 
271 



ECL * 

WTC MXTBT022 ENOEO BY TERMINAL CPERATOR REQUEST" 

WRITE REACECB.TIO...3.REWIN0..MF-E 



LTR 
BNZ 



BREEG.BRREG 

PEOM 



NORMAL INITIATICN 
BRANCH IF NO 



N-12 OS/VS BTAM SRL 



loc cbject cone 



ACCRl ADOR2 STMT 5CURCE STATEMENT 



F3CSEP69 1C/06/7C 



'.OC2e? 45FO UFA 

co^c? ;ecc C32F 



CCT2CC S1C2 C3EC 



CCC2CC 
C0C204 

cec2rt 

C002CA 
COC2CE 
0002E2 
00C2E6 
COC2EA 
C002EF 
COC2F2 
0OC2F6 
COC2FA 



47K C2F8 
1B89 
43EC C3FO 

4ies ccci 

4280 C3EO 
438C C3F1 
47*8 C2E4 
47FC C082 
47FC C0F8 
47*C C21A 
47FC C160 
47FC C1»C 



002F6 



0020? 


272 


BAL 


RFTREG.WA1T 


00334 


272 


L 


S*VEREG,SAVEAREA*4 




27« 


RETURN (14.12) 




279 KEPPCR 


TM 


EPRCRCT.2 




280 * 






002FE 


281 


ec 


PERK 




282 


SR 


WCRKRECWOPKPEG 


C03E6 


2*3 


IC 


WCRKREG,EPRCRCT 


OCOOl 


284 


LA 


WCRKREG,HWORKREG) 


003E6 


28* 


STC 


hCRKREG.EPRORCT 


0"3E7 


2e< 


IC 


wrRKREG.ICCOOE 


002EA 


287 


B 


eRANCHT(WCRKREG) 


00088 


2M BRANCHT 


e 


CFEN 


OOOFE 


28S 


B 


REACTI 


CC220 


29C 


e 


CLT 


00166 


2<u 


8 


WMTETCC 


0C182 


292 


p 


IGKCPE 



PESTCRE THE REGISTERS 

RETURN 

t-AVE THERE BEEN TWC ERRORS 
CN THIS CCMMANO ALREADY 
YES - ABENC 

INCREMENT ERROR CCUNT BY 1 

PICK UP BRANCH INCEX 
RETURN TO RETRY 

REAC TI 
WRITE TIC 
WPITE TCO 
WRITE TI 



CCC2FE 



C0C324 5800 C32E 



00334 



294 PERM ECU • 

296 WTC 'IXTFTC22 ENOEO - I/O ERRCR • 

306 L SAVEREG.SAVFAREA+4 PESTCRE TH* REGISTERS 

308 RETURN 114,12) RETURN 



312 ••♦♦•••* CONSTANTS AREA 



C0C32E 0000 

C0C33C OCCCCCCCOOCCCCOO 

COC378 

C0C3CC CCCCCCCC 

0C03EC 3E4C 

COC3E2 45C1 

0003E4 25C1 

C0C3E6 00 

C0C3E7 CC 



CCC3E8 CC 

C0C3E<I CCCOCO 

CC03EC OOCCOCOCOCOOOCOO 

:cc3Fe occocoocfp 

CCC3F0 FCI : lF2F3^4F5FtF7 



313 SAVEAREA 


rc 


18*»C' 


314 INAFEA 


cs 


25F 


315 TEMF 


CC 


F'C 


316 PREC 


CC 


X'3E4C« 


317 UNLCAO 


DC 


X ^SOl' 


318 LCAC 


CC 


X'2501' 


31S ERPCRCT 


CC 


x'rc 


32C * 






221 ICCCCE 


CC 


"X'CC 


322 * 






323 • 






324 * 






225 » 






326 LCACCCNE 


CC 


X'CO' 


3?7 » 







328 UNPACK OC 
32= BASE PC 

33C TRTAeLE OC 



THIS ROUTINE'S SAVE AREA 



FREFIX 

LNLCAO COORDINATES 

LOAC COORDINATES 

COUNT CP ABNORMAL COMPLETIONS 

CF LAST I/O RECUEST MAX-2 
CO « CPEN INITIATEC 
04 « READ INITIAL 
C8 « WRITE TIC 
CC • WRITE TCC 
IC - WRITE INITIAL 
TURNED ON WHEN FILM HAS eEEN 

LCACEO 



3F«0« 

XL5'0OOCCCOOCOFF» 

XL16'F0F1F2F3F4F5F6F7F8F<»C1C2C3C4C5C6 I 



PAGE 



LCC OBJECT COOE 



A00R1 A0DP2 STMT SCLRCF <TAT£MfNT 



F3CSEP69 10/06/70 



C0C4CC 
C< C414 
C0C414 
C< 04 IF 
CC044C 
CCI0457 
C0C46C 
C0C477 
C0C4A1 
C004AC 
00C4C5 
C00OC2 

coc4n< 
ooo4r«; 



F7C6CCA5EB 



1517171717171717 
4C4C4CE3C8C54CC9 
1517171717171717 
C6C640E3C8C54CC7 
1517171717171717 
E8C6E440C1D°C540 
1517171717171717 
06D940C505E3C509 
26 

C16E6E 
C2C104 



331 CL 

332 ER 
333 
334 



C5E 
RMSG 



236 
337 
338 
33S 
34C 
341 
242 LE 

343 RE 

344 LCACMsr OC 
345 



!NCTH 

:W1N0 



CC 
C5 
DC 

rc 
rc 

DC 

oc 
oc 

OC 
CC 

rc 

ECU 

cc 



X'E7C6CCA5EB« 

OF 

X'1517171717171717171717« CR ANC IDLES 

C« THE IMMFOIATELY PRECEDING MESSAGE WAS NCT ' 

X«1517171717171717171717« CR AND ICLES 

CC* THE PROPER FORMAT.' 

X'1517171717171717171717» CR ANO IDLES 

C'YCU ARE EXPECTEC TC PROBE UNLCAO CR LOAC, • 

X'1517171717171717171717' CR ANO ICLES 

C'CP. ENTFF AN ONLINE TEST RECUEST MESSAGE. • 

X'26' Eoe 

♦-FRPMSG 

X , 016E6E 1 MESSAGE TO UNLOAD FILM 



X'C20104' 



PESSAGE TC LOAC FILM 



PRINT GFN 
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347 »*»««*•* CCMBfL filCCKS 



CO<"«CC 

corvee 

30C4EC 
OC4FC 
O05CC 
C0C51C 

oor«2C 

C0C53C 

cor;«c 

CCC55C 
CCP56C 
CCC57C 

cc?;ec 

(OC5«C 
C005AC 
(OC5BC 
(0C5CC 



5E-""»1430B«7A7r7F 

sesRee'RiRsesosF 
eee?6eeea»>3B3oefl 

8Pfl85E98888PlClF 

cmaeefBseeppflfl 
6ieee8ef«»?P8e8fl 
«c?3es(»£8e8»peR8 
88peeeee88888888 

88626467686B6C6E 
88434?46494A4C4F 
88882526292A2C2F 
«e88PeeE8R88R8B8 
e8E2E4F7E8EPE0EF 
88C3C5C6C9CACCCF 
"P08A5A6A9AAACAF 
15C2C407C8CB0C0E 



349 
35C*IfC 

351** 

352* 

353* 

354* 

35S* 

356* 

357* 

3S«* 

359 + 

36<: + 

361* 

362* 

363* 

364 + 

36«* 

366* 

367* 



ASfTPTA? 
T$C«r ECL • 



E D4C 



C12 3 456789ABCCEF 

CC X'5F?716 3CR87A7C7F8e888e88PF5e8«l8«> 

DC X'P8Pe888PB85B505E8688£8PfP £888888 

CC X'P8P8S88FP83B3P888888688ee 8888688 

OC X'P<>fiR5F«8FP8filC.lFee88e8888eeeP88fl 

CC X«C1888f 88888888866888 A0768493E1B7 

CC X '6 18988888 88888888883075790958786 

DC X<«?23P9ePf88P8paee8888B378FC08EA3 

OC X '88888888888888888888681620808296 

PC X«» 86264676 868* 0*8707388888888 8888 

DC X»e84 34546 *94A4C4F51 528PP6888888 88 

CC X« 88882526292 A2C2F3 132888888888888 

OC X<e88P8 8P8FPFPPP888 88388 E8P8P 8888? 

CC X«8<»E2E«E7E8ERFOEEFCF3e86e88B8888e 

CC X'8RC3C5C6C9CACCCFDID2888F9F8F8688 

CC X • PPPPA 5 A6A9AAACAF«ie288P 88 8888868 

OC «• l5C2C4C7C8C80f!C El 01 368 888888 888? 



36= 0C8 



PCB C<CR0«CX,MACRF*(P,W),OCNA*E«e276Cl01tEPCPT«WT 



io^scb 

•C05C8 
0005CC 



37U* 

372** 

373* 

374+CC? 

375* 



CATA CONTROL BLOCK 

P»G *-20 TO ELIHINATE UNUSEO SPACE 
CS OF ORIGIN CN WPRC EOUNCRY 
CRG **20 TO ORIGIN GENERATION 



C0C5CC cc 



377*» 
379* 



CCMMCN ACCESS METHOD INTERFACE 
ALKC1 BCFNC 



LCC CBJECT COOE 

oocscc ooccoi 

C005EC COCC 
30C5F2 1C0C 
C0C5E4 CCOCCC01 



C0C5FE CC 
C005E9 14 
C0C5EA FF 
CCC5Ee OC 
00C5FC CC 
00C5EC CCCCOC 



AflCKl ACOR? STMT SCLRCF STATEfrKT 



F3CSEP69 K/C6/7C 



38C + 
38 1 + 
382* 
383 + 

3R5 + * 



OC 
CC 
CC 
CC 



387* 


CC 


38e* 


DC 


389 + 


CC 


3 Q C + 


CC 


391 + 


CC 


?<»<♦ 


DC 



Ai3<n euFCB 

*L2(Ct PLFL 
"L2'0C010CCCCC00C0CC 
A(l) IOBAC 



OSCRG 



FCUNCATICN EXTENSION 

3L1'C0C00CC0» BFTEK.BFALNtHIARCHV 

Rll»C00101C0« BTAM EROPT COOE 

ALK255) BTAM BUFFER COUNT 
ALUO) 

PLl'COOCCOCO* PECFM 
Al?«Cl EXIST 



00C5FC C2 e 2F7F6FC03FCFl 
CC05FP 02 
CCC5F9 CC 
C0C5FA 2020 



394+* 



396* 


rc 


397* 


DC 


39E + 


CC 


39 c + 


OC 



FCUNDATICN BLOCK 

CLe'P276CLCl • DCNAME 
BLI'COCCCOIO' CFLGS 
SLl'COOCCCCC IFLG 
»L2'001CCCC00C1C0C0C NACI 



C0C5FC COrrcCDC 
C006CC 



ETAM INTERFACE 



C006CC 




C0C6CC 


OCCCOCOC 


0006C4 


00 


CC06C5 


CI 


C006C6 


COCO 


CCC6CE 


COCOC«Cf 


0006CC 


OOCCOCOC 


C0C6 1C 


CCCCCCCC 


000614 


CCCCCCOC 


C0C61F 


oon 


00061A 


OCOO 


O0C61C 


CC 


00C61C 


OC 


00C61E 


cere 


C0C62C 


ccoocroc 


0OC624 


cccccccc 



4C7 


RE 


4"E + 


DS 


4'-S*PEACECB 


nc 


41C + 


oc 


411 + 


cc 


412* 


DC 


413 + 


CC 


414 + 


CC 


415* 


CC 


416* 


oc 


417* 


CC 


418* 


oc 


419 + 


CC 


42C + 


DC 


421* 


CC 


422* 


oc 


423* 


CC 



REAC REACECB.TI ,OCB,,, tl.MF«L 
OF 

A(C) EVENT CONTROL BLCCK 
Bll'OOO' 

111(1) TYPE FIELC 
412(0) LENGTH 
A<rcei CCP ACCRESS 
A(C) AREA ADDRESS 
a<D EPPCf' INFO. FIE10 ACCR 
A(C) TFRMKAl LIST ADDRESS 
*L?<1) LIKE NUMBER 
412(0) RESPONSE FIELD 
ALKC1 TF-CP CCOE 
UKfl ERPCR STATUS 
412(0) C5W STATUS 
AL4<0) CLPPENT ACCR LIST FTP 
AL4(0) CLPPENT AOOR POLL FTR 



42 c 1ECTTECP 

42fc+IECUffP DSECT CfCP DLKMY SFCTICN 

42 7+* 

4 2 t* » ♦ 

42<; + » •» <TANDARr FVENT CCNTPOL 8L0CK 

43C+* ♦ 

4 3 1 + * ♦ 
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ice opjfCT cone 



AOOR1 A00R2 STMT SCLRCE STATEMENT 



F3CSEP6« 1C/06/7C 



4324* 
4324* 
4344* 

42*4* 

4364* 
A3"?** 
4384* 
«3";** 
44C4* 

4414* 

4424* 
4424* 
4444* 
4454* 
4*6+* 
4474* 
4484* 

**<;•♦» 

«5C + * 
4514* 
4524* 
4« 24* 
4*44* 
45^4* 
4564* 
4574* 
45F4* 

45S4* 

46C4* 
4614* 
4624* 
4624* 
4644* 
4654* 
4664* 
4674* 
4684* 
46«4* 

4"»C4* 
47l4» 
4724* 

47'>4* 
4744* 
4754* 



4 4 CPERMICN TYPE 



AREA LENCTh 





4 


CN-LINF 


4 






4 


t 


47FPf INAL 


4 


AOCRESS CF cce 


4 




4 


TFST 


4 






4 




4 




4 






4 


12 


4RESFRVEC 


4 


AOOPESS CF APFA 


4 




4 




4 






4 




4 






4 




4 


16 


♦ 


SENSI 


F BYTE? 4 


RFSICUAL CCLNT 


4 




4 


1 


t 


2 4 




4 




♦ 




4 






4 


2C 


4 


copper 


1 


ACCRESS 


CF TFRHNAL LIST 


4 




4 


cone 


4 






4 




4 




4 


RELATIVE4 


4 


4 


24 


4 


STATLS 


4 


LItF 4 


ACDPFSS 4 VRC/LPC 


4 




* 
4 


FLAGS 


4 


NUPBEP 4 


RESPONSE4 RESPCNSE 


4 






4 


+ 




4 


2P 


♦ 


TP-CF 


4 


ERRCR 4 


CSW STATLS 


4 




4 


C.OOF 


4 


STATUS 4 




4 




4 




4 






4 


32 


4RESERVFC 


♦ 


AOORESS CF CUPPENT 


4 




4 




4 


ADOPESSING ENTRY 


4 




4 




4 






4 


36 


4PESERVFC 


4 


ACORES5 OF CURRENT 


4 




4 




4 


POLLING ENTRY 


4 




♦ 




4 


4 




4 


4C 


4PESFRVEC 


4RESERVEC 4 


WRITE AREA LENGTH 


4 




4 




4 


4 




4 




4 




'4 






4 


44 


4f 

4 


'ESEPVFT 


4 
4 


ACCPFSS 


CF WRITE APFA 


4 
4 



LCC COECT CCCE 
COPOOC 
CCC0C4 
CC00C6 

cococe 
roccc* 

COOOOC 

CCCC1C 

0CCC11 

COOOl? 

000014 
C90014 



ACCP1 AC0R2 STK" 



5CLRCE STATF»ENT 



F3CSEP6S K/C6/7C 



4774rEcscFce ps 

47C4CECTYPF r.< 

4P14PECLNGTH OS 

4P24TECCNL7T CS 
4844CECCCBAC 05 

4flt4rFC*PEA 0?. 

48E4rEC5FNSC CS 

49C4CEC5ENS1 OS 

49Z4CECCCLNT OS 

««;44CEf Cfccr rs 

4<=54rECFMCY OS 



IF STATLS FLAG 4 ADDRESS CF THF TC° 

It- CPFRAT1CN TYPE 

IK AFEA LENGTH 

?Cl 1 RESERVEC FCR CN-LINF TEPHNAL TEST 
IF iCD&ESS CF CCP 

l c ACDRESS CF AR-FA 

1C 1ST SENSE PYTE 

1C 2N0 SENSE PYTE 

1H PESICUAL CCUNT 

CfLl COfMNO CCPE 

IF ACTRESS OF TERMINAL LIST 



03091 f 

o^cois 

C0CC1A 
00CC1C 

rcccu 
ccrriF 

? C 2 C 
OC-24 
CCCC7F 

c?cr?« 
crr?2C 



49P4CECFLAGS CS 

5CC4CEC1LN CS 

5C1Z4CECBFSFN CS 

5C44TEC1FCCC OS 

•5064CECEPRST C< 

5084CEUSWST OS 

51?4rec»CRPT PS 

■^124CFCFCLFT CS 

•^144 rs 

5164CECWLNC PS 

?184CECWARf t CS 



1C STATLS FLAGS 

1C RELATIVE LIN'F NUPeER 

II- RESPCNSE FIELDS 

1C TP-CP CCDE 

U FPROP STATUS 

It- CSW STATUS 

l c *CORESS CF CURRENT ACCFFSSING ENTPY 

IF ACCRESS CF CURRENT POLLING FNTRY 

?f RFSEPVEC 

1H WFITE AFEA LENGTH 

IF ACDRESS PF WRITE AREA 
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-52 1 

522 



CCPC 



»,♦»» lheC6P NO VALID DSCIRG SPECI F IEC-EXCP ASSUt'EC 



c?ocr 



52*** 
525*» 



?27*IHACCB C«FCT 



CfB SYKBCLIC CEFINITKK FCR 
BASIC FXCP 



PAGF <? 



CDCC?' 



C7CC26 

:oco?e 

C~C02A 

norpr 
c:cc?c 



:ej?rT c r oe Aoppi acdr2 tt«t srtRCE siate»"^t 

531** 



F3CSEP6S K/C6/7C 



52?* CPG 

53**CCECCM* CS 

'M+rcecfio* os 

536+CCeiFLC 0$ 
5*7*CCEMCF CS 

53<;«* 



FfUKCATICN BEFCPE CPEK 



cie 

?LJ 
°L1 
H2 



FrUKTAMCN AFTER CPE^ 



5*1* CPG !»-*CCP*<iC 

;*2«CCF7ICT CS "»l? 

543*CCEMCPF CS «U2 

5***CCP.lFLC-$ OS 7PI 1 

5A5*rcECEB*r ns a 



CKCF O.P 



55c 



ENC 



CPrsS-RFCFR^NCF 



«Y*PCL 



LFN VALUE DfFK 



fi*«F CCCC5 PO03FP 0C"2<; 

pasfpfc ? r ^ci c?cocc c:c*5 

P'tNCI-T COCC* 00C2EA CC766 

&PKFC- OCCCl OOC^CP OCC*»= 

ClCSF C"CC5 00^*00 CC331 

rr»'p*pf cccct cooi?a ocm 

Cff CCCC* 00C e C8 CC?7* 

rcprcKA* recce 0C0C2P cc^3* 

rrprfp«c cocc* oc:c2C cc**5 

rreiFLC cccci ococ?i edit 

ccpjfics p occi co?o2C cc c ** 

rrftr n ccr2 A ooo32 0C5?7 

(TPMAfBF CTCC2 00CC2A 0C543 

ccptflgs cccci 00003^ ?ct>?5 

ccppfg occci occcc c rcc<i« 

OCPTirT CCCC2 00002P 005*2 

C C CATPPT COCCI. C0TC2C CCMC 

r c CAFEA CCCC* OOCCC CO* 66 

CFfCTCC COCCI CC0C1* CC*<5* 

PECCCLNT C0TC2 CVC12 CC*c2 

CFCCSVST 0CCC2 OCC<ME OC^CE 

CFcrcFAc coco* oc~cce cc*p* 

TECEMPY OOCC* COCCI* Cd.05 

CKFFRST CCCC1 COC01C CC5C6 

ckfugs cocci coons cc*«;e 

C e CLNCTh P0CC2 00C0C6 CC*P.l 

CECCMTT CCCC1 000008 CC*P2 

CECPCIPT CCCC* COCC?* OC512 

(•FCRFSFN C0CC2 ""CCIA O05C2 

CECSLN r^CCl COCCI 0C5CC 

CFCSCECP r CCC« OOOrCC CC*77 

cfcseksc rrcci occcio cc*ee 

C e i"<;Ffsl T,0C1 0.OCC1I cc*sc 

CECTFCCD "CCC1 OCCCIC 0C5C* 

CFCTVFE 0CCC2 OCOCC* PC*7<: 

recwAREA cccc* oooc2C c-C5ie 

cecwlng ccc2 oorr?A orsie 

FNC CCCCI 00C25C OC2*6 

FRPf5G <"CCC* 0CC*1* CC332 

cpcrecT CCCC1 0C03E6 0C31S 

EXtvpLfi oCCri CCCCCC CC0C1 

IFCTCfCP COCCI CC"CC0 CC*26 

IECTSC*C "OCC 1 OCC*OC 0C35C 

ICKCPE CCCC1 ?^01«2 0C1P6 

i>-Ancp copci crooro cr = 27 



REFFPENCES 


"05P 


:C5« 


0055 


r ? '^ 


C?fl7 




01*" 


M*e 


0187 




01P* 




0085 


:o<3 



IC/C«-/7C 



CCC6 

"C?7 



C1P0 C163 C2C6 02Ct C2*C C2*0 C27C 0270 



01P8 






0125 


C1S« 


C2*2 


0116 


C221 


■: 2 7 S 


012*. 






OIV 


Clf6 


C155 


00 s 7 


0523 


C'*l 



S?f3 0255 
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IHE0CC2 


0GCC1 


000046 


0CC69 


CC66 


IHB00C2A 


00CC2 


C000*6 


0C07C 


0065 


iHeccca 


COCCI 


0C0079 


0CC79 


0076 


1HB0CC3A 


C0CC2 


00007* 


00C8C 


0075 


IHB0CC5 


CCCC1 


OOOOCA 


0C1C! 


0102 


IHBCCC5A 


OCC02 


OOOOCA 


00106 


0101 


tppccie 


CCCC1 


00028F 


0C25* 


0251 


IHB0C18A 


CCCC2 


000290 


00255 


0250 


i*eec22 


CCCC1 


00C322 


0C3C2 


0299 


INROC22A 


C0002 


000322 


00303 


0258 



CBCSS-BEFEBEKCE 



SYHPCL 


IEK 


VALUE 


CFFK 


REFERENCES 










INABEA 


CCOC* 


0C0378 


0C31* 


01*0 


C151 


C153 


CIS! 


cue 


one 


ICCCCE 


COCCI 


0003E7 


00321 


0C87 


C132 


C162 


0189 


0226 


02e6 


ICEBPCB 


OCCC* 


0002CC 


0C279 


91*9 


cm 


C2C7 


C220 


C2*l 




LENGTH 


0CCC1 


00CCC2 


PC3*2 


0120 


C196 










LCAC 


CCC02 


0C03E* 


0031E 


0155 












LCACCCNE 


00001 


0003E8 


00326 


0158 


0153 


C2*3 








LCACPSG 


CCCC3 


00C*C9 


0C3** 


016C 


C172 










CPFN 


C9001 


000068 


00C86 


02«e 












CPEKCK 


CC0C1 


0C0CC6 


0C11! 


0C97 












CUT 


CCCC1 


00022C 


0C225 


015* 


C29C 










PEPP 


0CC01 


0002FE 


0C29* 


0271 


C2C1 










PBEO 


C0CC2 


OC03EC 


0C316 


0151 












PEACEC8 


cccc* 


OC060C 


0C*C9 


0135 


C165 


C192 


C215 


02 1« 


0229 


REAOTI 


C0001 


OOOOFE 


0C131 


0209 


02** 


C2P9 








PETBEG 


0CCC1 


CCOCCE 


0CC*7 


C15C 


C182 


C2C8 


C212 


C222 


C223 


REWIKC 


00C03 


000*C6 


CC3*3 


023* 


026* 










SAVEAPEI 


OOCC* 


CCC33C 


CP313 


<?C83 


CCE* 


C1C9 


C273 


C3C6 




SAVEBEG 


0C001 


OOOOCO 


000*6 


0083 


COE* 


C1C9 


0273 


C3C6 




START 


CCCC1 


COOCCC 


0CC*9 














TE*P 


COCC* 


0003CC 


003 15 


0212 


C222 










TRTABLE 


CCC16 


0C03F0 


C033C 


0C6C 












UNLf.i»C 


0*002 


0003E2 


0C31T 


0153 












LNPACK 


CCCC* 


C003EC 


c;32e 


0C59 


C06C 


CC61 








WAIT 


000C1 


O002C0 


0C211 


015C 


C1P2 


c«ce 


C2*2 


0272 




hCBKRtG 


CCCCl 


C00008 


CCC*3 


0282 


C2E2 


C263 


C2E* 


C2E* 


C2E5 


HPITETCO 


COCCI 


000166 


00161 


02*1 












WTCP 


CCCC* 


CC001C 


0CC6* 


CC61 













PAGE 2 
1C/06/7C 



0187 



C286 C287 



NO STATEMENTS FLAGGEO IK THIS ASSE*PLY 
•STATISTICS* SOURCE RECORDS ISYSINt « 
•CP'ICKS IN EFFECT* LIST, DECK, NOLCAOi 
*69 PRIMEC LINES 



237 SCUFCE BECCROS ISYSLIB1 - *7«o 
KBEKT. XRE*. KCTEST, ALGN, OS, L1NECNT - 
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APPENDIX O; LOCAL 3270 SAMPLE PROGRAM 



The local 3270 sample program shows how BTAM support for the local 3270 
display system works and demonstrates some of the capabilities of the 
display system. The sample program can operate from one to 255 local 
3270 devices, at least one of which must be a 3277 display station with 
a keyboard. If more than one device is used, some or all of the remain- 
ing devices can be 3284 or 3286 printers (although the number of display 
stations should equal or exceed the number of printers) . The sample 
program can work with model 1 or model 2 devices or both. 

The local 3270 sample program is distributed as a member of SYS1. 
SAMPLIB named SAMP327L. This PDS member contains (in the form of 80- 
character card images) all the source statements for the sample program 
and most of the JCL needed to assemble, link-edit, and execute the 
program. 



DEFINING THE LOCAL 3270 DISPLAY SYSTEM 

The local 3270 display system used by the sample program is defined in 
two ways. The data definition (DD) statement DD3270 (and any other DD 
statements concatenated with it) specifies the devices to be used and 
assigns relative line numbers to them. The PARM parameter for the 
execution of the program describes the size and composition of the dis- 
play system. 

The DD statement DD3270 should be added to the JCL for the GO step 
(see the examples below). The UNIT parameter, which is the only 
required parameter, specifies the device to be used by device name 
(3277, 3284, or 3286), by device address, or by a UNITNAME defined dur- 
ing system generation. If more devices than one are to be used, DD sta- 
tements for the additional devices should be concatenated with DD3270. 
Print output generated by a display station is directed to the printer 
specified by the DD statement immediately preceding the DD statement for 
the display station. (DD statements for printers should be separated by 
one or more DD statements for display stations.) if no printer is asso- 
ciated with a display station in this way, print output from that dis- 
play station is directed to SYSPRINT. 

Example 1 ; One 3270 device is used; it is attached to address 240: 



//GO.SYSABEND DD SYSOUT=A 
//GO.DD3270 DD UNIT=240 
/♦ 

Example 2 : Three 3270 devices are used, two 3277 display stations and 
one 3286 printer; they are specified by device name: 



//GO.SYSABEND DD SYSOUT=A 

//GO.DD3270 DD UNIT=3277 relative line number 1 

// DD UNIT=3286 relative number 2 

// DD UNIT=3277 relative line number 3 

/* 
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Print output from the 3277 display station on relative line number 1 is 
directed to SYS PRINT. Print output from the 3277 display station on 
relative line number 3 is directed to the printer on relative line numb- 
er 2. 

The PARM parameter of the EXEC statement is used to specify the numb- 
er of devices to be used, the number of printers to be used, and the 
relative line numbers of the printers. The format of the EXEC statement 
with the PARM parameter is: 

// EXEC ASMFCLG,GO.PARM=' number of devices [ r number of printers 
[ ( printer rln]...] 

Defaults and limits for these parameters are: 

Number of devices: default = 1; minimum = 1;. maximum = 255 

Number of printers: default = 0; minimum = 0; maximum = one less 
than number of devices 

Printer rln: if number of printers is zero = 0; if number of prin- 
ters is not zero, default =1; maximum = number of devices 

Parameters are separeated by commas. Any invalid characters are treated 
as zeros. If a parameter is longer than three characters, the right- 
most three characters are used, and any others are ignored. 

Example 3 : One-device system with a 3277 display station and no printer 
(as specified in example 1) : 

// EXEC ASMFCLG 

The EXEC statement supplied with the sample program can be used, since 
all the required values are defaults. 

Example 4 : A three-device system with two 3277 display stations and a 
printer on relative line number 2 (as specified in example 2) : 

// EXEC ASMFCLG, GO. PARM=' 3, 1,2* 

Example 5 : A four-device system with three 3277 dis'play stations and a 
printer on relative line number 1: 

// EXEC ASMFCLG, GO. PARM=' 4,1' 

The default for the relative line number of the printer is used. 

Example 6 : A two- device system with two 3277 display stations and no 
printer: 

// EXEC ASMFCLG, GO. PARM=* 2' 

OPERATING THE SAMPLE PROGRAM 

When the sample program is initialized, the initial format shown in 

Figure 119 or 120 is displayed on each display station. The subsequent 
operation of the program is controlled by the display station operator 
by means of the ENTER, CLEAR, PA1, and PA2 keys. 

Pressing the PA2 key (except when the ending format is displayed) 
causes the ending format shown in Figure 125 or 126 to be displayed. 
Further input from the display station is inhibited. After the PA2 key 
has been pressed on each display station, the sample program is ter- 
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minated. (Any unstarted printer operations are lost when the program is 
terminated.) 

Pressing the CLEAR key (except when the ending format is displayed) 

causes the control options format shown in Figure 12 3 or 124 to be 
displayed. 

The result of pressing the ENTER key or PA1 key depends on the format 
being displayed: 



ENTER DATA REQUESTED BELOW: 

NAME:_ 
A DDR: 
CITY: 
STATE: 



ENTER KEYi ENTER DATA; 
PA2 KEY: END PROGRAM; 
CLEAR KEY: CONTROL OPTIONS. 



ZIP: 



Figure 119. Initial Format on Model 1 3277 Display Station 



ENTER DATA REQUESTED BELOW: 






NAME: 


ADDR: 


ZIP: 


CITY: 


STATE: 




ENTER KEY: ENTER DATA; 


PA2 KEY: END PROGRAM; 




CLEAR KEY: CONTROL OPTIONS. 







Figure 12 0. Initial Format on Model 2 3277 Display Station 



DATA GIVEN BELOW ENTERED: 

NAME: 
ADDR: 
CITY: 
STATE: 



ENTER KEY: UPDATE DATA; 
PA1 KEY: PRINT DATA; 
PA2 KEY: END PROGRAM; 
CLEAR KEY: CONTROL OPTIONS. 



ZIP: 



Figure 121. Verification Format on Model 1 3277 Display Station 
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DATA GIVEN BELOW ENTERED: 

NAME: 

CITY: 



ENTER KEY: UPDATE DATA; 
PA2 KEY: END PROGRAM; 



ADDR: 
STATE: 



PA1 KEY: PRINT DATA; 

CLEAR KEY: CONTROL OPTIONS. 



ZIP: 



Figure 122. Verification Format on Model 2 3277 Display Station 



XXYY3CUU 

ENTER KEY: RESUME AND CONTINUE; 
PA1 KEY: BEGIN NEW ENTRY; 
PA2 KEY: END PROGRAM; 

TO REQUEST BTAM OLT — ENTER REQUEST FOR TEST 
MESSAGE OVER SAMPLE FORMAT ABOVE: 
XX=TEST NO. (23-28) YY=REPEATS (01-99) 
CUU=ADDRESS OF THE TARGET DEVICE 
THEN HIT ERASE EOF AND THEN TEST REQ. 

USE CLEAR KEY TO RESUME AFTER TEST. 



Figure 12 3. Control Options Format on Model 1 3277 Display Station 



XXYY3CUU 

ENTER KEY: RESUME AND CONTINUE; PA1 KEY: BEGIN NEW ENTRY; 

PA2 KEY: END PROGRAM; 

TO REQUEST BTAM OLT — ENTER REQUEST FOR TEST MESSAGE OVER SAMPLE FORMAT ABOVE: 
XX=TEST NO. (23-28) YY=REPEATS (01-99) CUU=ADDRESS OF TARGET DEVICE 
THEN HIT ERASE EOF AND THEN TEST REQ. USE CLEAR KEY TO RESUME AFTER TEST. 



Figure 124. Control Options on Model 2 3277 Display Station 
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1. Initial format (Figure 119 or 120: This is the first format dis- 
played when the program is initialized. It can be redisplayed as 
described under the control options format. The CLEAR, PA2, and 
ENTER key are valid for this format. 

There are five unprotected fields on the screen; the field follow- 
ing "ZIP:" is numeric-only. Data may be entered into one or more 
of these fields. Then the ENTER key should be pressed to transmit 
the data from the display station to the program, which initializes 
an internal data area associated with the display station. 

The data is displayed as part of the verification format after the 
ENTER key has been pressed. 

2. Verification format (Figure 121 or 122) : This format displays the 
data in the data area for the display station. The display station 
operator can verify, modify, or print the data. The CLEAR, PA2, 
ENTER and PAl key are valid for this format. 

The ENTER key is used to transmit any modifications to the data to 
the program, which updates the data area for the display station. 

The PAl key is used to have the data in the data area printed. 

The verification format is redisplayed after the ENTER or PAl key 
has been pressed. 

3. Control options format (Figure 123 or 124) : This format is dis- 
played after the CLEAR key has been pressed. The CLEAR, PA2, 
ENTER, and PAl keys are valid for this format. 

Pressing the ENTER key causes the verification format to be 
displayed. 

Pressing the PAl key clears the data area for the display station 
and causes the initial format to be displayed. 

Also, the display station operator oan enter a request for a BTAM 
online test (OLT) pattern by following the directions on the for- 
mat. The pattern may be sent to any display station or printer 
being operated by the sample program. To continue, press the 
RESET key, then press the CLEAR key after an OLT pattern is sent 
or received to redisplay the control options format. 

4. Ending format (Figure 125 or 126) : This format is displayed after 
the PAl key has been pressed. 

Further input from the display station is inhibited. 

If a key that is not valid is pressed, input from the display station 
is inhibited by the display station hardware and ignored by the sample 
program. To continue, the display station operator should press the 
RESET key to manually enable the keyboard; he should then press a valid 
key for the format being displayed. 
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LOCAL 3270 SAMPLE PROGRAM ENDED. 



Figure 12 5. Ending Format on Model 1 3277 Display Station 



LOCAL 3270 SAMPLE PROGRAM ENDED. 



Figure 126. Ending Format on Model 3277 Display Station 
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LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 
000000 



ADDR1 ADDR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



00000 
00001 
00002 
00003 
00004 
00005 
00006 
00006 
00007 
00007 
00008 
00008 
00009 
0O0OA 
00008 
0000D 
0000E 
0000F 

00005 
00012 
00019 
00024 



000000 47F0 FOOE 0000E 

000004 08 

000005 E2C1D4D7F3F2F7D3 
00000D 00 



2 SAMP327L CSECT 

3 * STATUS - CHANGE LEVEL 000 
4 
5 
6 
7 
8 
9 

10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 ZEROREG EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 



ENTRY POINT - SAMP 3 27 L 

INPUT - REGISTERS 1, 13, AMD 14 PROVIDE INPUT AS FOLLOWS 
1 - ADDRESS OF PARM AREA POINTER 

13- ADDRESS OF SAVE AREA 

14- RETURN ADDRESS 

THE PARM AREA HAS THE FOLLOWING FORMAT 

♦0 LENGTH FIELD (HALF WORD) 

+2 NO. OF DEVICES IN LINE GROUP (1-3 DIGITS, 1-255, 1-OEFAULT) 

NO. OF PRINTERS IN LINE GROUP (1-3 DIGITS, NO. DEVICES, 0-DEF) 
RLN'S OF PRINTERS (1-3 DIGITS, NO LARGER THAN NO. OF DEVICES, 
DEFAULT OF 1 IF NO. OF PRINTERS «1) 

ALL FIELDS SEPARATED BY COMMAS 

DDNAME FOR 3270 DEVICES - DD3 270 

DD CARDS ARRANGED - PRINTER, DISPLAYS, PRINTER, DISPLAYS, ETC. 
THOSE FOR PRINTERS OMITTED IF NO PRINTERS 

SYSPRINT DO SYSOUT-A REQUIRED 

OUTPUT - DISPLAY OUTPUT, PRINTER OUTPUT 



36 
37 
38 
39 



29 PARMREG 

30 EVENREG 

31 ODOREG 

32 LOOPREG 

33 XNDXREG 

34 CNTREG 

35 RLNREG 
LOOP REG 2 EQU 
DECBREG EQU 
INDXREG2 EQU 
BUFREG EQU 

40 TABBASE EQU 

41 BASE REG 2 EQU 

42 BASE REG EQU 

43 SAVEREG 

44 RETNREG 

45 EPREG 

46 • 

47 TYPE 

48 COUNT 

49 RLN 

50 POLPT 

51 • 
52 
53+ 
54+ 
55+ 



EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 



SAVE 

S 

DC 

DC 





1 

2 

3 

4 

5 

6 

CNTREG 

7 

7 

8 

8 

9 

10 

11 

13 

14 

15 

5 

18 
25 
36 

(14,12) ,T,» 
14(0,15) 
AL1 (8) 
CL8 , SAMP327L' 



PARAMETER REGISTER 



BASE FOR CONTROL TABLE 



CSECT BASE REGISTER 



DISP TO TYPE FIELD IN DECB 
OISP TO RESIDUAL COUNT IN DECB 
DISP TO RLN FIELD IN DECB 
DISP TO POLPT FIELD IN DECB 



SAVE REGISTER 



BRANCH AROUND ID 



IDENTIFIER 
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LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



00O0OE 90EC D00C 
000012 OSBO 



ADDR1 ADOR2 
0000C 



STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



000014 


41AB 


OFFF 


000018 


41AA 


0001 


00001C 


SOOO 


BA5C 


000020 


4120 


BA58 


00002a 


502D 


0008 


000028 


1802 




00002A 


5831 


0000 


00002E 


4843 


0000 


000032 


1244 




000034 


4780 


B054 


000038 


4153 


0002 


00003C 


45E0 


B918 


000040 


1211 




000042 


47D0 


B03E 


000046 


5910 


BAAO 


00004A 


4720 


B03E 


00004E 


5010 


BAA4 


000052 


1244 




000054 


4780 


B054 


000058 


45E0 


B918 


00005C 


5910 


BAA4 


000060 


47B0 


B054 


000064 


5010 


BAA 8 



000068 5820 BAM 



00006C 8B20 0003 

000070 5830 BAAS 

000074 8B30 0002 

000078 4102 3170 

00007C 5000 BAAC 



00014 



OOFFF 
00001 
00A70 
00A6C 
00008 



00000 
00000 

00068 
00002 
0092C 

00052 
00AB4 
00052 
00AB8 



00052 



00068 

0092C 
00AB8 
00068 
OOABC 

00AB8 



00068 
00068 



00003 
OOABC 
00002 
00170 
00AC0 



000080 4510 B070 00084 

000084 OAOA 

000086 1891 

000088 0201 9000 BAA6 00000 OOABA 

00008E O701 9002 9002 00002 00002 

000094 4112 9010 00010 

000098 5019 0004 00004 

00009C 4111 3004 00004 

0000A0 5019 0008 00008 

0OO0A4 4111 0028 00028 

0000A8 5019 000C 0000C 

0000AC 4112 315F 0015F 



56+ 

57 

58 

59 

60 

61 

62 

63 

64 

65 • 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 * 

78 PARM2 

79 DFLTNO 
80 

81 ♦ 

82 

83 

84 

85 

86 • 

87 GETTAB 

88 * 

89 DEFAULTS 

90 DFLTPTR 

91 • 
92 
93 
94 
95 
96 
97 
98+ 
99+ 

100 

101 

102 

103 • 

104 

105 

106 

107 

108 

109 • 

110 



STM 14,12,12(13) 

BALR BASEREG,0 

USING *,BASEREG,BASEREG2 



LA 
LA 
ST 
LA 
ST 
LR 

L 

LH 

LTR 

BZ 

LA 

BAL 

LTR 

BNP 

C 

BH 

ST 

LTR 
EQU 
BZ 

BAL 
C 

BNL 
ST 



EQU 
EQU 

SLA 

L 

SLA 

LA 

ST 



SAVE REGISTERS 
ESTABLISH BASE REG 
t ADDRESSABILITY 

INITIALIZE SECOND BASE 



BASEREG2 ,4095 (BASEREG) 
BASEREG2 , 1 (BASEREG2) 
SAVEREG,SAVE+4 ESTABLISH 

EVENREG, SAVE SAVE AREA 

EVENREG,8(SAVEREG) CHAIN 

SAVERECEVENREG ESTABLISH NEW SAVE AREA 



ODDREG,0(PARMREG) 

LOOPREG,0(ODDR£G) 

LOOP REG, LOOPREG 

DEFAULTS 

INDXREG,2(ODDREG) 

RETNREG,GETPARM 

PARMREG,PARMREG 

DFLTNO 

PARMREG,MAXRLN 

DFLTNO 

PARMREG, NODVCS 

LOOP REG, LOOP REG 

PARM2 

DFLTPTR 

RETNREG,GETPARM 
PARMREG ,NODVCS 
DFLTPTR 
PARMREG, NOPTRS 

EVENREG, NODVCS 

GETTAB 
GETTAB 



GET ADDR OF PARM AREA 

GET LENGTH OF PARM AREA 

PARhS PASSED 

NO, TAKE DEFAULTS 

INITIALIZE POINTER TO PARM STRING 

GET NUMBER OF DEVICES 

VALUE LESS THAN 1 

YES, TREAT AS 1 

VALUE GREATER THAN 255 

YES, TREAT AS 1 

SAVE NUMBER OF DEVICES 

ANY MORE PARMS 

DEFAULT NO OF DVCS - 1 

NO, DEFAULT NUMBER OF PRINTERS 

GET NUMBER OF PRINTERS 
NUMBER OF PRINTERS LESS THAN 
NUMBER OF DEVICES 
SAVE NUMBER OF PRINTERS 

GET SIZE OF TERMINAL ENTRIES 



DEFAULT NO OF PTRS 



GET SIZE OF PRINTER ECB'S 



EVENR£G,3 

ODDREG, NOPTRS 

ODD REG, 2 

ZEROREG,368(EVENREG,ODDREG) GET SIZE OF CONTROL TABLE 

ZERO REG, TABSIZE SAVE SIZE 



GETMAIN R,LV-(0) 

BAL 1 , *+4 INDICATE GETMAIN 

SVC 10 ISSUE GETMAIN SVC 

LR TABBASE, PARMREG GET ADDR OF CONTROL TABLE 

MVC 0(2, TABBASE) ,NODVCS+2 SAVE NO. OF DEVICES 

XC 2 (2, TABBASE) ,2 (TABBASE) CLEAR ACTIVE NO. OF DEVICES 

LA PARMREG, 1 6 (EVENREG, TABBASE) GET ADDR OF ECB LIST 

ST PARMREG, 4 (TABBASE) t SAVE IT 

LA PARMREG, 4 (PARMREG, ODDREG) GET ADDR OF DECB 

ST PARMREG, 8 (TABBASE) ( SAVE IT 

LA PARMREG, 4 (PARMREG) GET ADDR OF BUFFER 

ST PARMREG, 12 (TAB \SE) 4 SAVE IT 

LA PARMREG, 35 1 (EVENREG, ODDREG) GET LENGTH TO CLEAR 
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LOCAL 21270 SAMPLE PROGRAM 



LOC OBJECT COOE 



ADDR1 ADOR2 STMT SOURCE STATEMENT 



ASM 0200 U.45 08/09/7C 



0000B0 9200 9010 00010 
0000B4 4129 0010 00010 
0OOOB8 5910 BAB0 00AC4 
0OO0BC 4740 B0C2 000O6 
0000C0 D2FF 2001 2000 00001 00000 



0OOOC6 4122 0100 
OOOOCA SB10 BABO 
0000CE 4770 B0A4 
0000D2 47F0 B0O2 

0000D6 0610 
0000D8 4410 BOCC 
0000DC 47F0 B0D2 



00100 
00AC4 
000B8 
000E6 



000E0 
000E6 



0000E0 D200 2001 2000 00001 00000 



0000E6 
0OOOE8 
0000EA 
OOOOEE 
0000F2 
0000F4 
0O0OF8 
OOOOFC 
OOOOFE 
000102 
000106 
000 10A 
00010E 
000112 
000118 
0001 1C 
000120 
000124 



1B77 
1B88 
5970 
47B0 
1244 
4780 
45E0 
1211 
4780 
5910 
4720 
8B10 
4119 
D201 
4081 
4188 
4177 
47F0 



BAAS 00 ABC 

B122 00136 

8114 00128 

B918 0O92C 

BODE 000F2 

BAA4 00AB8 

BODE O0OF2 

0003 00003 
1008 00008 

1000 BB60 00000 00B74 

0002 00002 

0004 00004 
0001 00001 
B0D6 000EA 



000128 1277 
00012A U770 B122 
00012E 4110 0001 
000132 47F0 B0F6 



000136 5810 BAA4 
00013A 1841 
0001 3C 5B10 BAA8 
000140 5C00 BAB4 
000144 1801 
000146 5000 BAB8 

0001UA 4510 B13A 
000 14E OAOA 
000150 5010 BABC 
000154 18S1 
000156 4189 0010 



00136 
00001 
0010A 



00A88 

00 ABC 
00AC8 

OOACC 

0014E 

00AD0 

00010 



111 

112 

113 CLRLOOP 

114 

115 

116 

117 

118 

119 

120 • 

121 LASTMOVE 
122 

123 

124 • 

125 CLRMOVE 

126 * 

127 • 

128 GETPTRS 
129 

130 PTRLOOP 

131 

132 ENDLZST 

133 

134 

135 

136 

137 

138 

139 INITPTR 

140 

141 

142 

143 

144 

145 

146 * 

147 • 

148 DFLTRLN 
149 

150 
151 

152 ♦ 

153 • 

154 FININIT 
155 

156 

157 

158 

159 

160 

161 + 

162+ 

163 

164 

165 



MVI 
LA 

C 

BL 
MVC 
LA 

S 

BNZ 

B 

BCTR 
EX 

B 



SR 
SR 

C 

BNL 

LTR 

BZ 

BAL 

LTR 

BZ 

C 

BH 

SLA 

LA 

MVC 

STH 

LA 

LA 

B 



LTR 
BNZ 
LA 
B 



16(TABBASE) ,0 CLEAR FIRST BYTE 

EVENREG, 16 (TABBASE) INITIALIZE ADDRESS POINTER 
PARMREG, F2S6 MOVE LENGTH OVER 256 

LASTMOVE NO, DO LAST MOVE 

1(256, EVENREG) ,0(EVBNREG) CLEAR 256 BYTES 
EVENREG,256(EVENREG) INCREMENT ADDRESS POINTER 
PARMREG,F256 DECR MOVE COUNT 

CLRLOOP REPEAT IF MORE TO DO 

GETPTRS GET PRINTER RLNS 



PARMREG,0 
PARMREG , CLRMOVE 
GETPTRS 



DECR COUNT FOR EXECUTE 
CLEAR REST OF AREA 
GET PRINTER RLNS 



MVC 1 (0, EVENREG) ,0 (EVENREG) 



LOOPREG2 , LOOPREG2 

INDXREG2 , INDXREG2 

LOOPREG2,NOPTRS 

FININIT 

LOOPREG,LOOPREG 

DFLTRLN 

RETNREG , GETPARM 

PARMREG , PARMREG 

ENDLIST 

PARMREG, NODVCS 

ENDLIST 

PARMREG, 3 GET INDEX TO ENTRY 

PARMREG, 8 (TABBASE, PARMREG) GET ADOR OF ENTRY FOR PTR 

(2, PARMREG ), MINI FREE PTR FORMAT 

INDXREG2, 2 (PARMREG) INDEX TO ECB PTR 

INDXREG2,4(INDXREG2) INCR TO NEXT ECB 

LOOPREG2,1 (LOOPREG2) INCR PRINTER COUNTER 

PTRLOOP 



INITIALIZE COUNTER 

INITIALIZE PRINTER ECB INDEX 

ALL PTR RLNS OBTAINED 

YES, COMPLETE INITIALIZATION 

ANY MORE PARMS 

NO, TAXE DEFAULTS 

RLN VALID 
NO, IGNORE IT 



LOOP REG 2 , LOOP REG 2 
FININIT 
PARMREG, 1 

INITPTR 



L PARMREG, NODVCS 

LR LOOP REG, PARMREG 

S PARMREG, NOPTRS 

M ZEROREG,DATASZ 

LR ZERO REG, PARMREG 

ST ZEROREG , DATBLXS Z 
GETMAIN R,LV-(0) 

BAL 1,»*4 

SVC 10 

ST PA RMREG , DATB LKAD 

LR IMDXREG , PARMREG 



NO PTR RLNS PROCESSED 

NO, COMPLETE INITIALIZATION 

YES, DEFAULT RLN - 1 



GET NUMBER OF DISPLAYS 
SAVE LOOP COUNTER 



GET SIZE OF DATA AREAS 



XA01560 
XA01560 



SAVE DATA AREA SIZE 

GET CORE FOR DATA AREAS 

INDICATE GETMAIN 
ISSUE GETMAIN SVC 

SAVE DATA AREA ADDR 

GET ADDRESS OF AREA 



LA 



INDXREG2, 16 (TABBASE) GET ADDR OF ENTRY 
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LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



000 1SA 1B66 
00015C *170 0001 



AODR1 ADOR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 01/09/76 



000160 
000166 
0001 6A 
000170 
000174 
000178 
0001 7C 
000180 
000184 
000188 
0001 8C 
000190 
000192 
000196 
00019A 
000 19E 
0001A2 
0001A6 
0001AA 
0001 B0 
0001B4 
0001B6 



DS01 
4780 
0781 
4068 
5058 
5A50 
4188 
4177 
4640 
SB19 
5850 
1255 
4780 
4120 
5021 
4111 
4650 
9280 
0202 
47F0 
1867 
47F0 



8000 BB60 

B1A0 

5000 5000 

0002 

0004 

BAB4 

0008 

0001 

B14C 

0004 

BAA8 

B192 
BAD 8 
0000 
0004 
B186 
1000 
1001 
B1A8 

B168 



00001 

00000 00B74 

001B4 

00000 00000 

00002 

00004 

00AC8 

00008 

00001 

00160 

00004 

00 ABC 



001A6 
OOAEC 
00000 
00004 
0019A 
00000 
9009 00001 00009 
001BC 

0017C 



001C8 



0001BA 0700 
0001BC 4510 B1B4 
0001 CO OF 
0001C1 000AF0 
0001C4 80 
0001C5 00OB3C 
000 1C8 0A13 



0001CA 0700 

0001 CC 4510 B1E2 001P6 

0001 DO 0025 

000 1D2 0000 

000 1D4 D3D6C3C1D340F3F2 

0001P6 

0001 P6 0A23 

0001P8 5840 BAA4 00AB8 

0001 FC 5879 0008 00008 

000200 5889 000C 0000C 

000204 4159 ffOlO 00010 

000208 4160 0001 00001 

00020C 41F0 B6F6 0070A 
000210 D501 5000 BB60 00000 00B74 
000216 4780 B21A 0022E 
00021A 1816 
00021C OSEF 
00021E 12FF 

000220 4780 B21A 0022E 
000224 D701 5000 5000 00000 00000 



166 
167 

168 • 

169 XNXTLOOP 
170 

171 

172 

173 

174 

175 XNCRPTRS 

176 

177 

178 

179 

180 

181 

182 

183 PTRECB 

184 

185 

186 DZSPECB 

187 

188 

189 PTRINXT 

190 

191 IOINIT 

192+ 

193+IOINIT 

194+ 

195* 

196+ 

197+ 

198+ 

199 

200+ 

201 + 

202+ 

203+ 

204+ 

205+XKB0005A 

206+ 

207 

208 

209 

210 

211 

212 • 

213 XOLOOP 
214 

215 
216 
217 
218 
219 
220 



SR 
LA 

CLC 

BE 

XC 

STH 

ST 

A 

LA 

LA 

BCT 

L 

L 

LTR 

BZ 

LA 

ST 

LA 

BCT 

MVX 

MVC 

B 

LR 

B 

OPEN 

CNOP 

BAL 

DC 

DC 

DC 

DC 

SVC 

WTO 

CNOP 

BAL 

DC 

DC 

DC 

OS 

SVC 

L 

L 

L 

LA 

LA 

LA 

CLC 

BE 

LR 

BALR 

LTR 

BZ 

XC 



CNTREG,CNTR£G 
LOOPREG2,1 



PRINTER RLN 
RLN COUNTER 



0(2,XNDXR£G2),MIN1 PRINTER ENTRY 

PTRXNIT YES, GET RLN 

0(130,INDXREG) ,0(XNDXREG) CLEAR DATA AREA 

CNTR£G,2(INDXREG2) STORE PRINTER RLN FOR THIS DISPLAY 

XNDXREG,4(XNDXREG2) STORE ADDR OF DATA AREA 

XNDXR£G,OATASZ XNCR DATA AREA PTR 

XNDXR£G2,8(INDXR£G2) XNCR ENTRY PTR 

LOOPR£G2,1 (LOOP*REG2) XNCR RLN 

LOOPRECXNITLOOP BR IF MORE TO DO 

PARMREG,«(TABBASE) GET ADDR OF ECB LIST 

XNDXREG, NOPTRS GET INDEX PAST PRINTER ECB 

XNDXREG,XNDXREG XA01560 

DXSPECB XA01560 

EVENREG.DUMMYECB XA01560 

EVENREG,0(PARMREG) XA01560 

PARMR£G,4(PARMR£G) XA01560 

XNDXREG, PTRECB XA01560 

O(PARMREG) ,X'80' XA01S60 

1 (3,PARMREG) ,9 (TABBASE) MOVE IN ADDR OF ECB 

IOINIT 

CNTREG,LOOPREG2 GET RLN OF PRINTER 

XNCRPTRS 

(SYSPRINT, OUTPUT, DD3270) 

0,4 ALIGN LIST TO FULLWORO 

1,«+12 LOAD REG1 W/LIST ADOR. 

ALK15) OPTION BYTE 

AL3 (SYSPRINT) DCS ADDRESS 

ALK128) OPTION BYTE 

AL3(DO3270) DCS ADDRESS 

19 ISSUE OPEN SVC 

'LOCAL 3270 SAMPLE PROGRAM RUNNING* 

0,4 

1,IHB0005A BRANCH AROUND MESSAGE 

AL2(37) TEXT LENGTH 

8*0000000000000000' MCS FLAGS 

C LOCAL 3270 SAMPLE PROGRAM RUNNING' 

OH 

35 



LOOP REG, NODVCS 
DECB REG , 8 ( TABBASE ) 
BUFREG , 1 2 (TABBASE) 
XNDXREG , 16 ( TABBASE ) 
RLN REG, 1 

EPREG,WRTFMT1 

(2, XNDXREG) , MINI 

UPCOUNT 

PARMREG,RLNREG 

RETNREG,EPREG 

EPREG,EPREC 

UPCOUNT 



GET LOOP CTR 

GET ADOR OF DECB 

GET ADOR OF BUFFER 

GET ADDR OF FIRST TERM ENTRY 

INITIALIZE RLN REG 

GET ADDR OF FIRST WRITE RTN 

PRINTER ENTRY 

YES, DON'T DO WRITE 

PUT RLN IN REG 1 

WRITE FIRST MSG 

SUCCESSFUL 

YES, TRY NEXT 



( 2, XNDXREG) ,0 (XNDXREG) MARX TERMINAL INACTIVE 



O-10 OS/VS BTAM SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



ADDR1 AOOR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



00022A 47F0 B226 

00022E «829 0002 
000232 4122 0001 
000236 4029 0002 
00023A 4166 0001 
00023E 4155 0008 
000242 4640 B1F8 

000246 4160 0001 
00024A 4159 0010 
00024E 5840 BAA4 
000252 D501 5000 BB60 
000258 4770 B258 
00025C 4166 0001 
000260 4155 0008 
000264 4640 B23E 
000268 4160 0001 
00026C 5060 BAC0 



0023A 

00002 
00001 
00002 
00001 
00008 
0020C 

00001 

00010 

00AB8 

00000 00B74 

0026C 

00001 

00008 

00252 

00001 

00AO4 



000270 .5860 BAC0 00AD4 
000274 O703 7000 7000 00000 00000 



00004 
00005 
00134 
00006 
00B3C 
00008 
0OOOC 
00018 
00B6C 



00027A 


1817 




00027C 


9404 


1004 


000280 


9201 


1005 


000284 


41E0 


0134 


000288 


40E0 


1006 


00028C 


41E0 


BB28 


000290 


50E0 


1008 


000294 


5080 


100C 


000298 


4060 


1018 


00029C 


58F0 


BBS 8 


0002AO 


05EF 




0002A2 


12FF 




0002A4 


4770 


B90A 


000 2A8 


5839 


0004 


0002AC 






00 02 AC 


4113 


0000 


0002B0 


1801 




0002B2 


58F1 


0000 


0002B6 


9140 


F000 


000 2BA 


4770 


B2CE 


0002BE 


9180 


1000 


0002C2 


4710 


B28A 


0002C6 


4111 


0004 


0002CA 


47F0 


B29E 


0002CE 


1810 




000200 


4100 


0001 


000204 


4110 


1000 


0002D8 


1800 




0002DA 


1311 




0002DC 


0A01 





0091E 
00004 



002 AC 



00000 

00000 
00000 
002E2 
00000 
002CE 
00004 
002B2 

00001 
00000 



221 

222 * 

223 UPCOUNT 
224 

225 

226 IOLPCNT 

227 

228 

229 • 

230 

231 

232 

233 FXNDFRST 

234 

235 

236 

237 

238 

239 DSPLY1 

240 • 

241 READ 
242 

243 

244+ 

245+ 

246+ 

247+ 

248+ 

249+ 

250+ 

251 + 

252+ 

253+ 

254+ 

255 

256 

257 TWAIT 

258 

259+ 

260+XECA0008 

261 + 

262+ 

263+IECB0008 

264+ 

265+ 

266* 

267+ 

268+ 

269+ 

270+XECO0008 

271 + 

272+ 

273+ 

274f 

275+ 



B 

LH 
LA 
STH 
LA 

LA 
BCT 

LA 
LA 

L 

CLC 

BNE 

LA 

LA 

BCT 

LA 

ST 

L 
XC 

READ 

LR 

NX 

MVX 

LA 

STH 

LA 

ST 

ST 

STH 

L 

BALR 

LTR 

BNZ 

L 

TWAIT 

OS 

EQU 

LA 

LR 

L 

TM 

BNZ 

TM 

BO 

LA 

B 

LR 

LA 

LA 

LR 

LCR 

SVC 



IOLPCNT 

EVEN REG , 2 (TABBASE) 
EVENREG , 1 (EVENREG) 
EVENREG , 2 (TABBASE ) 
RLNREG, 1 (RLNREG) 
XNDXREG, 8 (XNDXREG) 
LOOP REG, IOLOOP 



INCREMENT 

COUNT OF ACTIVE 
DEVICES 
INCR RLN 

INCR TO NEXT ENTRY 
LOOP IF MORE TO DO 



CNTREG, 1 INIT RLN 

XNDXREG, 16 (TABBASE) POINTER TO FIRST ENTRY 



LOOP REG ,NODVCS 
0(2,INDXR£G) ,MIN1 
DSPLY1 

CNTREG,1 (CNTREG) 
XNDXREG ,8 (XNDXREG) 
LOOP REG , FXNDFRST 
CNTREG, 1 
CNTREG , READRLN 



LOOP LIMIT 

PRINTER 

NO, SAVE RLN 

INCR RLN 

INCR TO NEXT ENTRY 



SAVE RLN FOR READS 



RLN REG, READRLN GET READ RLN 

0(4,DECBREG) ,0(DECBREG) 

(DECBREG) ,TX,DD3270, (BUFREG) , 308, , (RLNREG) ,MF-E 



1, DECS REG 

4(1), 4 

5(1), 1 

14,308(0,0) 

14,6(0,1) 

14,DD3270 

14,8(0,1) 

BUFREG, 12(0,1) 

RLN REG, 24 (0,1) 

15.DD3270+48 

14,15 

EPREG,EPREG 

ERRABENO 

0DDREG,4 (TABBASE) 

(EVENREG) ,EC8LIST-(0DDREG) 

OH 



LOAD DECB ADDRESS 



STORE LENGTH 



000B 
000B 



STORE DCB ADDRESS 
STORE AREA ADOR 00 0B 
STORE LINE NUMBER 
LOAD RDWRT ROUT ADOR 

A38557 
OK 

NO, ABEND 
GET ADOR OF ECB LIST 

WAIT FOR OPERATION TO END 



1,0((OODREG) ) 

0,1 

15,0(1) 

0(15) ,X't0' 

IECC0008 

om.x'ao' 

XECO0008 

1,4(1) 

XECB0008 

1,0 

0,1 

1,0(0,1) 

0,0 

1,1 

1 



OOOA 



SAVE PARAMETER LIST ADDRESS. 
LOAD ECB ADDRESS. 
IS COMPLETE BIT ON? 

IF NOT, TEST FOR END OF LIST. 

STEP TO NEXT ENTRY IN LIST. 

RESTORE PARAMETER LIST REGISTER. 

LOAD WAIT COUNT. 

CLEAR HIGH BYTE OF REG 
LOAD PARAMETER REG 
INDICATE ECBLIST USED 
LINK TO WAIT ROUTINE 



Appendix O: Local 3270 Sample Program O-ll 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



0002DE 47F0 B298 
0002E2 412F 0000 



AODR1 ADDR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



0002E6 


18F1 




0002E8 


1BF0 




0002EA 


9501 


2005 


0002EE 


4770 


B76A 


0002F2 


9544 


2000 


0002F6 


4780 


B25C 


0002FA 


957F 


2000 


0002FE 


U770 


B90A 


000302 


5812 


0024 


000306 


1831 




000308 


8B30 


0003 


00030C 


4869 


3008 


000310 


8B60 


0002 


000314 


47F6 


B304 


000318 


47F0 


B90A 


00031C 


47F0 


B318 


000320 


47F0 


B5C2 


000324 


47F0 


B6B4 


000328 


47F0 


B25C 


00032C 


956E 


8000 


000330 


4770 


B412 


000331 


1861 




000336 


8B10 


0003 


00033A 


4120 


0004 


00033E 


4029 


1008 


000342 






0003U2 


4110 


BB28 


00O3U6 


58F1 


002C 


00034A 


58EF 


0018 


00034E 


41EE 


0000 


000352 


4111 


0000 


0003S6 


191E 




000358 


4770 


B36C 


00035C 


181 F 




00035E 


18F6 




000360 


1BEE 




000362 


43E1 


.0010 


000366 


19FE 




000368 


4720 


B36C 


00036C 


8BF0 


0002 


000370 


581F 


101C 


000374 


1B00 




000376 


41F0 


0002 


00037A 


0A74 




00037C 


47F0 


B370 


000380 


41F0 


0008 



002AC 
00000 



00005 
0077E 
00000 
00270 
00000 
0091E 
00024 

00003 
00008 
00002 
00318 
0091E 
0032C 
005D6 
006C8 
00270 



00000 
00426 



00334 



00003 
00004 
00008 



00B3C 
0002C 
00018 
00000 
00000 

00380 



00010 

00380 
00002 
0001C 

00002 

00384 
00008 



276+ 

277+IECC0008 

278+* 

279+ 

280+ 

281 • 

282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 READRTN 

29 5 

296 

297 

298 

299 • 

300 • 

301 READFMT1 
302 

303 • 

304 WRTFMT4 

305 ENDMSG 
306 

307 

308 

309 

310+ 

311 + 

312+ 

313+ 

314+ 

315+ 

316+ 

317+ 

318+ 

319+ 

320+ 

321 + 

322+ 

323+ 

324+ 

325+ 

326+ 

327+ 

328+ 

329+ 

330+IECA0010 



B 
LA 

LR 
SR 

CLI 

BNE 

CLI 

BE 

CLI 

BNE 

L 

LR 

SLA 

LH 

SLA 

B 

B 

B 

B 

B 

B 



CLI 
BNE 



IECA0008 

(EVENREG) ,0(15} IF ON, LOAD SPECIFIED REGISTER WITH 

ADDRESS OF COMPLETED ECS 
15,1 
15,0 

TYPE (EVENREG) ,X' 01' OPERATION - READ INITIAL 



NO, PRINTER OPERATION 

INTERCEPTED 

YES, RETRY READ 

SUCCESSFUL 

NO, END 

PARMREG,POLPT (EVENREG) GET RESPONDING RLN 
ODDREG,PARMREG 

ODDREG,3 GET INDEX TO TERM ENTRY 

CNTREG,8(TABBASE,ODDR£G) GET FORMAT NO. 



PRNTREND 

(EVENREG) ,X'44* 

READ 

(EVENREG)., X*7F' 

ERRABEND 



CNTREG,2 

READRTN (CNTREG) 

ERRABEND 

READFMT1 

READFMT2 

READFMT3 

READ 



O(BUFREG) ,X'6E' 
CLR1 



MULTIPLY BY 4 

RLN - INACTIVE DEVICE 

FORMAT 1 ON SCREEN 

FORMAT 2 ON SCREEN 

FORMAT 3 ON SCREEN 

FORMAT 4 ON SCREEN - IGNORE IT 



INTERRUPT IS PA2 KEY 
NO, TEST FOR CLEAR KEY 



SAVE RLN 

RETURN - REESTABLISH READ 
CONVERT RLN TO TABLE INDEX 
FORMAT ID 
,PARMREG) STORE ID IN TABLE 
CHGNTRY DD3270,ATTLST,(RLNREG) ,,SKIP DEACTIVATE TERMINAL 



LR 

EQU 

SLA 

LA 

STH 



RLNREG,PARMREG 

WRTFMT4 

PARMREG,3 

EVEN REG, 4 

EVEN REG , 8 ( TABB ASE , 



DS 

LA 

L 

L 

LA 

LA 

CR 

BNE 

LR 

LR 

SR 

IC 

CR 

BH 

SLA 

L 

SR 

LA 

SVC 

B 

LA 



OH 

1,DD3270 

15,44(1) 

14,24(15) 

14,0(14) 

1,0(1) 

1,14 

IECA0010 

1,15 

15, RLN REG 

14,14 

U,16{1) 

15,14 

IECA0010 

15,2 

1,28(15,1) 

0,0 

15,2 

116 

IECB0010 

15,8 



GET DEB ADDR 
GET DCB ADDR FROM DEB 
CLEAR HIGH-ORDER BYTE 
CLEAR HIGH-ORDER BYTE 
DCB-DEB LOOP COMPLETE 
NO, GIVE RETURN CODE - 8 
DEB ADDR TO REG 1 
GET RLN 

GET NUMBER OF EXTENTS 

IS RLN VALID 

NO, GIVE RETURN CODE - 8 

MULTIPLY RLN BY 4 

GET ADDR OF UCB FROM DEB 

FUNCTION IS SKIP 
INVOICE ESR 
BRANCH TO EXIT 
SET RETURN CODE OF 8 



0-12 OS/VS BTAM SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC 


OBJECT CODE 


ADDR1 ADOR2 


STMT SOURCE 


STATEMENT 


ASM 0200 16.45 








00334 


331+IECB0010 
332 • 


EQU 


• 


FOR READ INITIAL 




000384 


0703 


7000 7000 


00000 00000 


333 WRXTE4 


XC 


0(4, DECBREG) , ( OECBREG) CLEAR ECB 












334 


WRITE 


(DECBREG) ,TS,DD3270 


,FORMAT4,FMT4SZ,, (RLNREG) ,MF-E 




00038A 


1817 






335+ 


LR 


1, DECBREG 


LOAD OECB ADDRESS 


00038C 


9404 


1004 


00004 


336+ 


MX 


4(1), 4 






000390 


920E 


1005 


00005 


337+ 


MVX 


5(1),14 






00039ft 


47F0 


B386 


0039A 


338+ 


B 


•+6 




00 OB 


000398 


0024 






339+ 


DC 


AL2(FMT4SZ) 




000B 


00039A 


D201 


1006 B384 


00006 00398 


340+ 


MVC 


G(2,1),«-2 


MOVE IN LENGTH 


000B 


0003A0 


41E0 


BB28 


00B3C 


341 + 


LA 


14,DD3270 






0003A4 


50E0 


1008 


00008 


342+ 


ST 


14,8(0,1) 


STORE DCB ADDRESS 


0003A8 


41E0 


BE 9 A 


OOEAE 


343* 


LA 


14,FORMAT4 




000B 


0003AC 


50E0 


100C 


0000C 


344+ 


ST 


14,12(0,1) 


STORE AREA AOOR 


OOOB 


0003BO 


4060 


1018 


00018 


345+ 


STH 


RLN REG, 24(0,1) 


STORE LINE NUMBER 


0003B4 


S8F0 


BB58 


00B6C 


346+ 


L 


1S,DD3270+48 


LOAD ROWRT ROUT 


ADOR 


0003B8 


05EF 






347+ 


BALR 


14,15 




A38557 


0003BA 


12FF 






348 


LTR 


EPREG,EPREG 


END IF RC 




000 3BC 


4770 


B90A 


0091E 


349 
350 


BNZ 
WAIT 


ERRASEND 
ECB- (DECBREG) 


NON-ZERO 




0003CO 


4110 


7000 


00000 


3S1 + 


LA 


1 ,0(0,DECBREG) 


CLEAR HIGH BYTE OF REG 


0003C4 


4100 


0001 


00001 


352+ 


LA 


0,1(0,0) 


COUNT OMITTED, 1 USED 




0003C8 


0AO1 






353+ 


SVC 


1 


LINK TO WAIT ROUTINE 




0003CA 


957F 


7000 


00000 


354 


CLX 


O(DECBREG) ,X'7F' 


SATISFACTORY COMPLETION 




0003CS 


4780 


B3CA 


003OE 


355 


BE 


QUIESCE 


UPDATE ACTIVE TERM COUNT 




000302 


9544 


7000 


00000 


3S6 


CLX 


(DECBREG) ,X'44' 


INTERCEPT 




0003D6 


4780 


B370 


00384 


357 


BE 


WRITE4 


YES, RETRY 




0003OA 


47F0 


B90A 


0091E 


358 
359 • 


B 


ERRABENO 


NO, END 




0003OE 


4829 


0002 


00002 


360 • 

361 QUIESCE 


LH 


EVENREG , 2 (TABBASE) 


GET NO. OF ACTIVE TERMS 




0003E2 


4620 


B40A 


0041E 


362 
363 


BCT 
CLOSE 


EVENREG.QCNTSTR 
(SVSPRINT,,DD3270) 


DECR COUNT 

IF ZERO, CLOSE DCB'S 




0003E6 


0700 






364+ 


CHOP 


0,4 


ALIGN LIST TO FULLWORD 


0003E8 


4510 


B3E0 


003F4 


365+ 


BAL 


1,»+12 


LOAD REG1 W/LIST ADDR 


0003EC 


00 






366+ 


DC 


ALKO) 


OPTION BYTE 




0003EO 


O0OAF0 




367+ 


DC 


AL3(SYSPRINT) 


DCB ADDRESS 




0003FO 


30 






368+ 


DC 


AL1 (128) 


OPTION BYTE 




0003F1 


000B3C 




369+ 


DC 


AL3(OD3270) 


DCB ADDRESS 




0003F4 


0A14 






370+ 


SVC 


20 


ISSUE CLOSE SVC 




0003F6 


5810 


BABC 


00 ADO 


371 


L 


PARMREG , DATBLKAO 


LOCATION OF DATA AREAS 




0003FA 


5800 


BAB 8 


OOACC 


372 


L 


ZERO REG , OATBLKSZ 


SIZE OF DATA AREAS 












373 


FREEMAIN R,LV« (0) , A- (1 ) 


FREE DATA AREAS 




0003FE 


4111 


0000 


00000 


374+ 


LA 


1,0(1,0) 


CLEAR THE HIGH ORDER BYTE 


XM4571 


000402 


OAOA 






375+ 


SVC 


10 


ISSUE FREEMAIN SVC 


P2504 


000404 


1819 






376 


LR 


PARMREG , TABBASE 


LOCATION OF CONTROL TABLE 




000406 


5800 


BAAC 


00AC0 


377 


L 


ZEROREG,TABSXZE 


SIZE OF CONTROL TABLE 












378 


FREEMAIN R.LV-(O) ,A- ( 1 ) 


FREE CONTROL TABLE 




00040A 


4111 


0000 


00000 


379+ 


LA 


1,0(1,0) 


CLEAR THE HIGH ORDER BYTE 


XM4571 


00040E 


OAOA 






380+ 


SVC 


10 


ISSUE FREEMAIN SVC 


P2504 


000410 


58D0 


BA5C 


00A70 


381 


L 


SAVE REG, SAVE+4 














382 


RETURN (14,12),? 


RETURN TO CALLING PROGRAM 




000414 


98EC 


DOOC 


OOOOC 


383+ 


LM 


14,12,12(13) 


RESTORE THE REGISTERS 


000418 


92FF 


OOOC 


OOOOC 


384+ 


MVI 


12(13) ,X*FF' 


SET RETURN INDICATION 


00041C 


07FE 






385+ 


BR 


14 


RETURN 





Appendix 0: Local 3270 Sample Program 0-13 



LOCAL 3270 SAMPLE PROGRAM 



LOC 


OBJECT CODE 


ADDR1 


ADOR2 


STMT SOURCE 


STATEMENT 


ASM 0200 ' 


16.45 


00041E 


4029 


0002 


00002 




386 * 

387 QCNTSTR 


STH 


EVENREC , 2 ( TABBASE } 


SAVE UPDATE ACTIVE TERM CNT 




000422 


47F0 


B2SC 


00270 




388 
389 • 


B 


READ 


SET UP READ 




00042S 


9560 


8000 


00000 




390 • 

391 CLR1 


CLI 


O(BUTREG) ,X'6D' 


CLEAR KEY 




00042A 


4770 


8«82 


00496 




392 

393 ♦ 

394 WRTFMT3 


BNE 


ENT1 


NO, TEST FOR ENTER KEY 




00042E 


1861 








LR 


RLNR£G,PARMREG 


SAVE RLN 












0042E 


395 CNTRLMSG 

396 • 


EQU 


WRTFMT3 


WRITE CONTROL OPTIONS 




000430 


8B10 


0003 


00003 




397 


SLA 


PARMR£C,3 


CONVERT RLN TO TABLE INDEX 




000434 


4120 


0003 


00003 




398 


LA 


EVEN REG, 3 


FORMAT ID 




000438 


4029 


1008 


00008 




399 


STH 


EVENREG , 8 ( TABBASE , 


PARMREG) STORE ID IN TABLE 




00043C 


D703 


7000 7000 


00000 


00000 


400 WRITE3 
401 


XC 

WRITE 


0(4, DECBREG) , ( DECBREG ) CLEAR ECB 

(DECBREG) ,TS,DD3270,FORMAT3,FMT3SZ,, (RLNREG) ,MF-E 




000442 


1817 








402+ 


LR 


1, DECBREG 


LOAD DECB ADDRESS 




000444 


9404 


1004 


00004 




403+ 


NI 


4(1), 4 






000448 


920E 


1005 


00005 




404+ 


MVI 


5(1), 14 






00044C 


47F0 


B43E 


00452 




405+ 


B 


•+6 




00 0B 


0004S0 


0148 








406+ 


DC 


AL2(FMT3SZ) 




000B 


000452 


O201 


1006 B43C 


00006 


00450 


407+ 


MVC 


6(2,1),*-2 


MOVE IN LENGTH 


00 0B 


000458 


41E0 


BB28 


0CB3C 




408+ 


LA 


14,DO3270 






00045C 


50E0 


1008 


00008 




409+ 


ST 


14,8(0,1) 


STORE DCB ADDRESS 




000460 


41E0 


B052 


00D66 




410+ 


LA 


14,FORMAT3 




000B 


000464 


50E0 


100C 


ooooc 




411 + 


ST 


14,12(0,1) 


STORE AREA ADDR 


000B 


000468 


4060 


1018 


00018 




412+ 


STH 


RLNREG, 24 (0,1) 


STORE LINE NUMBER 




00046C 


58F0 


BB58 


00B6C 




413+ 


L 


15,003270+48 


LOAD RDWRT ROUT ADDR 


000470 


05EF 








414+ 


BALR 


14,15 


A38557 


000472 


12FF 








415 


LTR 


EPREG.EPREG 


END IF RC 




000474 


4770 


B90A 


0091E 




416 
417 


BNZ 
WAIT 


ERRABEIJD 
ECB- (DECBREG) 


NON-ZERO 
WAIT FOR COMPLETION 




000478 


4110 


7000 


00000 




418+ 


LA 


1,0(0, DECBREG) 


CLEAR HIGH BYTE OF REG 




00047C 


4100 


0001 


00001 




419+ 


LA 


0,1 (0,0) 


COUNT OMITTED, 1 USED 




000480 


0A01 








420+ 


SVC 


1 


LINK TO WAIT ROUTINE 




000482 


957F 


7000 


OOOOO 




421 


CLI 


(DECBREG) .X^F* 


SATISFACTORY COMPLETION 




000486 


4780 


B25C 


00270 




422 


BE 


READ 


YES, SET UP READ 




00048A 


9544 


7000 


00000 




423 


CLI 


O(DECBREG) ,X'44' 


INTERCEPT 




00048E 


4780 


B428 


0043C 




424 


BE 


WRITE3 


YES, RETRY OPERATION 




000492 


47F0 


B90A 


0091E 




425 

426 • 

427 ENT1 


B 


ERRABEND 


NO, END 




000496 


957D 


8000 


00000 




CLI 


O(BUFREG) ,X'7D' 


ENTER KEY 




00049A 


4770 


B25C 


00270 




428 


BNE 


READ 


NO, REESTABLISH READ 




00049E 


5839 


300C 


OOOOC 




429 


L 


ODDREG , 1 2 (TABBASE , 


ODDREG) GET ADDR OF DATA AREA 




0004A2 


4158 


0003 


00003 




430 


LA 


INDXREG,3(BOTREG) 


INDEX PAST AID ( CURSOR ADDR 




0004A6 


4140 


0134 


00134 




431 


LA 


LOOP REG, 308 






0004AA 


4B42 


0012 


00012 




432 


SH 


LOOPREG, COUNT (EVENREG) GET NUMBER OF BYTES READ 




0004AE 


5B40 


BAC8 


OOADC 




433 


S 


LOOP REG, THREE 


ADJUST FOR LENGTH OF AID t ADDR 




0004B2 


1244 








434 


LTR 


LOOPREG, LOOPREG 






000484 


47O0 


BS30 


00544 




435 
436 • 
437 


BNP 


WRTRSPNS 


NOTHING ENTERED 




0004B8 


O502 


5000 BB63 


00000 


00B77 


CLC 


0(3,INDXREG) ,FLD1 


FIRST FIELD 




0004BE 


4770 


B4BE 


004O2 




438 


BNE 


FLD2CHX 


NO, CHECK FOR SECOND 




0004C2 


D720 


3000 3000 


00000 


00000 


439 


XC 


0(33, ODDREG) ,0(ODDREG) CLEAR FIELD IN DATA AREA 




0004C8 


4SE0 


B998 


009AC 




440 


BAL 


RETNREG,GETFIELD 


FIND FIELD DELIMITERS 





0-14 OS/VS BTAW SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 

0004CC 12*4 

0004CE 4700 BS30 00544 

000402 4133 0022 00022 
000406 0502 5000 B866 00000 00B7A 



ADDR1 AODR2 STMT SOURCE STATEMEHT 



ASM 0200 16.45 01/09/76 



0004DC 4770 B40C 



004PO 



0004EO D720 3000 3000 00000 00000 
0004E6 45E0 B998 009AC 
0004EA 1244 
0004EC 47D0 B530 00544 

0004FO 4133 0022 00022 

0004P4 0502 5000 B069 00000 00B7D 

0004FA 4770 B4FA 0050E 

0004FE D720 3000 3000 00000 00000 

000504 45E0 B998 009AC 
000508 1244 

00050A 47D0 B530 00544 



00050E 4133 0022 



00022 



000512 0502 5000 BD6C 00000 00B80 



000518 4770 BS18 



0052C 



00051C 0714 3000 3000 00000 00000 
000522 45E0 B998 
000526 1244 
000528 4700 B530 



009AC 
00544 



00052C 4133 001(1 00016 
000530 0502 5000 B06P 00000 00B83 
000536 4770 B530 00544 
00053A 0704 3000 3000 00000 00000 
000540 45E0 B998 009AC 



000544 1861 



00544 



000546 
000S4C 
000552 
000556 
0005SA 
00055E 
000562 
000568 
00056E 
000574 
00057A 
000580 



D2PF 
D231 
8B10 
4120 
4029 
5839 
D220 
D220 
D220 
D21U 
0204 
D703 



8000 
8100 
0003 
0002 
1008 
100C 
8028 
8052 
807C 
80A7 
80C4 
7000 



BC20 
BO20 



3000 
3022 
3044 
3066 
307C 
7000 



000586 1817 
000588 9404 1004 
00058C 920E 1005 
000590 47F0 B582 
000594 0132 



00000 
00100 
00003 
00002 
00008 
0000C 
00028 
00052 
0007C 
000A7 
000C4 
00000 



00004 
00005 
00596 



00C34 
00034 



00000 
00022 
00044 
00066 
0007C 
00000 



441 
442 

443 * 

444 FLD2CHX 
445 

446 
447 
448 
449 
450 

451 • 

452 FLD3CHX 
453 

454 
455 
456 
457 
458 

459 • 

460 FLD4CHK 
461 

462 
463 
464 
465 
466 

467 • 

468 FLD5CHK 
469 

470 
471 
472 

473 ♦ 

474 • 

475 WRTFMT2 

476 WRTRSPNS 

477 • 
478 
479 
480 
481 
482 
483 
484 
485 
486 
487 
488 

489 WRITE 2 

490 

491 + 

492+ 

493+ 

494+ 

495+ 



LTR 
BMP 

LA 
CLC 
BME 
XC 

BAL 
LTR 
BMP 

LA 

CLC 
BNE 

XC 

BAL 
LTR 
BNP 

LA 

CLC 

BNE 

XC 

BAL 

LTR 

BNP 

LA 

CLC 

BNE 

XC 

BAL 



LOOPREG, LOOPREG 
WRTRSPNS 



END OF DATA 

YES, WRITE RESPONSE 



ODDREG,34(ODDREG) INCR TO NEXT FIELD IN DATA AREA 

0(3, INOXREG) , FLD2 SECOND FIELD 

FL03CHX NO, CHECK FOR THIRD FIELD 

0(33,ODDREG),0(OODREG) CLEAR FIELD IN DATA AREA 

RETNREG,GETFIELD GET FIELD 

LOOP REG, LOOPREG END OF DATA 

WRTRSPNS YES, WRITE RESPONSE 

OOOREG,34(OODREG) INCR TO THIRD FIELD IN DATA AREA 

(3, INOXREG) ,FLD3 THIRD FIELD 

FLD4CHK NO, CHECK FOR FOURTH FIELD 

0(33,OOOREG) ,0(OODREG) CLEARFIELD 

RETNREG,GETFIELD GET FIELD 

LOOPREG, LOOPREG END OF DATA 

WRTRSPNS YES, WRITE RESPONSE 

ODDREG,34(OODR£G) INCR TO FOURTH FIELD 

0(3, INOXREG) , FL04 FOURTH FIELD 

FLOSCHK NO, CHECK FOR LAST FIELD 

0(21,ODOREG) ,0(OODREG) CLEARFIELD 

RETNREG.GETFIELD GET FIELD 

LOOP REG, LOOPREG END OF DATA 

WRTRSPNS YES, WRITE RESPONSE 

OODREG,22(OOOREG) INCR TO LAST FIELD 

(3, INOXREG) ,FLD5 FIFTH FIELD 

WRTRSPNS NO, WRITE RESPONSE 
0(5,ODDREG) ,0{ODDREG) CLEARFIELD 

RETN«EG,GETFIELO GET FIELD 



LR RLNREG,PARMREG SAVE RLN 

CQU WRTFMT2 RETURN - REESTABLISH READ 

WRITE FORMAT 2 

MVC 0(256, BUFREG) ,FORMAT2 MOVE BASE MESSAGE 

MVC 256 (FMT2SZ-256, BUFREG) ,FORMAT2+256 INTO BUFFER 

SLA PARMR£G,3 CONVERT RLN TO TABLE INDEX 

LA EVENREG,2 GET FORMAT ID 

STH EVENREG,8(TABBASE,PARMREG) ( STORE IN TABLE ENTRY 

L ODDRGG,12<TABBASE,PARMREG) GET DATA AREA ADOR 

MVC FMT2FLD1 (33, BUFREG) ,0(ODDREG) MOVE DATA 

MVC FMT2FLD2(33,BUFREG) ,34(ODOREG) FROM 

MVC FMT2FLD3(33,BUFREG) ,68(ODOREG) DATA AREA 

MVC FMT2FLD4 (21, BUFREG) ,102 (OOOREG) TO 

MVC FMT2FLD5 (5, BUFREG) ,124 (ODDREG) BUFFER 

XC 0(4,DECBREG) ,0 (DECBREG) CLEAR ECB 

WRITE (DECBREG) ,TS ,003270, (BUFREG) ,FMT2SZ,, (RLNREG) ,MF-E 

LR 1, DECBREG LOAD DECS ADDRESS 

NI 4(1), 4 

MVI 5 { 1 ) , 1 4 

B «+6 00OB 

DC AL2(FMT2SZ) 000B 



Appendix O: Local 3270 Sample Program 0-15 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



ADDR1 ADOR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



000596 D201 1006 B580 00006 00594 



00059C 41E0 BB28 
0005AO 50E0 1008 
0005A4 5080 100C 
0005A8 4060 1018 
0005AC 58F0 BB58 
0005BO 0SEF 
000SB2 12FT 
0005B4 4770 B90A 

0005B8 4110 7000 
0005BC 4100 0001 
00O5C0 0A01 
0005C2 957F 7000 
0005C6 4780 B25C 
0005CA 9544 7000 
000SCE 4780 B56C 
000SO2 47F0 B90A 



0005D6 
0005OA 
0005OE 
0005E0 
0005E4 
0005E8 
0005EA 
0005EE 
0005FO 
0005F4 

0005F8 
0005FC 
0005FE 
000604 
000608 
00060C 
000610 
000616 
00061A 
00061E 
000622 
000626 

00062A 
00062E 
000632 
000636 
0OO63A 
00063E 
000642 
000644 
000648 



956C 
4770 
1821 
8B20 
4832 
1233 
4780 
1863 
8B30 
4100 

4510 
OAOA 
D7B7 
4141 
5852 
92C8 
0280 
9215 
9215 
9215 
9240 
9219 

4809 
4900 
4780 
5859 

5015 
5019 
1812 
8A10 
47F0 



8000 
B318 



0003 
900A 



B67E 



0003 
00B8 



B5E8 



00B3C 
00008 
0000C 
00018 
00B6C 



0091E 

00000 
00001 

00000 
00270 
00000 
00580 
0091E 

00000 
0032C 

00003 
0000A 

00692 

00003 
000B8 

005FC 



1000 1000 
002C 



900C 
4000 
4001 
4022 
4044 
4066 
407C 
4082 

3008 
BB60 
B638 
300C 
0000 
300C 

0003 
B530 



00064C 5019 300C 
000650 4111 0004 



00000 00000 
0002C 
0000C 
00000 
5000 00001 00000 
00022 
00044 
00066 
0007C 
00082 

00008 
00B74 
0064C 
0000C 
00000 
000OC 

00003 
00544 

00OOC 
00004 



496+ 

497+ 

498+ 

499+ 

500+ 

501 + 

502+ 

503 

504 

505 

506+ 

507+ 

508+ 

509 

510 

511 

512 

513 

514 • 

515 REAOFMT2 
516 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526+ 

527+ 

52C 

529 

530 

531 

532 

533 

534 

535 

536 

537 

538 • 

539 

540 

541 

542 

543 

544 

54 5 RSTRXYBO 

54 6 

547 

548 • 

549 STRTPRTR 
550 



MVC 
LA 

ST 
ST 

sth 

L 
BALR 

LTR 

BMZ 

WAIT 

LA 

LA 

SVC 

CLZ 

BE 

CLZ 

BE 

B 

CLI 
BNE 
LR 
SLA 

LH 

LTR 

BZ 

LR 

SLA 

LA 

GETMAIN 

BAL 

SVC 

xc 

LA 

L 

MVI 

MVC 

MVI 

MVI 

MVI 

MVI 

MVI 



6(2,1) ,«-2 

14,003270 

14,8(0,1) 

BUFREG,12(0,1) 

RLNREG,24(0,1) 

15,003270+48 

14,15 

EPREG,EPREG 

ERRABEHD 

ECB-(DECBREG) 

1,0(0,DECBREG) 

0,1(0,0) 

1 

O(DECBREG) ,X*7F' 

READ 

O(OECBREG) ,X'44« 

WRITE 2 

ERRABEND 



MOVE IN LENGTH 



000B 



STORE DCS ADDRESS 
STORE AREA ADOR 00 OB 
STORE LINE NUMBER 
LOAD RDWRT ROUT ADOR 

A38S57 



END IF RC 

NON-ZERO 

WAIT FOR OPERATION TO END 
CLEAR HIGH BYTE OF 
COUNT OMITTED, 1 USED 
LINK TO WAIT ROUTINE 

COMPLETION SATISFACTORY 

YES, SET UP READ 

INTERCEPT 

YES, RETRY 

NO, END 



REG 



O(BUFREG) ,X'6C' PA1 KEY 

READFMT1 NO, GO TO READ FORMAT 1 LOGIC 

EVENREG,PARMREG GET RLN OF DISPLAY 

EVENREG,3 GET INDEX TO ENTRY 

ODDREG,10(EVENREG,TABBASE) GET RLN OF ASSIGNED PTR 

ODDREG,ODDREG PRINTER ASSIGNED 

SYSOUT NO, USE SYSOUT 

RLNREG,OOOREG SAVE RLN 

ODDREG,3 GET INDEX TO ENTRY OF PRINTER 

ZEROREG,184 

R,LV-(0) GET CORE FOR PRINTER REQUEST BLOCK 

1,*+4 INDICATE GETMAIN 

10 ISSUE GETMAIN SVC 

0(184,PARMREG) ,0(PARMREG) CLEAR IT 
LOOPREG,44(PARMREG) GET ADDR OF PRINT BUFFER 
INDXREG,12(EVENREG,TABBASE) GET ADDR OF DATA AREA 
O(LOOPREG) ,X'C8' STORE WCC IN BUFFER 

1 (129,LOOPREG) ,0(INDXREG) MOVE IN DATA 
34(LOOPREG) ,X'15' NEW LINE 
68(LOOPREG) ,XM5' NEW LINE 
102(LOOPREG),X'1S I NEW LINE 

BLANX 

END OF MESSAGE 



124(LOOPREG) ,C 
UO(LOOPREG) ,X'19' 



LH ZEROREG,8(TABBASE,ODDREG) GET CURRENT PRINTER FORMAT 

CH ZEROREG,MIN1 PRINTER BUSY 

BE STRTPRTR NO, START OPERATION 

L INDXREG,12(TABBASE,ODDREG) GET POINTER TO LAST REQ 

ST PARMREG.OdNDXREG) STORE POINTER 

ST PARMREG,12(TABBASE,ODDREG) UPDATE POINTER TO CURR REO 

LR PARMREG,EVENREC RECOVER RLN OF DISPLAY 

SRA PARMREG,3 FROM TABLE INDEX 

B WRTRSPNS GO TO UNLOCK KEYBOARD 

ST PARMREG,12(TABBASE,ODDREG) STORE POINTER TO REQ 

LA PARMREG,4 (PARMREG) GET ADDRESS OF DECB 



0-16 OS/VS BTAM SRL 



LOCAL 3,270 SAMPLE PROGRAM 



LOC OBJECT CODE 



ADDR1 ADOR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



000654 


5859 


0004 


000658 


4A59 


300A 


00065C 


5015 


0000 


000660 


0600 




000662 


4009 


3008 


000666 


1811 




000668 


9404 


1004 


00066C 


920E 


1005 


000670 


41E0 


0083 


000674 


40E0 


1006 


000678 


41E0 


BB28 


00067C 


50E0 


1008 


000680 


5040 


100C 


000684 


4060 


1018 


000688 


58F0 


BB58 


00068C 


05EF 




00068E 


47F0 


B62E 



00004 
0000A 
00000 

00008 



00004 
O0OOS 
00083 
00006 
00B3C 
00008 
00OOC 
00018 
00B6C 

00642 

000692 5859 200C 0000C 
000696 0281 B9D4 5000 009E8 00000 
00069C 926B B9FS 00A09 
0006A0 926B BA17 00A2B 
0006A4 926B BA39 00A4D 
0006A8 9240 BA4F 00A63 
0006AC 924B BA55 00A69 
0006B0 DC81 B9D4 BEBE 009E8 00EO2 

0006B6 4110 BADC 00AF0 

0006BA 4100 B904 009E8 

0006BE 58F0 1030 00030 
0006C2 05EF 

0006C4 U7F0 B62E 00642 

0006C8 95F0 8000 00000 

0006CC 4780 B25C 00270 
000600 DS02 8000 B906 00000 0091A 

000606 4780 B25C 00270 

0006OA 9570 8000 00000 

0006DE 4780 BS30 00544 

0006E2 956E 8000 00000 

0006E6 4780 B320 00334 

0006EA 956C 8000 00000 

0006EE 4770 B41A 0042E 

0006F2 5829 300C 0000C 
0006F6 D781 2000 2000 00000 00000 



0006FC 45E0 B6F€ 
000700 12FF 
000702 4770 B90A 
000706 47F0 B25C 



0070A 



0091E 
00270 



00070A 183E 
00070C 1861 
00070E D703 7000 7000 00000 00000 



551 
552 
553 

554 
555 

556 

557+ 
558+ 
559* 
560+ 
561 + 
562+ 
563+ 
564+ 
565+ 
566+ 
567+ 
568 

569 • 

570 SYS OUT 
571 

572 

573 

574 

575 

576 

577 

578 

579+ 

580+ 

581 + 

582+ 

583 

584 • 

58 5 READFMT3 

586 

587 

588 

589 

590 

591 

592 

593 

594 

595 • 

596 

597 

598 

599 

600 

601 

602 ♦ 

60 3 WP.TFMT1 

60U 

605 



L 

AH 

ST 

BCTR 

STH 

WRITE 

LR 

MI 

MVI 

LA 

STH 

LA 

ST 

ST 

STH 

L 

BALR 

B 

L 

MVC 

MVI 

MVI 

MVI 

MVI 

MVI 

TR 

PUT 

LA 

LA 

L 

BALR 

B 

CLI 

BE 

CLC 

BE 

CLI 

BE 

CLI 

BE 

CLI 

ONE 



XC 
BAL 

LTR 
BNZ 
B 



INDXREG,4(TABBASE) GET ADDRESS OF ECB LIST 

INDXR£G,10(TABBASE,ODDREG) ADD INDEX TO PRTR'S PTR 

PARMREG,0(INDXREG) STORE ECB ADDR IN LIST 

ZEROREG,0 INDICATE 

ZEROR£G,8(TABBASE,ODDREG) PRINTER BUSY 

(PARMREG) ,TS,DD3270, (LOOPREG) ,131,, (RLNREG) ,MF-E 

1,PARMREG LOAD DECB ADDRESS 

4(1), 4 

5(1), 14 

14,131(0,0) 000B 

14,6(0,1) STORE LENGTH 000B 

14,DD3270 

14,8(0,1) STORE DCS ADDRESS 

LOOPREG, 12(0,1) STORE AREA ADDR 000B 

RLNREG, 24 (0,1) STORE LINE NUMBER 

15,DD3270+48 LOAD RDWRT ROUT ADDR 

14,15 A38557 

RSTRKYBD 

INDXREG,12(TABBASE,EVENREG) GET ADDR OF DATA AREA 



SYSOUTBF ( 1 30 ) , ( INDXREG) 

SYSOUTBF+33,C',' 

SYSOUTBF+67,C',' 

SYSOUTBF+ 1 1 , C ' , ' 

SYSOUTBF+123,C • 

SYSOUTBF+129.C'. ' 

SYSOUTBF (130) ,FLDXLATE 

SYSPRINT, SYSOUTBF 

1,SYSPRINT 

0, SYSOUTBF 

15,48(0,1) 

14,15 

RSTRKYBD 



MOVE DATA TO PRINT BUFFER 
MOVE IN 

FIELD DELIMITERS 
FOR LINE 

TO BE 

PRINTED 
TRANSLATE TO VALIDATE DATA 
WRITE TO SYSOUT 

LOAD PARAMETER REG 1 
LOAD PARAMETER REG 
LOAD PUT ROUTINE ADDR 
LINK TO PUT ROUTINE 



O(BUFREG) fX'FO' RFTKEY 

READ YES, REISSUE READ 

0(3,BUFREG) ,SOHRFT RFT HEADER 

READ YES, REISSUE READ 

O(BUFREG) ,X'7D' ENTER KEY 

WRTRSPNS YES, WRITE RESPONSE 

O(BUFREG) ,X'6E' PA2 KEY 

ENDKSG YES, END TE.^-ilNAL 

O(EUFRF.G) ,X'f.C PA1 KEY 



SXA11698 
3XA11698 
SXA11698 
SXA11698 
8XA1169 8 



CNTRLMSG 



NO, WRITE CONTROL OPTIONS MSG 



EVENR£r,,12(TABBASE,ODDREG) GET ADDR OF DATA AREA 
0(130,EVENREG) ,0(EVENREG) CLEAR IT 
RETNR£G,WRTF!«T1 WRITE OUT FIRST FORMAT 

EPREG,EPREG WRITE SUCCESSFUL 

ERRABEND NO, END 

READ 



WRITE 1 



LR ODDREG.RETNREC SAVE RETURN ADDRESS 

LR RLNREG, PARMREG SAVE RLN 

XC . 0(4,DECBREC) ,C(DECBREC) CLEAR ECB 



Appendix O: Local 3270 Sample Program 0-17 



LOCAL 3270 SAMPLE PROGRAM 



LOC 


OBJECT CODE 


ADOR1 ADDR2 


STMT SOURCE 


STATE] 










606 


WRITE 


000714 


1817 






607+ 


LR 


000716 


9404 


1004 


00004 


608+ 


MI 


00071A 


920E 


1005 


00005 


609+ 


MVI 


00071E 


47F0 


B710 


00724 


610+ 


B 


000722 


00AE 






611 + 


DC 


000724 


D201 


1006 B70E 


00006 00722 


612+ 


MVC 


00072A 


41E0 


BB28 


00B3C 


613+ 


LA 


00072E 


50E0 


1008 


00008 


614+ 


ST 


000732 


41E0 


BB72 


00B86 


615+ 


LA 


000736 


50E0 


100C 


OOOOC 


616+ 


ST 


00073A 


4060 


1018 


00018 


617+ 


STH 


00073E 


58F0 


BBSS 


00B6C 


618+ 


L 


000742 


05EF 






619+ 


BALR 


000744 


12FF 






620 


LTR 


000746 


4770 


B90A 


0091E 


621 
622 


BMZ 
WAIT 


00074A 


4110 


7000 


00000 


623+ 


LA 


00074E 


4100 


0001 


00001 


624+ 


LA 


000752 


0A01 






625+ 


SVC 


000754 


957F 


7000 


00000 


626 


CLI 


000758 


4780 


B756 


0076A 


627 


BE 


00075C 


9544 


7000 


00000 


628 


CLI 


000760 


4780 


B6FA 


0070E 


629 


BE 


000764 


41F0 


B750 


00764 


630 


LA 


000768 


07F3 






631 
632 • 


BR 


00076A 


4120 


0001 


00001 


633 FMT1CD 


LA 


00076E 


8B60 


0003 


00003 


634 


SLA 


000772 


4029 


6008 


00008 


635 


STH 


000776 


8A60 


0003 


00003 


636 


SRA 


00077A 


1BFF 






637 


SR 


00077C 


07F3 






638 
639 • 


BR 


00077E 


1B33 






640 PRNTREND 


SR 


000780 


4332 


0019 


00019 


641 


IC 


000784 


1863 






642 


LR 


000786 


8B30 


0003 


00003 


643 


SLA 


00078A 


SB20 


BADO 


00AE4 


644 


S 


00078E 


4133 


9008 


00008 


645 


LA 


000792 


5859 


0004 


00004 


646 


L 


000796 


4A53 


0002 


00002 


647 


AH 


00079A 


957F 


2004 


00004 


648 


CLI 


00079E 


4780 


B79A 


007AE 


649 


BE 


0007A2 


9544 


2004 


00004 


650 


CLI 


0007A6 


4780 


B8FC 


00910 


651 


BE 


0007AA 


47F0 


B90A 


0091E 


652 
653 • 


B 


0007AE 


0203 


3004 2000 


00004 00000 


654 PRNTRNXT 


MVC 


0007B4 


1812 






655 


LR 


0007B6 


4100 


00B8 


0OOB8 


656 

657 


LA 

FREEH 


0007BA 


4111 


0000 


00000 


658+ 


LA 


0007BE 


OJWfc 






659+ 


SVC 


0007C0 


5823 


0004 


00004 


660 


L 



(DECBREG) ,TS,DD3270, 

1, DECBREG 

«(1),« 

5(1), 14 

♦+6 

AL2(FMT1SZ) 

6<2,1),*-2 

14,003270 

14,8(0,1) 

14,FORMAT1 

11,12(0,1) 

RLNREG,24(0,1) 

15,DD3270+48 

14,15 

EPREG, EPREG 

ERRABEND 

ECB- (DECBREG) 

1,0(0, DECBREG) 

0,1(0,0) 

1 

O(DECBREG) ,X'7F' 

FMT1CD 

(DECBREG) ,X*44' 

WRITE 1 

EPREG,* 

ODDREG 



ASM 0200 16.«5 08/09/76 



FORMAT 1,FMT1SZ,, (RLNREG) ,MF-E 

LOAD DECB ADDRESS 



MOVE IN LENGTH 



000B 
OOOB 
000B 



STORE DCB ADDRESS 

OOOB 
STORE AREA ADDR OOOB 
STORE LINE NUMBER 
LOAD RDWRT ROUT ADDR 

A38557 
END IF RC 

NON-ZERO 
WAIT FOR OPERATION TO END 

CLEAR HIGH BYTE OF REG 
COUNT OMITTED, 1 USED 
LINX TO WAIT ROUTINE 
SATISFACTORY COMPLETION 
YES, STORE FORMAT CODE IN ENTRY 
INTERCEPT 

YES, RETRY OPERATION 
SET NON-ZERO RETURN CODE 
AND RETURN TO CALLER 



EVENREG,1 GET FORMAT ID 

RLNREG, 3 CONVERT RLN TO TABLE INDEX 

EVENREG, 8 (TABBASE, RLNREG) STORE ID IN TABLE 

RLNREG, 3 RESTORE RLN REGISTER TO RLN 

EPREG, EPREG SET RETURN CODE -0 

ODDREG RETURN TO CALLER 

ODD REG, ODD REG 

ODDREG, RLN (EVENREG) GET RLN OF ENDING PRINTER 

RLNREG, ODDREG SAVE RLN 

ODDREG, 3 CONVERT RLN TO TABLE INDEX 

EVENREG, FOUR GET BEGIN OF PRINTER RB 

ODDREG, 8 (ODDREG, TABBASE) GET ADDR OF TABLE ENTRY 

INDXR£G,« (TABBASE) GET ADDR OF ECB LIST 

GET ADDR OF PRINTER'S ECB 

GOOD END 

YES, CLEAN UP 

INTERCEPT 

YES, RESTART OPERATION 

NO, END 



INDXREG , 2 (ODDREG) 

4 (EVENREG) ,X'7F' 

PRNTRNXT 

4 (EVENREG) ,X'44' 

WRITEPI 

ERRABEND 



4 (4, ODDREG) ,0 (EVENREG) UPDATE LINK POINTER 

PARMREG, EVENREG ADDRESS OF PRINTER RB 

ZEROREG,184 SIZE OF RB 

(IN R,LV-(0) ,A-(1) FREE BLOCX 

1,0(1,0) CLEAR THE HIGH ORDER BYTE XM4571 

10 ISSUE FREEMAIN SVC P2504 

EVENREG, 4 (ODDREG) GET ADDR OF NEXT RB 



0-18 OS/VS BTAM SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 


ADDR1 ADDR2 


STMT SOURCE 


STATEMENT 




ASM 02 


!00 16.45 


0007C4 1222 






661 


LTR 


EVENREG ,EVENREG 


END OF CHAIN 




0007C6 4770 


B7C8 


007DC 


662 


BNZ 


WRITEP 




NO, START NEXT 




0007CA 4120 


BAD 8 


00AEC 


663 


LA 


EVENREG , DUMMYECB 




XA01560 


0007CE 5025 


0000 


00000 


664 


ST 


EVENREG , (INOXREG) 




XA01560 


000702 0201 


3000 BB60 


00000 00B74 


665 


MVC 


0(2,ODDR£G), 


MINI 


MARX PRINTER AVAILABLE 




0007D8 47F0 


B294 


002A8 


666 

667 • 

668 WRITE? 


B 


TWAIT 




WAIT FOR NEXT COMPLETION 










RESETPL (DEC8REG) 


,ATTENT 


RESET READ INITIAL 




0007DC 






669+WRITEP 


DS 


OH 








0007DC 1817 






67 0+ 


LR 


1 , DECBREG 








0007DE 1B00 






671 + 


SR 


0,0 








0007E0 1BFF 






672+ 


SR 


15,15 








0007E2 4301 


0019 


00019 


673+ 


IC 


0,25(1) 


GET 


RELATIVE LINE NUMBER FROM DECB. 


0007E6 58E1 


0008 


0C008 


674+ 


L 


14,8(1) 


GET 


DCB ADDRESS FROM DECB. 




0007EA 9110 


E030 


00030 


675+ 


TM 


48(14) ,X'10' 




HAS DCB BEEN OPENED? 




0007EE 4710 


B7E6 


007FA 


676+ 


BO 


IECA0033 




IF SO, CONTINUE. 




0007P2 41P0 


000C 


OOOOC 


677+IECJ0033 


LA 


15,12 




IF NOT, SET RETURN CODE 


A28622 


0007F6 47F0 


B89E 


008B2 

007FA 


678+ 
679+IECA0033 


B 
EOU 


IECB0033 

• 




AND EXIT. 




0007FA 58FE 


002C 


0002C 


680+ 


L 


15,44(14) 




GET ADDR OF DEB 




0007FE 41Fr 


0000 


00000 


681 + 


LA 


15,0(15) 




CLEAR HIGH-ORDER BYTE 




000802 8B00 


0002 


00002 


682+ 


SLA 


0,2 




MULTIPLY RLN BY 4 




000806 1AF0 






683+ 


AR 


15,0 




USE RLN* 4 AS INDEX 




000808 58FF 


001C 


0001C 


684+ 


L 


15,28(15) 




TO DEBUCBAD-4 AND GET UCB ADDR 


00080C 9510 


F012 


00012 


685+ 


CLI 


18(15) ,X'10' 




DEVICE CLASS - GRAPHICS 




000810 4770 


B890 


008A4 


686+ 


BNE 


IECO0033 




NO, DEVICE IS NOT ANR 




000814 9501 


1005 


00005 


687+ 


CLI 


5(1) ,X'01' 




IS OPERATION READ INITIAL 




000818 4770 


B888 


0089C 


688+ 


BNE 


IECX0033 




NO, GIVE RC-10 AND EXIT 




00081C 9140 


1000 


00000 


689+ 


TM 


0(1) ,X'40' 




IS THE OPERATION COMPLETE 




000820 4710 


B880 


00894 


690+ 


BO 


IECQ0033 




YES, GIVE RC-tt AND EXIT 




000824 1801 






691 + 


LR 


0,1 




DECB ADDR TO REG C 




000826 181F 






692+ 


LR 


1,15 




UCB ADDR TO REG 1 




000828 41F0 


0004 


00004 


693+ 


LA 


15,4 




ROUTING CODE OF 4 IN REG 15 




00082C 0A74 






694+ 


SVC 


116 




INVOKE ESR TO DO RESET 










695+* TWO LINES OF CODE OELETED BV 


APAR 0X12278 


3XA12278 


00082E 89F0 


0018 


00018 


696+ 


SLL 


15,24 




MAKE SURE THAT ONLY... RH 


SXA06368 


000832 88F0 


0018 


00018 


697+ 


SRL 


15,24 




RC IS IN REG 15 RH 


3XA06368 


000836 4110 


0004 


00004 


698+ 


LA 


1,» 




ESTABLISH COMPARAND 




00083A 19F1 






699+ 


CR 


15,1 




IS RC OR 4 




00083C 4720 


B89E 


008B2 


700+ 


BH 


IECB0033 




RETURN WITH RC 


SXA12278 


000840 40F0 


B898 


008AC 


701 + 
702+* 


STH 


15,IECK00 33 




SAVE RETURN CODE 




000844 581E 


00 1C 


0001C 


703+ 


It 


1,26(14) 




GET I OB BASE FROM DCB 




000848 4111 


0058 


00058 


704*- 


LA 


1,88(1) 




GET ADDR OF FIRST IOB 




00084C S8EE 


002C 


0002C 


705+ 


L 


14,<m(l<i) 




GET DEB ADDR FROM DCB 




000850 1B00 






706 + 


SR 


0,0 








000852 430E 


0010 


00010 


707+ 
708+* 


IC 


0,16(14) 




GET MO. OF EXTENTS FROM DEB 
AND USE AS LOOP COUNTER 




000856 41EE 


0020 


00020 


709+ 

710+» 

711+IECT0033 


LA 


14,32(14) 




GET ADDR OF FIRST DEB UCB PTR 


00085A 9601 


1001 


00001 


OI 


1 (1) ,X'01 ' 




SET RESETPL ISSUED FLAG 




00085E 9101 


101C 


0001C 


712+ 


TM 


28(1) ,X'01 • 




RFT IN PROCRESS 




000862 4710 


B876 


0088A 


713+ 


BO 


IECW00 33 




YES, GIVE RC»0 


3XA12280 


000866 58FE 


0000 


00000 


714-f 


L 


15,0(14) 




GET ADDR OF UCB 




00086A 9120 


F006 


00006 


715+ 


TM 


6(15) ,X'20' 




OUTSTANDING I/O OPERATION 





Appendix O: Local 3270 Sample Program 0-19 



LOCAL 3270 SAMPLE PROGRAM 



LOC 


OBJECT CODE 


ADDR1 AODR2 


STMT SOURCE 


STATEMENT 


ASM 0200 16.45 


00086E 


4710 


B862 


00876 


716+ 


BO 


IECU0033 


YES, KEEP IOB BUSY 


000872 


94BF 


101C 


0001C 


717+ 

718+* 

719+IECU0033 


NI 


28(1) ,X*BF* 


TURN OFF IOB BUSY FLAG 


000876 


4111 


0058 


00058 


LA 


1,88(1) 


STEP TO NEXT IOB 


00087A 


41EE 


0004 


00004 


720+ 


LA 


14,4(1«) 


STEP TO NEXT UCB PTR 


00087E 


4600 


B846 


0085A 


721 + 


BCT 


0,IECT0033 


LOOP IF NOT FINISHED 


000882 


48F0 


B898 


008AC 


722+ 


LH 


1S,IECK0033 


RESTORE RETURN CODE 


000886 


47F0 


B89E 


008B2 


723+ 


B 


IECB0033 


EXIT WITH RC 










724+* SEVEN LINES OF CODE DELETED BY 


APAR 0X12278 3XA12278 










725+* 








00088A 


D701 


B898 0898 


008AC 008AC 


726+IECW0033 


XC 


IECK0033,IECK0033 


SET RC TO ZERO 


000890 


47F0 


B862 


00876 


727+ 
728+* 


B 


IECU00 33 




000894 


41F0 


0004 


00004 


729+IECQ0033 


LA 


15,4 


SET RETURN CODE OF 4 


000898 


47F0 


B89E 


008B2 


730+ 

731 + * 

732+IECX0033 


B 


IECB0033 


AND EXIT 


00089C 


41F0 


0010 


00010 


LA 


15,16 


SET RETURN CODE OF X'10' 


0008AO 


47F0 


B89E 


008B2 


733+ 
734+* 


B 


IECB0033 


AND EXIT 


0008A4 


41F0 


0008 


00008 


735+IECO0033 


LA 


15,8 


INVALID DEVICE, SET RC - 8 


0008A8 


47F0 


B89E 


008B2 


736+ 


B 


IECB0033 


AND EXIT 


0008AC 


0000 






737+IECK0033 


DC 


H'O' SAVE AREA FOR 


WTTA 000G 


0008AE 


0080 






738+IECL0033 


DC 


X'0080' 


FLAG FOR SVC 33 RH 3XA06387 


0008B0 


1BFF 






739+IECE0033 


SR 


15,15 


XA01629 








008B2 


740+IECB0033 


EQU 


• 




0008B2 


12FF 






741 


LTR 


EPRECEPREG 


RC - 


0008B4 


4780 


B8B6 


008CA 


742 


BZ 


WRITEPS 


YES, PROCEED 


0008B8 


59F0 


BAD0 


00AE4 


743 


C 


EP REG, FOUR 


RC - 4 


0008BC 


4770 


B90A 


0091E 


74tt 


BNE 


ERRABEND 


NO, END 










745 


WAIT 


ECB-(DECBREG) 


WAIT FOR READ TO COMPLETE 


0008CO 


4110 


7000 


00000 


746+ 


LA 


1,0(0,DECBREG) 


CLEAR HIGH BYTE OF REG 


0008C4 


4 100 


0001 


00001 


747+ 


LA 


0,1 (0,0) 


COUNT OMITTED, 1 USED 


0008C8 


0A01 






748+ 

749 * 

750 WRITEPS 


SVC 


1 


LINK TO WAIT ROUTINE 


0008CA 


4122 


0004 


00004 


LA 


EVEHREG,4 (EVENREG) 


GET ADDR OF ECB 


0008CE 


S025 


0000 


00000 


751 


ST 


EVEN REG, O(INDXREG) 


STORE ADDR OF ECB IN ECB LIST 


000802 


4132 


0028 


00028 


752 


LA 


ODDREG , 4 (EVENREG) 


GET ADDR OF PRINT BUFFER 










753 


WRITE 


(EVENREG) ,TS,DD3270 


, (ODDREG) ,131,, (RLNREG) ,MF-E 


000806 


1812 






754+ 


LR 


1 , EVEN REG 


LOAD DECB ADDRESS 


0008D8 


9404 


1004 


00004 


755+ 


NI 


4(1), 4 




0008DC 


920E 


1005 


00005 


756+ 


MVI 


5(1) ,14 




0008E0 


41E0 


0083 


00083 


757+ 


LA 


14,131 (0,0) 


000B 


0008EU 


40E0 


1006 


00006 


758+ 


STH 


14,6(0,1) 


STORE LENGTH 00 0B 


0008E8 


41E0 


BB28 


0OB3C 


759+ 


LA 


14.DD3270 




0008EC 


50E0 


1008 


00008 


760+ 


ST 


14,8(0,1) 


STORE DCB ADDRESS 


0008F0 


5030 


100C 


0000C 


761 + 


ST 


ODDREG, 12 (0,1) 


STORE AREA ADDR 00 0B 


0008F4 


4060 


1018 


00018 


762+ 


STH 


RLNR£G,24(0,1) 


STORE LINE NUMBER 


0008F8 


58F0 


BBSS 


0OB6C 


763+ 


L 


15,DD3270+48 


LOAD RDWRT ROUT ADDR 


0008FC 


05EF 






764+ 


BALR 


14,15 


A38557 


0008FE 


12FF 






765 


LTR 


EPREG,EPREC 


END IF RC 


000900 


4770 


B90A 


0091E 


766 


3NZ 


ERRABEND 


NON-ZERO 


000900 


9548 


7000 


00000 


767 


CLI 


O(DECBREG) ,X'48' 


READ INITIAL ENDED BY RESETPL 


000908 


4780 


B25C 


00270 


768 


BE 


REAO 


YES, REISSUE READ 


00090C 


47F0 


B294 


002A8 


769 

770 * 


B 


TWAIT 


NO, CHECX STATUS 



O-20 OS/VS BTAM SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



ADDR1 ADOR2 STMT SOURCE STATEMENT 



000910 D703 2004 2004 00004 00004 
000916 47F0 B7C8 007DC 



00091A 016C61 



00091E 






00091E 


181F 




000920 


4100 


0080 


000924 


8900 


0018 


000928 


1610 




00092A 


0A0D 




00092C 


1B22 




00092E 


1B66 




000930 


95F0 


5000 


000934 


4740 


B96A 


000938 


9 5F9 


5000 


00093C 


4720 


B986 


000940 


8920 


0008 


000944 


4325 


0000 


000948 


4166 


0001 


00094C 


4155 


0001 


000950 


4640 


B91C 


000954 


5960 


BAC8 


000953 


47D0 


B950 


00095C 


5420 


BACC 


000960 


5860 


BAC8 


000964 


5020 


BAC4 


000968 


4130 


0004 


00096C 


1B36 




00096E 


4133 


BAC4 


000972 


0660 




000974 


4460 


B992 


000978 


4F10 


B9CC 


00097C 


07FE 




00097E 


956B 


5000 


000982 


4770 


B986 


000986 


1266 




000988 


4780 


B982 


00098C 


4155 


0001 


000990 


0640 




000992 


47F0 


B940 


000996 


1B11 




000998 


07FE 




00099A 


8920 


0008 


00099E 


4320 


BB62 


00Q9A2 


47F0 


B934 



00080 
00018 



00000 
0097E 
00000 
0099A 
00008 
00000 
00001 
00001 
00930 
00AOC 
00964 
00AE0 
00 ADC 
00AD8 
00004 

00AD8 

009A6 
009E0 



00000 
0099A 



00996 
00001 



00954 



00008 
00B76 
00948 



0009A6 F270 B9CC 3000 009E0 00000 

0009AC 4125 0003 00003 
0009B0 5B40 BAC8 OOADCA 
0009B4 1B66 



771 WRITEPI 
772 

773 • 

774 • 

775 SOHRFT 

776 ERRABEND 
777+ERRABEND 
778+ 

779+ 

780+ 

781 + 

782+ 

783 GETPARM 

784 

78 5 GETCHAR 

786 

787 

788 

789 

790 

791 PARMLOOP 

792 

793 

794 HAVEPARM 

795 

796 

797 

798 CNVRT 

799 

800 

801 

802 

803 

804 

305 

806 * 

807 DELIM 
308 

809 
310 
311 
812 
813 

814 * 

815 ZEROPARM 
316 

817 INVLDCHR 

818 

319 

820 • 

821 PACK 

822 • 

823 GETFIELD 
824 

825 



DC 

ABEND 
DS 
LR 

LA 

SLL 

OR 

SVC 

SR 

SR 

CLI 

BL 

CLI 

BK 

SLL 

IC 

LA 

LA 

BCT 

C 

BNH 

N 

L 

ST 

LA 

SR 

LA 

BCTR 

EX 

CVB 

BR 

CLI 

DME 

LTR 

DZ 

LA 

BCTR 

B 

SR 
BR 

SLL 

IC 

B 



4 (4, EVENREG) ,4 (EVENREG) CLEAR ECB 
WRITEP RESTART WRITE 



X'016C61' 

(15) ,DUMP 

OH 

1,15 

0,128(0,0) 

0,24(0) 

1,0 

13 

EVEN BEG, EVENREG 

CNTR£G,CNTR£G 

O(INDXREG) ,C0' 

DELIM 

O(INDXREG) ,C'9' 

INVLDCHR 

EVENREG, 8 

EVENREG , ( INDXREG) 

CNTREG, 1 (CNTREG) 

INDXREG, 1 (INDXREG) 

LOOP REG, GETCHAR 

CNTREG, THREE 

CNVRT 

EVENREG, SIXFS 

CNTREG, Til REE 

EVEN REG, RAWP ARM 

ODDREG,4 

ODD REG, CNTREG 



RFT HEADER 



ASM 0200 16.45 08/09/76 



3XA11698 



LOAD PARAMETER REG 1 
PICK UP DUMP/STEP CODE XM4571 

SHIFT TO HIGH BYTE 
OR IN WITH COMPCODE 
LINK TO ABEND ROUTINE 
CLEAR REGISTER 



CHARACTER A NUMBER 
NO, CHECK FOR DELIMITER 
MAYBE 

NO, INVALID CHARACTER 
CLEAR LOW CHARACTER 
GET CHARACTER 
INCR LENCTH 
INCR STRING POINTER 
GET NEXT CHARACTER, IF ANY LEFT 
CHECK PARM LENGTH 
BR IF VALID 
REDUCE TO THREE BYTES 
SET COUNT TO THREE 
STORE RAW PARM VALUE 
LENGTH OF RAWPARM 
SUBT LENGTH OF PARM £ 
ODDREG, RAWPARM (ODDREG) GET ADDR OF FIRST CHARACTER 
CNTREG, DECR COUNT FOR EXECUTE 

CNTREG, PACK PACK PARM 

PARMREG,PCKDPARM £ CONVERT TO BINARY 
RETNREG RETURN TO CALLER 



(INDXREG) ,C , ' 

INVLDCHR 

CNTREG, CNTREG 

ZEROPARM 

INDXREG, 1 (INDXREG) 

LOOP REG, 

HAVEPARM 

PARMREG, PARM REG 
RETNREG 
EVENREG , S 
EVEN REG, CO 
PARNLOOP 



COMMA 

NO, TREAT AS INVALID 

PARM OMITTED 

YES, SET IT TO ZERO 

INCR STRING POINTER 

OECR LOOP COUNTER 

BR TO CONVERT PARM 

SET PARM - 

RETURN 

CLEAR LOW CHARACTER 

SUBSTITUTE CO' FOR INVALID CHAR 

3R TO ADJUST COUNTERS t POINTERS 



PACK PCKDPARM(8) ,0(0, ODDREG) 



LA EVENREG, 3 (INDXREG) 

S LOOP REG, Til PEE 

SR CNTREG, CUT REG 



INCR TO FIRST DATA BYTE OF FIELD 
CORRECT LENGTH FOR SBA SEQUENCE 
SET COUNT - ZERO 



Appendix O: Local 3270 Sample Program 0-21 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 

000986 9511 2000 
0009BA 4780 B9B6 
0009BE «H« 0001 
00Q9C2 4122 0001 
0009C6 4640 B9A2 
0009CA 0660 
0009CC 4460 B9C0 
000900 1852 
0009D2 07FE 



ADOR1 ADOR2 STMT SOURCE STATEMENT 



ASM 0200 16.45 08/09/76 



00000 
009CA 
00001 
00001 
009B6 

009 04 



000904 D200 3000 5003 00000 00003 



0009E0 
0009EO 
0009E8 
0009E8 
000A6C 
000AB4 
000AB8 
000ABC 
0O0AC0 
000 AC 4 
000AC8 
000ACC 
0O0ADO 
000AD4 
000AD8 
000 ADC 
OOOAEO 
0OOAE4 
0OOAE8 
0O0AEC 



OOOAPO 



fofofofofofofofo 



oooooorr 

00000001 
00000000 

00000100 
00000082 



00000001 
00000003 

ooffffff 

00000004 
00000000 
00000000 



OOOAPO 0000000000000000 
OOOBOO 00000000 



000B04 00 
00OBO5 000001 
000B08 0000 
OOOBOA 4000 

OOOBOC 00000001 



826 FNDLOOP 

827 

828 

829 

830 

831 MVFLD 

832 

833 

834 

835 • 

836 rLDMOVE 

837 • 
838 

839 PCXDPARM 

840 SYSOUTBF 
841 

842 SAVE 

843 MAXRLN 

844 NODVCS 

845 NOPTRS 

846 TABSIZE 

847 F256 

848 OATASZ 

849 DATBLXSZ 

850 DATBLXAD 

851 RBADRLN 

852 RAWPARM 

853 THREE 

854 SIXFS 

855 POUR 

856 ZEROWRD 

857 DUMMYECB 

858 SYS PRINT 



CLI 

BE 

LA 

LA 

BCT 

BCTR 

EX 

LR 

BR 

MVC 

OS 
DC 
OS 
OS 
OS 
DC 
DC 
DC 
DS 
DC 
DC 
OS 
DS 
DC 
DS 
DC 
DC 
DC 
DC 
DC 
OCB 



860+* 
861+« 
862+SYSPRINT DC 



86 4+* 

866+ 
867+ 

869*« 

871* 
872* 
873* 
874* 

■f 
875* 

877+» 



DC 

DC 



DC 
DC 
DC 
DC 

DC 



O(EVENREG) ,X'11' 
MVFLD 

qitreg,i (qitreg) 
evenreg,1 (evenreg) 
loop reg # fndloop 

CHTREG,0 
CNTREG.FLDMOVE 
XNDXREC, EVEN REG 
RETNREG 



BYTE - SBA ORDER 

YES, MOVE FIELD 

INCR FIELD SIZE 

DtCR TO NEXT DATA BYTE 

LOOP IF MORE DATA 

ADJUST COUNT FOR EXECUTE 

MOVE FIELD INTO DATA AREA 

GET START OF NEXT FIELD 

RETURN 



0(0,ODDREG) ,3(INDXREG) MOVE FIELD FROM BUFFER 

TO DATA AREA 
OD 

8C'0 # 
OD 

CL130 
18F 

F'255' 
F'V 
F'O' 
F 

F'256' 
F'UO* 
F 
F 

F'V 
IF 
F'3' 

XL4' OOFFFFFF' 
F'4' 
F'O' 

F'O' XA01560 

DONAME-SYSPRINT,DSORG«PS ,DEVD-DA,MACRF- (PM) ,RECFM-F,LREC« 
L-130,BLKSI2E-130 



PACXED PARM AREA 
SYSOUT PRINT BUFFER 

SAVE AREA 

MAXIMUM RLN 

NO. OF DEVICES (DEFAULT - 1) 

NO. OF PRINTERS (DEFAULT - 0) 

SIZE OF CONTROL TABLE 

SIZE OF DISPLAY TERM DATA AREA 
SIZE OF DATA AREA CORE BLOCX 
ADDR OF DATA AREA CORE BLOCX 
RLN TO BE USED FOR READ INITIALS 
ZONED PARM AREA 



OF'O' 



BL16'0* 
A(0) 



ALKO) 
AL3<1) 
AL2(0) 



DATA CONTROL BLOCX 

ORIGIN ON WORD BOUNDARY 

DIRECT ACCESS DEVICE INTERFACE 

FDAD # DVTBL 
XEYLE , DEVT .TRBAL 

COMMON ACCESS METHOD INTERFACE 

BUFNO 
BUFCB 



BUFL 



BL2' 01 00000000000000' 
A(1) IOBAD 

FOUNDATION EXTENSION 



DSORG 



0-22 OS/VS BTAM SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 

000810 00 
000B11 000001 
0O0B14 80 

000B1S 000000 



000B18 E2E8E2D7D9C905E3 

000B20 02 

000B21 00 

000B22 0050 



000B24 00 

000B2S 000001 
0O0B28 00000001 
0OOB2C 0000 
000B2E 0082 
000B30 00000000 
000B34 00000001 
000B38 00 
000B39 000001 



000D3C 00000001 
000B40 0000 
000B42 0082 
000B44 00 
0O0BO5 000001 
000B48 00000000 
O00B4C 00000001 



000B50 
000B3C 
000B3C 



000B50 00 
0O0B51 000001 
000B54 0000 
0OOB56 1000 

000B58 00000001 



ADDR1 ADDR2 STMT SOURCE STATEMENT 



00B3C 



00B50 



879+ 
880+ 
881 + 
♦ 
882+ 

884+* 

886+ 
887+ 
688+ 
889+ 



891 + * 

093+ 
+ 
894+ 
C95+ 
896+ 
897+ 
89C+ 
899+ 
900+ 
901 + 

903+» 

905+ 
906* 
907+ 

90 8+ 
909+ 
910+ 

911 + 

912 DD3270 

914+* 

91 5+* 
916+ 

917+DD3270 
913+ 

920+* 

922+ 
923+ 
924+ 
925+ 

♦ 
926+ 



DC 
DC 
DC 

DC 



DC 
DC 
DC 
DC 



DC 

DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



DC 
DC 
DC 
DC 
DC 
DC 
DC 
DCB 



ORG 

DS 

ORG 



DC 
DC 
DC 
DC 

DC 



BLI'OOOOOOOO' 

AL3(1) 

BL1' 10000000' 



ASM 0200 16.45 08/09/76 
BFTEX , BFLN , HI ARCHY 



AL3(0) 



EODAD 



RECFM 

EXLST 



FOUNDATION BLOCK 



CL8'SYSPRINT' 
BL1'00000010' 
BLI'OOOOOOOO' 
BL2 ' 000000000 1 01 0000 ' 



DDMAME 
OFLGS 



MACR 



IFLG 



BSAM-BPAM-QSAM INTERFACE 
BLI'OOOOOOOO' 



AL3(1) 

Ad) 

H'O' 

AL2(130) 

F'O* 

Ad) 

AL1 (0) 

AL3(D 



Ad) 

H'O' 

AL2(130) 

BLI'OOOOOOOO' 

AL3d) 

F'O' 

Ad) 



CHECK, GERR, PERR 
SYNAD 

CIND1, CIND2 

BLKSIZE 

WCPO, WCPL, OFFSR, OFFSW 

IOBA 

NCP 

EOBR, ECBAD 



RER1 



QSAM INTERFACE 



LRECL 



RECAD 
QSWS 

EROPT 
aJTRL 
PRECL 
EOB 



DDNAME-DD3270,DSORG-CX,MACRF-(R,W) ,EROPT-T 
DATA CONTROL BLOCK 



♦-20 

OF'O' 

•+20 



AL1 (0) 
AL3d) 
AL2(0) 



TO ELIMINATE UNUSED SPACE 

ORIGIN ON WORD BOUNDARY 
TO ORIGIN GENERATION 



COMMON ACCESS METHOD INTERFACE 



BUFNO 
BUFCB 



BUFL 



DL2' 0001 000000000000 ' 
Ad) 



DSORG 



ICBAD 



Appendix 0: Local 327 Sample Program 0-2 3 



LOCAL 3 270 SAMPLE PROGRAM 



LOC OBJECT CODE 



000D5C 00 
000B5D 10 
000B5E FF 
000B5F 00 
000BC0 00 

OO0B61 000000 



000B64 C4C4F3F2F7F04043 
000B6C 02 
000BGD 00 
000B6E 2020 



O0OB70 00000000 

000B74 FFFF 

000D76 FO 

000B77 11C1DC 

000B7A 11C17E 

000B7D 11C2E6 

OOOB80 11C34F 

000B83 11C36A 

000B86 C71 14040 

0O0B8A C5D5E3C5D940C4C 

000BA5 1TC150 

0OCBA8 D5C1D4C57A 

000BAD 1D401311C1F71D6O 

0OOBB5 C1CUCUD97A 

000BBA 1D401 1C25F1D60 

000BC1 C3C9E3E87A 

0OOBC6 1D401 1C3C71D60 

000BCD E2E3C1E3C57A 

000BD3 1D4011C3E41D60 

000BDA E9C9D77A 

OOOBDE 1D501 1C36F1D601 * 

000BE8 C5D5E3C5D940D2CS 

OOOBFE 11C5E8 

0OOCO1 D7C1F240D2C5E87A 

000C16 11C650 

000C19 C3D3C5C1D940D2C 



000C34 C7114040 

000C38 C4C1E3C140C7C9ES 

000C51 11C150 

000CS4 D5C1D4C57A 

000C59 1D4013 



ADDR1 ADDP.2 STMT SOURCE STATEMENT 
92S+* 



ASM 0200 16.45 08/09/76 



FOUNDATION EXTENSION 



000AE 



930+ 


DC 


BLTOOOOOOOO' 


931 + 


DC 


BL1 '00010000' 


93 2+ 


DC 


AL1 (255) 


933+ 


DC 


ALKO) 


93U+ 


DC 


BL1 '00000000' 



935+ 



937+* 



DC 



AL3<0) 



BFTEK , BFLN , HIARCHY 
BTAM EROPT CODE 
BTAM BUFFER COUNT 



RECFM 
EXLST 



FOUNDATION BLOCK 



939+ 


DC 


CL8 1 


'DD3270' 


DDNAME 


940+ 


DC 


BL1 


•00000010' 


OFLGS 


9<n + 


DC 


BLT 


'00000000' 




942+ 


DC 


BL2 


'0010000000100000' 





IFLG 



944+* 



946+ 

9«7 

940 

949 

950 

951 

952 

953 

954 

955 

956 

957 

958 

959 

960 

961 

962 

96 3 

964 

965 

966 

967 

968 

969 

970 

971 

972 

973 

974 

975 

976 

977 

978 

979 



MINI 

CO 

FLD1 

FLD2 

FLD3 

FLD4 

FLD5 

FORM ATI 



FMT1SZ 

* 

FORMAT 2 



DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 

DC 
DC 
DC 
DC 
DC 
EQU 

DC 
DC 
DC 

DC 
DC 



MACR 



BTAM INTERFACE 



A(0) 

H'-1 ' 

CO' 

XL3'11C1D6' 

XL3•11C17E• 

XL3'11C2E6' 

XL3'11C34F« 

XL3'11C36A' 

X'C7114040' 

CENTER DATA REQUESTED BELOW:' 



LERB 
FREE PRINTER FORMAT ID 



SBA SEQ OF FIRST FIELD { SBA - 86) 
SBA SEQ OF SECOND FIELD ( SBA -126) 
SBA SEQ OF THIRD FIELD ( SBA -166) 
SBA SEQ OF FOURTH FIELD (SBA -207) 
SBA SEQ OF FIFTH FIELD ( SBA -234) 
WCC, SBA - 



SBA - 80 



UNPROT, IC, 
UNPROT, SBA 



X'11C150' 
C ' NAME : ' 

X'1D401311C1F71D60' SF - 
C'ADDR: ' 

X'1D4011C25F1D60' SF - 
C'CITYs ' 

X'1D4011C3C71D60' SF - 
C ' STATE : ' 

X'1D4011C3E41D60' SF - 
C'ZIP:' 
X'1D5011C36F1D6011C540' 

SBA- 320 
CENTER KEY: ENTER DATA; ' 
X'11C5E8' SBA - 360 

CPA2 KEY: END PROGRAM;' 
X'11C650' SBA - 400 

C CLEAR KEY: CONTROL OPTIONS.' 
•-FORMAT1 

X'C71 14040' WCC, SBA - 

CDATA GIVEN BELOW ENTERED:' 
XM 1C150' SBA - 80 

CNAME: ' 
XMD4013' SF-UNPROT, IC 



SBA-119, SF-PROT 
- 159, SF - PROT 
UNPROT, SBA-199, SF-PROT 
UNPROT, SBA-228, SF-PROT 
SF-UNPROT, SBA-239, SF-PROT, 



0-2 4 OS/VS BTAM SRL 



LOCAL 3270 SAMPLE PROGRAM 



LOC OBJECT CODE 



ADDR1 AODR2 STMT SOURCE STATEMENT 



ASM 0200 H.45 08/09/76 



000CSC 0000000000000000 
000C7O 1D60 
000C7F C1C4C4D97A 
0O0C84 1D40 

000C86 0000000000000000 
0OOCA7 1D60 
0OOCA9 C3C9E3E87A 
0OOCAE 1D40 

OOOCBO 0000000000000000 
000CD1 1D60 
000CD3 E2E3C1E3CS7A 
000CD9 1040 

000COB 0000000000000000 
OOOCFO 1D60 
0OOCF2 E9C9077A 
000CF6 1OS0 



000CF8 


0000000000 


000CFO 


1D6011CS40 


000D02 


C5D5E3C5D940D2C5 


000019 


11CSE8 


000O1C 


D7C1F140D2C5E87A 


000030 


11C650 


000033 


O7C1F240O2CSE87A 


000O48 


11C6F8 


000O4B 


C3O3CSC1O940D2CS 


000066 


C71 140401 3 


000D6B 


E7E7E8E8F3C3E4EU 


0OOD73 


11C1S0 


000D76 


C5D5E3C5O940D2C5 


000095 


11C1F8 


000098 


O7C1F140O2C5E87A 


000OB1 


11C260 


000OB4 


D7C1F240D2C5E87A 


000OC9 


11C3F0 


000OCC 


E3O640O9C5D8E4CS 


000004 


E2E340C2E3C1O440 


000E1O 


E7E77LE3C5E2E340 


000E44 


40C3E4EH7EC1C4C4 


000E61 


11C6D1 


00OE64 


E3C8CSDS40C8C9E3 


000E6C 


40CSD9C1E2CS40CS 



00028 



00052 



0007C 



000A7 



000C4 



00132 



OOOEAE C711C17D 

000EB2 D3O6C3C1O340F3F2 



00148 



00024 



980 
981 
982 
983 

984 
985 

986 

987 

988 

989 

990 

991 

992 

993 

994 

995 

996 

997 

998 

999 

1000 

1001 

1002 

1003 

1004 

1005 

1006 

1007 

1008 

1009 

1010 

1011 

1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 

1021 

1022 
1023 
1024 
1025 



FMT2FLD1 



FMT2FLD2 



FMT2FLD3 



FMT2FLD4 



FMT2FLD5 



FMT2SZ 
FORMAT 3 



EQU 

DC 

DC 

DC 

DC 

EQU 

DC 

DC 

DC 

DC 

EQU 

DC 

DC 

DC 

DC 

EQU 

DC 

DC 

DC 

DC 

EQU 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

EQU 

DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 

DC 
DC 
DC 

DC 

EC5U 



1026 FMT3SZ 

1027 * 

1028 FORMAT4 DC 

1029 DC 

1030 FKT4SZ EQU 

1031 • 

1032 • 



•-FORMAT2 

XL33'0' 

XMD60' 

C'ADDRi' 

X , 1D40" 

•-FORMAT2 

XL33'0' 

X'1D60' 

CCITY:' 

X'1D40' 

•-FORMAT2 

XL33'0' 

X'1D60' 

CSTATE:' 

XMD40' 

•-FORMAT2 

XL21'0' 

X'1D60' 

CZIP: ' 

XMD50' 

•-FORMAT2 

XL5'0' 

X , 1D6011C540 , 



DATA FIELD 1 
SF ■ PROT 



SF- UNPROT 



DATA FIELD 
SF ■ PROT 



SF - UNPROT 



DATA FIELD 3 
SF - PROT 



SF - UNPROT 



SF - PROT 



SF - UNPROT, NUM ONLY 



SF - PROT, SBA - 320 



CENTER KEY j UPDATE DATA)' 
XM1C5E8' SBA - 360 

CPA1 KEY » PRINT DATA; ' 
X'11C650' SBA - 400 

CPA2 KEY: END PROGRAM! ' 
X'11C6F8' SBA - 4«0 

C CLEAR KEY« CONTROL OPTIONS.' 
•-FORMAT2 

X'C71140tt013' WCC, SBA -0, IC 

CXXYY3CUU' 

X'11C150' SBA - 80 

CENTER KEY: RESUME AND CONTINUE;' 

XM1C1F8' SBA « 120 

CPA1 KEY i BEGIN NEW ENTRY; ' 

XM1C260' SBA - 160 

CPA2 KEY: END PROGRAM;' 

X'11C3F0' SBA - 240 

CTC REQUEST BTAM OLT — ENTER REQUEST FOR TEST MESSAGE • 

OVER SAMPLE FORMAT ABOVE: ' 

CXX-TEST NO. (23-28) YY-REPEATS (01-99)' 

C CUU-ADDRESS OF TARGET DEVICE' 

X'11C6D1' SBA ■ 401 

CTHEN HIT ERASE EOF AND THEN TEST REQ. USE CLEAR KEY T« 

RESUME AFTER TEST.' 

•-FORMAT 3 

X'C711C17D' WCC, SBA - 125 

CLOCAL 3270 SAMPLE PROGRAM ENDED.' 
•-FORMAT 4 



Appendix 0: Local 327 Sample Program 0-2 5 



LOCAL 3270 SAMPLE PROGRAM 



LOC 


OBJECT CODE ADDR1 ADDR2 STMT SOURCE 


STATEMENT 








1033 • 






0123456789ABCDEF 




000ED2 


4040404040404040 


1034 FLOXLATE 


DC 


c 


• 





0O0EE2 


4040404040404040 


1035 


DC 


c 


i 


1 


000EF2 


4040404040404040 


1036 


DC 


C f 


i 


2 


000F02 


40110404040404040 


1037 


DC 


c» 


i 


3 


000F12 


4040404040404040 


1030 


DC 


c 


I. (+1' 


4 


O00F22 


5040404040404040 


1039 


DC 


c 


«C 1$*);] 


• 5 


000F32 


6061404040404040 


1040 


DC 


c 


-/ ,S i?' 


6 


000FU2 


4040404040404040 


1041 


DC 


c 


:#a T '-" 


• 7 


000F52 


40C1C2C3C4C5CSC7 


1042 


DC 


c 


ABCDEFGni- • 


8 


0OOF62 


4CD1D2D3D4D5D6D7 


1043 


DC 


c 


JKLMIJOPQR • 


9 


000F72 


4040E2E3E4E5E6E7 


1044 


DC 


c* 


STtJVWXYZ ' 


A 


000FC2 


4040404040404040 


1045 


DC 


c 


• 


B 


000F92 


40C1C2C3C4C5CGC7 


1046 


DC 


c 


ABCDEFGHI • 


C 


000FA2 


40D1D2D3D4D5D6D7 


1047 


DC 


c 


JKLMNOPOR ' 


D 


000FB2 


4040E2E3E4E5E6E7 


1048 


DC 


c 


STUVWXYZ • 


E 


000FC2 


F0F1F2F3F4F5F6F7 


1049 
1050 * 
1051 


DC 
DID 


c 


01234S6789 • 
0123456789ABCDEF 


F 



ASM 020C 16.45 08/09/76 



0-26 OS/VS BTAM SRL 



POS.ID REX.. ID FLAGS ADDRESS 

0001 0001 08 0001C1 

0001 0001 08 0001CS 

0001 0001 08 0003EO 

0001 0001. 08 0003F1 



RELOCATION DICTIONARY 



ASM 0200 1C.4S 08/09/76 



Appendix 0: Local 3270 Sample Program 0-27 



CROSS-REFERENCE 



SYMBOL LEN VALUE DEFN 

BASEREG 00001 0000000B 00002 

BASEREG2 00001 0000000A 00041 

BUFREG 00001 00000008 00039 

CLRLOOP 00004 000000B8 00113 

CLRMOVE 00006 000000E0 00125 

CLR1 00004 00000426 00391 

CNTREG 00001 00000006 00034 



CNTRLMSG 

CNVRT 

COUNT 

CO 

DATASZ 

DATBLXAD 

DATBLXSZ 

DO3270 



00002 
00004 
00001 
00001 
00004 
00004 
00004 
00004 



0000042E 
00000964 
00000012 
OO0OOB76 
00000AC8 
00000AD0 
00000ACC 
OO0OOB3C 



00395 
00798 
0004 8 
0094C 
00648 
00850 
00849 
00917 



OECBREG 00001 00000007 00037 



DEFAULTS 

DELIM 

DFLTNO 

DFLTPTR 

DFLTRLN 

DISPECB 

DSPLY1 

DUMMYECB 

ENDLZST 

ENDMSG 

ENT1 

EPREG 



00004 
00004 
00002 
00004 
00002 
00004 
00004 
00004 
00002 
00002 
00004 
00001 



00000068 
0000097E 
00000052 
00000068 
00000128 
000001A6 
0000026C 
00000AEC 
00OOO0F2 
00000334 
00000496 
00O000OF 



00089 
00807 
00079 
00090 
00148 
00186 
00239 
00857 
00132 
00305 
00427 
00045 



ERRABEND 00002 0000091E 00777 
EVENREG 00001 00000002 00030 



FINDFRST 

FININIT 

FLDMOVE 

FLOXLATE 

FLD1 

FLD2 

FL02CHK 

FLO 3 

FL03CHX 

FLO 4 

FL04CHX 

FL05 

FL05CHK 

FMT1CO 



00006 
00004 
00006 
00016 
00003 
00003 
00004 
00003 
00004 
00003 
00004 
00003 
00004 
00004 



00000252 
00000136 
00000904 
00000EO2 
0OOOOB77 
00000B7A 
000004D2 
00000B7D 
000004F0 
00000B80 
0000050E 
0O0OOB83 
0000052C 
0000076A 



00233 
00154 
00836 
01034 
00949 
00950 
00444 
00951 
00452 
00952 
00460 
00953 
00468 
00633 



REFE 
00057 
00058 
00209 
00585 
00118 
00122 
00302 
00035 
00791 
00594 
00795 
00432 
00818 
00157 
00163 
00159 
00197 
00759 
00208 
00423 
00767 
00069 
00786 
00073 
00080 
00133 
00181 
00234 
00182 
00136 
00592 
00392 
00213 
00620 
00256 
00062 
00182 
00307 
00633 
00751 
00829 
00237 
00131 
00832 
00577 
00437 
00445 
00438 
00453 
00446 
00461 
00454 
00469 
00462 
00627 



RENCES 
000S8 
00059 
00251 
00587 



00166 
00791 



00174 
00 371 
00372 
00249 
00763 
00242 
00489 



00075 
00084 



00663 
00138 



00217 
0OC30 
00287 
00063 
00183 
00398 
00635 
00752 
00829 

00149 



ASM 0200 16.4S 08/09/76 
00059 

00060 00060 

00301 00391 00427 00430 00478 00479 00484 00485 00486 00487 00488 004 
00S89 00591 00593 



00166 00172 00189 00230 00235 00235 00238 00239 00291 00292 00293 007 
00794 00797 00C00 00802 00803 00809 00809 00825 00825 00828 00828 008 



00253 00311 00341 00346 00369 00408 00413 00497 00501 00562 00566 006 

00242 00244 00333 00333 00335 00351 00354 00356 00400 00400 00402 004 
00489 00491 00506 00509 00511 00605 00605 00607 00623 00626 00628 006 



00218 00218 00255 00255 00348 00348 00415 00415 00503 

00637 00637 00741 00741 00743 00765 00765 

00294 00349 00358 0041C 00425 00504 00S13 00600 00621 

00064 00087 00092 00095 00103 00110 00112 00115 00115 

00223 00224 00224 00225 00277 00282 00284 00286 00288 

00399 00432 00481 00482 00517 00518 00519 00530 00545 

00641 00644 00648 00650 00654 00655 00660 00661 00661 

00754 00771 00771 00783 00783 00789 00790 00796 00798 
00833 



00503 00599 005 

00652 00744 007 
00116 00116 001 
00307 00308 003 
00570 00596 005 
00663 00664 007 
00817 00818 008 



0-2 8 OS/VS BTAM SRL 



CROSS-REFERENCE 



SYMBOL 

FMT1SZ 

FMT2FLD1 

FMT2F1D2 

FMT2FLD3 

FMT2FLD4 

FMT2FLD5 

FMT2SZ 

FMT3SZ 

FMT4SZ 

FNDLOOP 

FORMAT 1 

FORMAT2 

FORMAT3 

FORMAT « 

FOUR 

F256 

GETCHAR 

GETFIELD 

GETPARM 

GETPTRS 

GETTAB 

HAVEPARM 

ZECA0008 

IECA0010 

IECA0033 

ZECS0008 

IECB0010 

IEC80033 

ZECC0008 

XECO0008 

IECK0033 

IECO0033 

IECQ0033 

IECT0033 

IECU0033 

IECW0033 

IECX0033 

IIIB0005A 

INCRPTRS 

INDXREC 



I*IDXREG2 

IMITLOOP 

INITrTR 

INV10CHR 

JOIN XT 

IOLOOP 

XOLPCl.'T 

LASTMOVE 

LOOP REG 



LEN 
00001 
00001 
00001 
00001 
00001 
00001 
00001 
00001 
00001 
00004 
00000 
00004 
00005 
00004 
00004 
00004 
00004 
00004 
00002 
00002 
00004 
00004 
00001 
00004 
00001 
00004 
00001 
00001 
00004 
00002 
00002 
00004 
00004 
00004 
00004 

ooooc 

00004 
00002 
00004 
00001 



00001 
00006 
00004 
00004 
00004 
00004 
00004 
00002 
00001 



VALUE 
000000AE 
00000028 
00000052 
0000007C 
000000A7 
0O0O00C4 
00000132 
00000148 
00000024 
000009B6 
00000B86 
0000OC34 
0OOO0D66 
0OO0OEAE 
00000AE4 
0O0OOAC4 
00000930 
000009AC 
0000092C 
000000E6 
00000068 
00000954 
000002AC 
00000380 
000007FA 
00000232 
00000384 
000008B2 
000002E2 
000002CE 
000008AC 
000008A4 
00000894 
0000085A 
0000087C 
0000088A 
0000089C 
000001F6 
0000017C 
00000005 



0000000C 
00000160 
0000010A 
0000099A 
0000013C 
0000020C 
000O023A 
000000DC 
00000004 



DEFN 

00973 

00980 

00985 

00990 

00995 

01000 

01010 

01026 

01030 

00826 

00954 

00975 

01012 

01028 

00855 

00847 

00785 

00823 

00783 

00128 

00087 

00794 

002C0 

00330 

00C79 

00263 

00331 

00740 

00277 

00270 

00737 

00735 

00729 

00711 

00719 

00726 

00732 

00205 

00175 

00C33 



00033 
00169 
00139 

ooei7 

00193 
00213 
00226 
00121 
00032 



REFERENCES 
00611 
00484 
00485 
00486 
00487 
00488 

00479 00495 
00406 
00339 
00830 

00615 00973 
00478 00479 
00410 01026 
00343 01030 
00644 00743 
00113 00117 
00793 

00440 00448 
00071 00002 
00119 00123 
000C9 00090 
00013 
00276 

00317 00323 
00676 
00269 
00329 

0067C 00700 
00265 
00267 

00701 00722 
0060C 
00G90 
00721 

00716 00727 
00713 
C0G88 
00201 
00190 

00070 00164 
00227 00231 
00551 00552 
00G11 00C11 
00129 00129 
00177 
00151 

007C0 00000 
001C8 
00228 
00221 
00114 
000C7 
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00980 00985 00990 00995 01000 01010 



00456 00464 00472 
00134 



00723 00730 00733 00736 
00726 0072C 



00171 00171 00173 00174 00179 00180 00180 00185 00210 00214 00220 002 

00233 00236 00236 00430 00437 00445 00453 00461 00469 00530 00532 005 

00553 00570 00571 00646 00647 00664 00751 00785 00787 00790 00792 007 

00823 00833 00836 

00142 00143 00143 00165 00169 00172 00173 00175 00175 



00068 0006S 00078 00078 90132 00132 00155 00177 00207 00228 00232 00237 004 

00433 00434 00434 00441 00441 00449 00449 00457 00457 00465 00465 00529 00531 005 

00534 00535 00536 00537 00564 00793 00812 00824 00830 

LOOPREG2 00001 00000007 00036 00128 00128 00130 00144 00144 00148 00148 00167 00176 00176 00189 



Appendix O: Local 3270 Sample Program 0-29 



CROSS-REFERENCE 



SYMBOL 


LEN 


VALUE 


DEFN 


MAXRLN 


00004 


00OOOAB4 


00643 


MINI 


00002 


00000B74 


00947 


MVFLD 


00002 


000009CA 


00C31 


NODVCS 


oooou 


OOOO0AB0 


00844 


NOPTRS 


00004 


00000AEC 


0084S 


OODREC 


00001 


00000003 


00031 



PACK 00006 000009A6 00C21 
PARMLOOP 00004 00000948 00791 
PARMREC 00001 00000001 00029 



PARI! 2 

PCKDrARM 

POLPT 

PRNTREND 

PRNTRNXT 

PTRECB 

PTRINIT 

PTRLOOP 

QCNTSTR 

QUIESCE 

RAV7PARM 

READ 

READFMT1 

READFMT2 

READFMT3 

READRLN 

READRTN 

RETNREG 

RLN 

RLNREC 

RSTRKYBD 

SAVE 

SAVE REG 

SIXFS 

SOHRFT 

STRTPRTR 

SYSOUT 

SYSOUTBF 

SYSPRINT 

TABBASE 



TABSIZE 

THREE 

TWAIT 

TYPE 

UPCOUNT 



00002 
00001 
00001 
00002 
00006 
00004 
00002 
00004 
00004 
00004 
00004 
00004 
00004 
00004 
00004 
00004 
00004 
00001 
00001 
00001 

00002 
00004 
00001 
00004 
00003 
00004 
00004 
00008 
00004 
00001 



00000052 
000009EO 
00000024 
0000077E 
000007AE 
0000019A 
000001B4 
O0000OEA 
00000U1E 
000003OE 
00000ADC 
00000270 
0000032C 
000005D6 
000006CC 
00000AD4 
00000318 
00000OOE 
00000019 
00000006 

00000642 
00000A6C 
OOOOOOOD 
0O0OOAE0 
0000091A 
0000064C 
00000692 
000009E8 
00000AF0 
00000009 



0007E 
00G39 
00050 
00640 
00C54 
00183 
00189 
00130 
00387 
00361 
00C52 
00241 
00301 
00515 

ooses 

00051 
00294 
00044 
00049 
00035 

00545 
00842 
00043 
00854 
00775 
00549 
00570 
00840 
00862 
00040 



00004 OOOOOACO 00C46 

00004 00000ADC 00853 

00004 000002A8 00257 

00001 00000005 00047 

00004 0000022E 00223 



REFERENCES 
00074 

00141 00169 
00027 

0007C 00083 
000C5 00093 
0006C 00067 
00439 00439 
00468 00471 
00542 00544 
00645 00647 
00803 
00C19 

OOOf.C 00072 
0010C 0C110 
00154 6C155 
00304 0C3O6 
00529 00543 
00079 

0OC0H 00021 
002C0 
00283 
00649 
00185 
00170 
00145 
00362 
00355 

00798 00001 
00285 00298 
00295 005U 
00296 
00297 

00239 00241 
00293 

00071 00082 
00641 

00211 00216 
00604 00617 
0056C 00503 
00061 00062 
00061 00063 
00796 
00587 
00541 
00521 

00571 00572 
00195 00367 
00100 00101 
00209 00210 
00519 00530 
00096 00377 
00433 00794 
00666 00769 
00282 
00215 00219 



ASM 0200 16.45 08/09/76 



00214 00233 00540 00665 



00087 00101 
00130 00156 
00070 00093 
00444 00444 
00471 00483 
00549 00552 
006S4 00660 



00207 00232 



00137 00154 

00179 

00094 00095 00105 00110 00257 00261 00289 00290 00291 004 

00447 00447 00452 00452 00455 00455 00460 00460 00463 004 

00484 00485 00486 00487 00488 00519 00S20 00520 00522 005 

00555 00596 00603 00631 00638 00640 00640 00641 00642 006 

00665 00752 00761 00799 00800 00801 00801 00821 00836 



00072 00074 00076 00083 
00113 00117 00121 00122 
00156 00150 00163 00164 
00300 00371 00376 00394 
00544 00545 00546 00549 



00085 00100 00103 00104 00105 00105 00106 001 
00135 00135 00137 00139 00140 00140 00141 001 
00178 00183 00184 00184 00186 00187 00216 002 
00397 00399 00475 00480 00482 00483 00517 005 
00550 00550 00553 00557 00604 00655 00804 008 



00383 00422 00428 00510 00586 00588 00601 00768 



00134 00217 00440 00448 00456 00464 00472 00598 00603 00805 00816 008 



00226 00226 00241 00252 
00634 00635 00636 00642 



00381 
00064 00381 



00573 00574 00575 00576 00577 00580 

00579 

00102 00102 00103 00104 

00223 00225 00231 00257 

00539 00542 00544 00549 00551 



00304 00319 00345 00394 00412 00475 00500 005 
00762 



00106 00108 00111 00112 00140 00165 00178 001 

00291 00308 00361 00376 00387 00399 00429 004 

00552 00555 00570 00596 00635 00645 006 



00797 00824 



O-30 OS/VS BTAM SRL 



CROSS-REFERENCE 



SYMBOL LEN VALUE DEFH 

WRITEP 00002 000007OC 006C9 

WRITEPI 00006 00000910 00771 

WRITEPS 00000 000008CA 00750 

WRZTE1 00006 0000070E 0060S 

WRZTE2 00006 00000580 00489 

WRITE3 00006 0000043C 00400 

WRITE4 00006 00000384 00333 

WRTFMT1 00002 0000070A 00603 

WRTFMT2 00002 00000544 00475 

WRTFMT3 00002 0000042E 00394 

WRTFMT4 00002 00000334 00304 

V7RTRSPNS 00002 00000544 00476 

ZEROPARM 00002 00000996 00815 

ZEROREG 00001 00000000 00028 



REFERENCES 
00662 00772 
00601 
00742 
00629 
00512 
00424 
00357 

00213 0059C 
00476 
00395 
00305 

00435 00442 00450 0045C 00466 00470 00547 00590 
00810 
00095 00096 00157 00158 00159 00372 00377 00524 00539 00540 00554 00555 00656 



ASM 0200 16.45 08/09/76 
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ASSEMBLER DIAGNOSTICS AND STATISTICS 

ASM 0200 16. »5 08/09/76 

NO STATEMENTS FLAGGED IN THIS ASSEMBLY 

HIGHEST SEVERITY WAS 

OPTIONS FOR THIS ASSEMBLY 

ALIGN, ALOGIC, BUFSIZE(STD) , DECK, ESD, FLAG(0), LINECOUIJT(55) , LIST, NOMCALL, YFLAG 
NOMLOGIC, NONUMBER, ClOOBJECT, NORENT, RLD, IIOSTnT, JIOLIBMAC, NOTERMINAL, NOTEST, XREF (SHORT) 
SYSPARMO 

WORK FILE BUFFER SIZE - 7294 

TOTAL RECORDS READ FROM SYSTEM IUPUT 702 

TOTAL RECORDS READ FROM SYSTEM LIBRARY 7C51 

TOTAL RECORDS PUNCHED 76 

TOTAL RECORDS PRINTED 1313 



0-32 OS/VS BTAM SRL 



APPENDIX P: REMOTE 3270 SAMPLE PROGRAM 



The remote 3270 sample program, which exercises the remote 3270 display 
system, is distibuted as a member of SYSl.SAMPLIB named SAMP327R. This 
PDS member contains (in the form of 80-character card images) all the 
source statements for the sample program and all the JCL needed to 
assemble, link-edit, and execute the program: 

//SAMP327R JOB BTAM,MSGLEVEL=1 
// EXEC ASMFCLG 
//ASM. SYS IN DD * 



Source Code 



/* 

//GO.DD3270 DD UNIT=address of BSC line 

//GO.SYSABEND DD SYSOUT=A 

/* 

Before assembling the program, supply the address of the BSC line in the 
270X control unit as the UNIT parameter in the //GO.DD3270 DD card. 
Place the card in the card reader, and perform the assemble, link-edit, 
and go procedure. The messages and instructions that appear on the 
screen of the display station are self-explanatory. 



Appendix P: Remote 3270 Sample Program P-l 



LOC OBJECT COOe AOOR1 AOOR2 STMT SOURCE STATEMENT ASM 0200 II .0* 06/07/76 

000000 I SANP327R CSECT * 



3 • THIS tS A SAMPLE PROGRAM FOR A REMOTE 3270 INFORMATION 1 SRC »V 
A • SYSTEM. PLEASE NOTE THAT THIS RROSRAM MAS BEEN WRITTEN FOR TWO 

9 • 3270 OEVICES. BOTH OF WHICH MUST 8E 3277 DISPLAYS. 

« • 

7 • THIS PROGRAM IS SET UP FOR AN ASSEMBLE* LlNKEfWT ANO SO . 

A • THE OO3270 00 CARD WILL HAVE TO BE CHANCED TO REFLECT THE 

4 • AOORESS OR THE BSC LINE IN THE TRANSMISSION CONTROL UNIT . 

10 • 

11 • !T MAT BE NECESSARY TO ALTER THIS SAMPLE PROBLEM SO THAT IT 

12 • WAY FUNCTION WITH MORE THAN TWO OEVICES. TO DO SO. THE FOLLOW INC 

13 • CARDS MUST BE CM AN CEO IN THE SOURCE DECK: 

I A • I. ORTRMLST MACROS (SELOSPLVI 

15 • ISPECPOLI 

16 • 

17 • THIS SAMPLE PROGRAM IS RESTRICTED TO A NAXtMIM OF 32 DEVICES. 
IK • ALL OF WHICH MUST BE ATTACHED TO ONE REMOTE 1271 CONTROL UNIT. 

|« ••••••••••••••••• * PARS FIXED •••••••••••••••••••••••••••••••••••••• 

20 • 0XI2R69 

21 • 0X12^70 

22 • 0XI36R2 

21 ••«•••••••••••••*«•••••••••*•••••••••••«•*•••«•••■••«•••••••••••«•••• 



P-2 OS/VS BTAM SRL 



loc object cooe 



AOOR1 AOOR2 STMT SOURCE STATEMENT 



ASM 0200 II. OT 06/07/76 





23 


• 


register equates 


00000 


26 


reczero 


EOU 





00002 


27 


REG2 


eou 


? 


00003 


28 


•OeKRPG 


sou 


3 


3000* 


24 


MSGAOOR 


eou 


« 


00005 


30 


MSGLEN 


EOU 


S 


00006 


31 


selrec 


EOU 


6 


30006 


32 


PMTREG 


EOU 


« 


0000* 


31 


OSPTABRG 


EOU 


9 


0000* 


34 


LNKCEG 


EOU 


to 


oooon 


39 


BA«EREG 


EOU 


11 


ooooc 


se 


e*seftCG2 


EOU 


12 


ooooo 


37 


PTRTAB 


EOU 


13 


OOOOF 


18 


RTNCORQ 


EOU 


IS 



REGISTER 
■ORK REGISTER 
WORK REGISTER 
AOOR OF OUTRUT MESSAGE 
LENGTH or OUTPUT MESSAGE 
SPEC POLL AOOR OP 3270 01 SPLAY 
FORMAT IDENTIFIER 
AOORESS OP Ot SPLAY TABUS 
LINKAGE REGISTER 
FIRST BASE PEG 
SENONO BASE REG 
PRINTER RUM TABLE AOORESS 
RETURN COOE REGISTER 





• 


• 


EOUATES 


00000 


*l 


ZERO 


EOU 





00001 


42 


ONE 


EOU 


1 


00002 


• 3 


TwC 


EOU 


2 


00003 


«« 


THREE 


EOU 


3 


0000* 


«s 


POUR 


EOU 


« 


00Q0S 


«6 


FIVE 


EOU 


S 


00006 


• 7 


St ■ 


EOU 


6 


OOOOA 


*P 


TP06 


EOU 


6 


00007 


** 


SEVEN 


EOU 


7 


0000"* 


SO 


EIGHT 


EOU 


a 


000 tl 


SI 


TPIt 


EOU 


*• 11 ' 


00010 


s? 


St »TN 


EOU 


16 


00020 


■ j 


TP20 


EOU 


X«20 


0001 A 


9* 


TWENTY* 


EOU 


2* 


oootc 


SS 


TWENTY* 


EOU 


28 


00001 


«6 


TIMEOUT 


EOU 


X«01 


00010 


■7 


SSFSG 


EOU 


x« 10 


000*0 


se 


ECIRSPTX 


EOU 


x«*o 


000*0 


8* 


EOTRCVO 


EOU 


X»*0 


000*1 


60 


FOURTY1 


EOU 


X«*l 


000AC 


M 


PAt 


EOU 


X»6C 


00060 


62 


CLEAR 


EOU 


X»60 


0006E 


6J 


PA2 


EOU 


X«6E 


00070 


e* 


ENTER 


EOU 


X«70 


ooo rw 


6S 


SE"VENF 


EOU 


X'TF 


00080 


66 


LAST 


EOU 


X«80 



LENGTH OF 3 
LENGTH OF I 
LENGTH OF 2 
LENGTH OF * 
FORMAT I tOENTtFtER 
LENGTH OF TERMINAL LIST ENTRIES 
LENGTH OF 6 
TP COOE OF 6 
LENGTH OF 7 
FORMAT ■» IDENTIFIER 
TP COOE OF I 1 
LENGTH IF 16 

LENGTH OF 2* 

LENGTH OF 28 

OECB TIME OUT Fl »G 

SENSE/STATUS RECEIVED FLAG 

EOT RESPONSE TO TEXT 

EOT RECEIVEO FLAG 

I/O ERROR COMP COOE 

ATTENTION ID FOR PAI KEY 

ATTENTION ID FOR CLEAR KEY 

ATTENTION 10 FOR PA2 (CNCLI KEY 

ATTENTION IO FOR ENTER KEY 

NORMAL COMPLETION COOE 

SIGNIFIES ENO OF POLLING LIST 



Appendix P: Remote 32 70 Sample Program P-3 



LOC OBJECT CODE 



4DOPI AOOP? STMT 



!OU»CE STATEMENT 



ASM 0?00 11.07 06/07/76 



O0000O 

000000 ooec oooc ooooc 

00000* 05BO 

000006 l«B 

000008 *ACO 973C 007*2 

OOOOOC 5000 3F*6 OOF*C 

ooopio *ioo a**? oof*s 

00001* *TFO *)0«6 000*C 

00001 « E?C10*OTF3F?F7'><» 
000020 «3*7 

0000?? F0F66tF0F76|F7Fis 

00002A 80?4 

00002C OOOOOOOOOOOOOOOO 

00004C 



00004C 

00004C 4510 104E 00054 

000050 80 

000051 O0OF80 
000054 0*1 3 

000056 -»l I RFAA OOFRO 

30005* 4713 "5074 0007* 

oooose 0700 

*00060 »S10 30<SE 0007* 

00006* 1010 

000066 0000 

000068 06O7C5O540C6CIC9 

00007* 

000074 0A?3 

000076 47F0 82FF. 1030* 

00007* 4190 87«? 007*8 

00007F *I60 8712 00718 



69 


save 


( 14.121 






«♦ 


05 


OM 






70» 


STM 


14. I2.l?< 111 


SAVE PEG! STEPS 


71 


8 ALU 


EASFREG.O 


FSTABL ISM 




72 


USING 


•,8ASEPEG.BA3e9EG2 


A0 0PESSA9ILITT 




7? 


L» 


8ASSPEG2.84SEPEG 


INI Tl ALI 2E 




7* 


AM 


eASE»EG2 ,H*0«»A 


SECONO 8ASE 




75 


ST 


I3.SAVE»4 






76 


LA 


13. SAVE 






77 


8 


BEGIN 


BPANCM APOUNO PATCM 


»XA 1 369? 


78 


OC 


CL8'«AMP32TP' 


EYECATCME9 


•XAI3692 


79 


oc 


XL2* 4l47t 


OATE LAST CMANGEO 


SXAt 3*92 


80 


r>c 


CL8«tSVS0ATE' 


DATE LAST ASSEMBLY 


9XAI3692 


91* 


oc 


Cl8'06/07/76« 


OATE LAST ASSEMBLY 


»XA 13692 


82 


oc 


S( •) 


»ASE/OISPL*CE"€NT OF PATCH 


»XA I 1692 


83 OATC* 


oc 


32X«C0' 


PATCH 


•XAI3C92 


(•• 8EGIN 


OS 


OM 




9XA 13692 


85 • 


OPEN 


THE LINE GPOUP 






06 


OPEN 


(oceu) OPEN THE 


0C8 




87* 


CNOO 


0.* 


ALIGN LIST TO 


FuLL»OPO 


et* 


BAL 


1 .•♦F 


LOAO PEG1 W/LIST *00». 


99* 


OC 


AL1 (128) 


OPTION BYTE 




90* 


OC 


AL3<0CB»> 


OCR AOOPESS 




91* 


svc 


19 


ISSUE OPEN SVC 


<»2 


TM 


0C*P»49.XM 0' 


TEST FO« SUCCESSFUL OPEN 




9? 


90 


ST APT YES. ' 


GO TO STAPT 




94 


• TO 


•OPEN FAILURE* 






SS» 


CNOP 


0.4 






96* 


9AL 


I. IHEOOO 1 '* 


BPANCM APOUNO 


MESSACE 


<J7* 


OC 


AL?( I6t 


TEXT LENGTH 




98* 


OC 


9* CCOOOOOOO 0000000 


• MCS FLAGS 




99* 


OC 


C'OPEN FAILUPE* 






t cc»tMeoooi* 


OS 


OM 






I 1 * 


SVC 


15 






102 


8 


ABNORMAL 






10? STAPT 


LA 


OSPTA8PG.OSPTA8 


AOOPESS THE 01 SPLAY TABLE 




10* 


LA 


SELPFG.SELOSPLY 


GET SELECTION AOOPESS OF 




1 C5 • 






FIRST 3270 DISPLAY 





IC7 INITIAL 



000082 


4140 


5316 


003IC 


ioe 


000086 


41 SO 


00A7 


300A7 


1 09 


00008A 


45*0 


8602 


00608 


1 10 


00008E 


4 SAO 


9212 


00218 


in 


000092 


45*0 


9262 


00268 


1 12 


000096 


41 66 


0005 


00005 


1 13 


00009A 


9180 


6000 


00000 


1 14 


00009* 


4710 


80** 


OOOAA 


1 15 


0000*2 


4166 


0001 


00001 


116 


0000A6 


4 7F0 


50 7C 


00082 


117 



LA 


MS G AOOP. FOP MA TO 


LA 


■SGLEN.FMT0S2 


BAL 


LNKPEG.WPITETI 


SAL 


LNKPEG.OETCOOE 


BAL 


LNKPEG.SA I TO 


LA 


SELREG.FIVEISELREGI 


TM 


ZEPOISCLPEGI .LAST 


BO 


PEAO 


LA 


SELPECONflSELPEGl 


8 


INITIAL 



AOOP OF FOPMATO MESSAGE 
LENGTH OF MESSAGE 
GO WPITE FOPMAT 

check petupn cnoe 

•AIT FOP COMPLETION 

AOOP NEXT SPECIFIC POLL ENTPY 

ENO OF SELECTION LIST 

YES. GO ISSUE A PEAO 

AOOP OF NEXT ENTPY 

NO. WPtTE TO REMAINING DISPLAYS 



P-4 OS/VS BTAM SRL 



loc object cnoe 



aoori aoor? stmt source statement 













OOOAA 


19 "SAO 


eou 


OOOOAA 


4140 


8772 




00778 




20 


LA 


OOOO AC 


dt*c 


97 72 


8 772 


00778 


00774 


21 


XC 


0000(14 


072A 


8871 


8871 


00877 


00477 


122 


xc 


OOOOflA 


4SA0 


8632 




00638 




23 


SAL 


oooore 


4540 


9212 




00214 




24 


BAl 


0000C2 


4SA0 


826? 




00264 




25 


HAL 


0004C6 


O?0l 


8767 


8774 


00760 


0077A 


it 


MVC 


oooocc 


9102 


9FF6 




ooffc 




27 


TM 


000000 


4710 


82 re 




00394 




2e 


ao 


00O0O4 


4 160 


47ir 




00724 




24 


LA 


000008 


1922 








9000A 


30 

31 CHKIT 


sr 

sou 


OOOOOA 


O50I 


4001 


4774 


00001 


0077A 


32 


CLC 


OOOOEO 


4780 


50*6 




OOOFC 




33 


BE 


ooooe* 


4122 


0001 




0000 1 




34 


LA 


ooooee 


4166 


0005 




00005 




35 


LA 


oooocc 


9140 


6000 




00000 




36 


TN 


OOOOFO 


4710 


82FE 




00304 




57 


no 


0000*4 


4166 


0001 




00001 




3* 


LA 


o oo of a 


47F0 


S004 




00004 


OOO'C 


34 

4C PNCSEL 


e 

EOU 


000 OFC 


4220 


8766 




0076C 




41 


STC 


000 100 


1432 










42 


L» 


000102 


5C20 


876E 




00774 




43 


m 


000106 


142 3 










44 


LB 


0001 04. 


4 160 


4712 




00718 




4 * 


LA 


000 IOC 


IA6? 










46 


AD 


000 IOC 


50 60 


4 76 A 




09770 




47 


ST 


000112 


1444 










*e 


SB 


000 1 14 


41 40 


4 7 42 




00748 




49 


LA 


900 114 


4.1? 


9766 




0076C 




so 


IC 


000 1 IC 


4 149 


>oco 




00000 




51 


IC 


000 120 


47F4 


91 IC 




00124 




52 


4 



ASM 0200 11.07 06/07/76 



MS6ACOB. INABEA AOOB OF INPUT AREA 
INABEA(2SS> .INABEA. CLEAR INPUT 

INAREA*2S5(43>.IN^REA*25S ABCA 8XAI2970 

LNKREG.BEAOTt CO BEAO A 01 SPLAY 

LNKREG.BCTCOOE CHECK RETUBN COOE 

LNKBEG.MAITO WAIT FOB COMBLET ION 

CUOVSAVEITWO). tNABCA*TWO SAVE CU.OV 

0€CBO*TMCNTY4.X»02« STATUS NSG BECIEVCO 

SSCHCCK 

SELRCG.SPCCPOL AOOB OO SPEC POLL TABLE 

BeG2.ReC2 CLCAB BEG I STEP 2 

• 
ONEITWO.SELBEG). INABEA»?MO CHcCK FOR CU.OV 



FN OS EL 

RCG2. ONE! PCG2) 

SELBEG.F I VE ( SCLREG > 

2EBO(SELBEC).LAST 

ABNCBMAL 

SELRCG.ONCISCLBEG) 

CHKIT 



YES. GET SELECTION AOOB 
AOO ONE TO IN OEM 

POINT TO ENO OF ENTRY 
ENO OF LIST 

POINT TO NEXT FNTBV 
NO KEEP CHECKING 



•XA13692 



BEG2.INOEX 

■OBKREG.BEG2 

REG2.SIXL 

BEC2.MOBKBFG 

SELBEG.SELOSBLY 

SELBEC.BEG2 

SELBE6.SELSAVE 

FMTREG.FMTRFC 

0SBTA8BC.0SPTAB 

BEC2.INOEX 

FMTBCG.ZER0(0SBTA8BG.BEG2> GET FORMAT 10 

FQRMATBBIFMTREG) 



SAVE INDEX BYTF 

GET INOCX INTO OOO REGISTER 

MULTIPLY INDEX BY 6 

RE-ESTABLISH INOEX BEG 

GET SELECTION ADOBES 

AOOB OUTPUT ENTRY IN TABLE 

SAVE SELECTION AOOB 

CLCAB FORMAT REG 

AOOB OF 01 SPLAY TABLE 



•XA12969 



000124 A7F0 412A 
000128 47F0 9144 
0OO12C 47F0 4106 





00 124 


154 


F0BMAT8B SOU 


• 


001 .0 




155 


a 


FMTO 


90150 




156 


n 


FMT1 


90 IOC 




1 57 


8 


FMT2 



FORMAT ON SCREEN 
FORMAT l ON SCREEN 
FOBMAT 2 ON SCREEN 



900 130 4180 0004 
000 134 4289 20C9 
000138 4140 8340 



00004 
00000 
00 3C3 



IS* FMTO EOU • 

160 • VERIFY THE NAME ANO SOCIAL SECURITY NUMBER. ASSUMING THAT THEY 

Id • ARC VALIO. w€. SHALL CCNTINUE PROCESSING. 

16? FMTOI EOU • 

163 LA FMTREG.FOUB GET FORMAT I 10 

164 STC FMTREG. ZERO (DSPT ABRG.BEG2 > STORE IN O I SPLAY TABLE 

165 LA MSCAOOB.FOBMATI AOOB OF FQRMAT1 MESSAGE 



Appendix P: Remote 3270 Sample Program P- 



LOC OBJECT COOE 



Aooai aodr? stmt source statement 



ASM 0200 11.07 06/C7/76 



000l"*C *1 50 100A 

000 1*0 ♦SAO 8602 

OOTIM »5A0 8212 

000 1** *SAO 8262 

0011*C *7F0 BOA* 



OOOOA 


tee 


00608 


167 


00218 


let 


00268 


I6« 


OOOAA 


170 



LA 
SAL 

8AL 
BAL 



NSGLEN.FMTI SZ 

LNKREG.WR1TETI 
LNKREG.RETCOOE 
LNKREG.WA ITO 
PEAO 



LENGTH OF MESSAGE 
GO WRITE FORMAT 1 
CHECK RETURN COOE 
•AIT FOR COMPLETION 
GO REAO ANOTHER DISPLAY 



000 130 


95 70 


87 76 


177C 


00015* 


4 7*0 


81 6F 


001 7* 


1001 58 


956C 


97 7fi 


0077C 


TOO 15C 


4780 


•M 86 


31 8C 


100160 


°56F 


H7 7IS 


177c 


001 I 64 


4780 


81 8A 


■101 "0 


0001 68 


9561 


07 76 


0177C 


000 I 6C 


4780 


8 IB* 


01 I8C 


OOOI'O 


47f 


30*4 


OOOAA 



17? FMT| 


EQU 


173 


CLl 


1 74 


BE 


17? 


CL 1 


1 76 


8E 


1 77 


CLI 


17? 


BE 


179 


CLI 


teo 


eF 


1 M 


9 



INAREA+FOUR.ENTER 
ENTERINT 

IN *P 6 A ♦FOUR. PA I 
PAI INT 

|N*REA*F0UR.PA2 
PA2INT 

IN ARE A »F OUR. CLEAR 

CLEAR I NT 

REAO 



ENTER KEY INTERRUPT 

YES. GO UPOATE RECOROS 

PAI KEY INTERRUPT 

YES. GO MAKE MARO CnPY 

PA? OR CNCL KEY INTFRRUPT 

YES. GO DEACTIVATE TERMINAL 

CLEAR KEY INTF9»yOT 

YES. GO WRITE FORMAT 2 

IGNORE THE INTERRUPT ANO GO 



000 174 41 40 85F9 

000178 4150 0004 

000 17C ASAP 86C2 

000180 45A0 8212 

000184 45A0 8262 

000188 4TF0 80*4 

000I8C 47F0 8IFA 



000190 4140 85BB 

00019* *150 003C 

100198 4160 8712 

00019C *5A0 3602 

OOOIAO «3A0 S2I2 

OOOIA* 45A0 8262 

000 1A8 4 166 0005 

OOOIAC 4180 6000 

OOOIBO 4710 82EA 

0001B* 4166 0001 

000188 47F0 8196 

OOOIBC 4140 8*97 



00601 
00004 
06 08 
0021 8 
00268 
OOOAA 

01200 



005C1 
0003C 
00718 

00608 
00218 
00268 
01005 
00000 
2F0 
00001 
01I9C 

4 9 O 



I E3 

I 84 

ie« 
iee 

I E7 
l 88 
189 
190 
191 
192 
19? 
194 
1 «5 
I 96 
1 97 

ise 

199 
200 
201 
20? 
203 
204 
205 

2oe 

207 
?08 
2C9 
210 
21 I 
21? 



ENTERINT EOU 

• CRC»TF A 

• CAT* SET. 

LA 

LA 

SAL 

8AL 

BAL 

8 

RA1 INT EOU 

B 

PA?INT EOU 



NEW OR UPOATE AN EXISTING ENTRY IN YOUR PERMANENT 



MSGADOR.FRALUNP 

MSCLFN.ERALUNPL 

LNKREG.VR ITETI 

LNKReC.RETCOOE 

LKKREG.WAITO 

REAO 

• 

NO DO INT 



AODR OF MESSAGE 

LENGTH Or MESSAGE 

GO ERASE ALL UNPROTECTFC 

CHECK RETURN COOE 

•AIT FOR COMPLETION 

GO REAO ANOTMFq 01 SPLAY 

NC PRINTER OEElNEO 



OETERMINF IF ANY CATA WAS ENTFRED. |F SO. CREATE A NEW OR UPOATE 
AN EXISTING ENTRY IN YOUR PERMANENT DATA SET. NOV DEACTIVATE THE 
TERMINAL. 



CLE API NT 



EOU 

LA 

LA 

LA 

EOU 

BAL 

BAL 

SAL 

LA 

TM 

SO 

LA 

e 

EOU 
LA 



MSGAOOR.CLOSEMG 

■SGLEN.CLOSEMCL 

SELREG.SELOSPLY 

• 

LNKREG.WRITETI 

LNKREG.RETCODE 

LNKREG •• A ITO 

SELRFG.F IVEISELREGI 

ZERO <SELR EG 1. LAST 

CLCSE 

SELREG.ONEI SELREGI 

ONCEMORE 

• 

MSCAOOR. FORMAT? 



AOOR OF CLOSE MSG 

LENGTH OF HSG 

AOOR 0^ SELECTION TABLE 

GO WRITE ENDING MSG 
CHECK RETURN COOE 
WAIT FOR COMPLETION 
POINT TO 1NOICATOR BYTE 
ENO OF SELECTION LIST 
YES. TERMINATE PROGRAM 
POINT TO NEXT AOORESS 
NO. WRITE ANOTHER MESSAGE 

AOOR OF FORMAT 2 MSG 



P-6 OS/VS 3TAM SRL 



ice object coot 



aodri aoor2 stmt source statement 



ASM 0200 11.07 06/07/76 



000 ICO •ISO 00P7 
000 1C4 4SA0 4602 
0001 CS 4SA0 B212 
000 ICC 4SA0 8262 
OOOinO 4180 0008 
000 104 4289 2000 
000 I DM 4 7P0 80 A4 



OOOIDC 


OS TO 


877« 


000 1 CO 


4T80 


8I2A 


TOO IE 4 


9S6C 


8778 


00QIE8 


4780 


8186 


000 IEC 


9S6E 


8776 


9O01F0 


4780 


8I8A 


0001*4 


9S60 


8776 


001 IF 9 


4780 


8186 


OOOIDC 


4 7F0 


80A4 



000200 4140 1S« 
100204 41 SO 0020 
000708 4S40 8602 
00020C 4SA0 8312 
000210 4SA0 8262 
000214 47F0 80A4 



000*7 
00608 
00218 
00268 
00008 
00000 
OOOAA 

0077C 
00130 
0077C 
00 1« 
0077C 
00190 
0077C 
00I8C 
OOOAA 

00594 
00020 
}0608 
00218 
00268 
OOOAA 



213 


LA 


MSGLEN.PMT2SZ 


214 


BAL 


LNKREG.»R|TET| 


215 


BAL 


LNKREG.RETCOOE 


21C 


SAL 


LNKREG.MAITO 


217 


LA 


PMTREG.EIGHT 


lit 


STC 


PMTREG.ZEROIOSPTAI 


219 


• 


HEAD 


220 FMT2 


eou 


• 


221 


CLI 


1 N AM EA*POUR. ENTER 


222 


86 


FNTOI 


223 


CLI 


|NAREA»F0UR.PA1 


224 


BE 


PAI INT 


228 


CLI 


IN«ReA«P0UR.PA2 


22t 


BE 


RA2INTI 


227 


CLI 


INARE4*FOUR.CLFAR 


22* 


BE 


CLEARINT 


22* 


8 


REAO 


?30 MC^CINT 


EOU 


• 


231 


LA 


KSCAOOB. NOPTO 


232 


LA 


NSGLFN.NOPTRL 


233 


eAL 


LNKREG.WRITETI 


234 


BAL 


LNKREG.RETCOOE 


235 


SAL 


LNKREG.WAITO 


23< 


8 


RFAC 



LENGTH OP NSC 
GO WRITE FORMAT 2 
CHECK RETURN COOe 
•AIT POR COMPLETION 
GET FORMAT 2 ID 
S.RF.G2) STORE IN DISPLAY TA81 
GO REAO ANOTHER DISPLAY 

ENTER KEY INTERRUPT 

YES. GO WRITE PORMAT I 

PA| KEY INTERRUPT 

YES. GO MAKE HARO COPY 

PA2 OR CNCL KEY INTEPRUPT 

YES. GO DEACTIVATE TEPMINAL 

CLEAR KEY INTEPRUPT 

GO »RITE PORMAT 2 

GO BEAD ANOTHER OISPLAY 

AOOR OP NO PR INTER MSC 

LENGTH OP MSG 

GO WRITE MSG 

CHECK RETURN COOE 

WAIT POR COMPLETION 

GO REAO ANOTHER OISPLAY 



Appendix P: Remote 32 70 Sample Program P-7 



loc object code 



ooozta atff 8216 



ADORI A0OR2 STMT SOURCE STATEMENT 



ASM 0204 11.07 06/07/76 



00021 C 


♦ 7F0 


B23E 


000220 


47F0 


8240 


00022* 


47F0 


92*6 


00022A 


4 7F0 


82*6 


00022C 


47F0 


B24A 


000230 


47F0 


824E 


0002*4 


*TF0 


5252 


100238 


• 7F0 


8256 


00023C 


47F0 


52 SA 


0002*0 


47F0 


*2SE 



00074* 07FA 



000246 5840 3T3C 

ooo ?4* (y^r^ 



00024C 47F0 «2FE 

000250 47F0 32F.A 

000254 47F0 52FE 

000258 47F0 0?^6 

00025C *7F0 82FE 

000260 47F0 52FF 

00026* *7F0 H2FF. 





00218 


23* 


OETCOOE 


eou 


• 


C 2 1 C 




239 




R 


RTNCDTAStftYNCI 




002IC 


2*C 


RTNCOTAB 


EOU 


• 


O02** 




241 




8 


RTNCOO 


00246 




24? 




8 


RTNCO* 


C024C 




2*3 




8 


RTNCDS 


0024C 




244 




a 


RTNCDC 


00250 




24« 




a 


RTNCOIO 


0025* 




24« 




B 


RTNCDI 4 


0258 




247 




e 


RTNC018 


C02SC 




248 




8 


RTNCC1C 


00260 




249 




8 


RTNCD20 


0026* 




2!0 




n 


RTNC02* 




002*4 


251 


RTfcCOO 


EOU 


* 






2*1 




an 


LNKREG 




002*6 


2«3 


RTNCO* 


FOU 


• 


C 07** 




?•* 




s 


LNKREG. EIGHTS 






25" 




BR 


LNKRFG 




002»C 


Pit 


BTKC08 


EOU 


* 




00?*C 


2S7 


QTkCOC 


EQU 


• 


0030* 




2«e 




a 


ABNORMAL 




00250 


289 


BTKCO10 


EOU 


• 


002*0 




'60 




P 


CLOSE 




0025* 


?ei 


RTNCOl • 


EOU 


* 


00.10* 




262 




a 


ABNORMAL 




00258 


2«3 


RTHC018 


EOU 


* 


0030* 




26* 




8 


ABNORMAL 




0025C 


265 


RTfcCCI C 


EOU 


» 


H0?0* 




2«C 




8 


ABNORMAL 




00260 


267 


RTNCC20 


EOU 


• 


0030* 




268 




e 


ABNORMAL 




0026* 


2e? 


QTNCD24 


EOU 


• 


CO 30* 




270 




8 


ABNORMAL 



BRANCH TO CORRESPONDING ENYRY 

I/O SUCCESSFULLY INITIATED 

OTFBT BUSY 

INVALID RLN 

INVALID TYPE COOE 

ALL SKIP 91 TS ON 

LINE ERROR AT OPEN 

NO BUFFERS 

NO BUFFER »OOL 

NO BUFFER MANAGEMENT 

BSC USAGE COUNT EXCEEOEO 

RETURN 

SUBTRACT 8 FROM RETURN AOOR 
TO RETRY THE OPERATION 



THIS CONOITION SMOULO NOT OCCUR 
ALL TERMINALS. TERMINATE 

THIS CONOITICN SHOULD NOT OCCUR 

THIS CONOITION SHOULD NOT OCCUR 

THIS CONOITION SMOULO NOT OCCUR 

THIS CONOITION SHOULD NOT OCCUR 

THtS CONOITICN SHOULD NOT OCCUR 



P-8 OS/VS BTAM SRL 



lcc object cooe 



000268 4110 8F06 
00026C 4100 0001 
000270 OAOt 



000?7» 


987F 


bfoe 


000276 


4770 


82 76 


0002TA 


07fa 




00027C 


9541 


BFO€ 


000240 


4770 


b»fe 


000294 


9506 


BFFA 


000288 


4770 


52 9A 


0002BC 


9101 


8FEE 


000290 


47E0 


82 FE 


000294 


sbao 


8 762 


000»<>6 


07FA 





0002** 9520 qFFA 

0O029E 4770 B2 48 

0002*2 91 40 BFF6 

000?A6 *7E0 82FE 

0002*4 47E0 80*4 

0002AF 9511 BFFA 

0002B2 4770 82FE 

003286 47F0 B29C 

000 2BA 9520 BEE A 

0002BE *77<J 82EE 



0OO2C2 
ft 00 ?C 6 
0002CA 
000 2CE 
000 20 2 
0002O6 
0002OA 
000 2DE 
0OO2E2 
0002E6 
0002EA 
0002EC 



411 

9405 
9704 
41 EO 
90E0 
4IE0 
SOEO 
41E0 
4 0E0 
S8E0 
OSEE 
47FC 



BFfliE 
1004 
1005 
BE7A 
I 008 
B7 72 

tooc 
oooi 
iota 

BFAA 
S26C 



AOOR I 


ADO* 2 


STMT 


SOURCE 


STATE 


PENT 




00268 


272 


■ At TO 


EOU 


• 






273 




WAIT 


ECe*CECBO 


OOEE* 




27«» 




LA 


i . oecao 


00001 




2 75* 
27** 




LA 
SVC 


O.KO.OI 

1 




00272 


277 i 


CHK7FCC 


EOU 


• 


00FE4 




278 




CLI 


CEC8C.SCVENF 


0027C 




279 




BNE 


CMK41CC 






280 




BR 


LNKREG 




0027C 


281 


CHK41CC 


EOU 


• 


00EE4 




282 




CLI 


0ECSO.FOURTY1 


00 304 




283 




BNE 


Al> NORMAL 


01000 




2(4 




CLI 


0ECB0»TWENTV8 


0029A 




285 




BNE 


CHTP20 


OOFFA 




2C6 




TM 


0EC804SIXTN.T 


00304 




287 




BNO 


ABNORMAL 


00766 




288 




S 


LNKREG. TWELVE 






2e9 




BR 


LNKREG 




0029A 


290 


CKTP'O 


EOU 


• 


01000 




29 1 




CLI 


0EC80»TWENTV8 


002AE 




292 




BNE 


CKTB|| 




002*2 


293 


CHKECT 


EQU 


• 


OOFFC 




294 




TM 


OECBO*TWENTY4 


0010* 




295 




BNO 


ABNORMAL 


000** 




29« 




8 


REAC 




002*E 


297 


CK TP 1 1 


EOU 


• 


01000 




298 




CLI 


CECEC»TWENTY8, 


00304 




299 




BNE 


ABNORMAL 


002*2 




300 




a 


CHKEOT 




002BA 


3C1 


CHKTP20 


FOU 


• 


01000 




302 




CLI 


0EC80^TWENTY8 


0010* 




303 




eNC 


ABNORMAL 






3C4 




WRITE 


0EC8C.TP.OCBR 


00FE4 




305* 




LA 


I.OECBO 


00034 




30e* 




N| 


*( 1 1 .5 


00008 




»0 7* 




MVI 


S<1 ) .10 


OOFAO 




308* 




L* 


14.0CBR 


00008 




3C9* 




ST 


14.8(0.1 1 


00778 




;io» 




L* 


t4. (NAREA 


OOOOC 




31 I* 




ST 


14. 12<0. 1 1 


00001 




312^ 




L* 


14.1 40.0 > 


00018 




313* 




STM 


14.2410.1 ) 


OOFSO 




314* 




L 


IS.DC8R*48 






31«* 




BALP 


14. i; 


00272 




3I< 




8 


CMK7FCC 



ASM 0200 11.07 06/07/76 



LO*D PARAMETER RE 6 
COUNT OMITTEO.l USEO 
LINK TO WAIT ROUTINE 

NORMAL COMPLETION COOE 
NO. KEEP CHECKING 
RETURN 

I/O ERROR COMP COOC 
INVALtO COMP COOE 
.TP06 TP CCOE OF 6 

NO. CHECK CTMER TP CODES 

imeout oio oevice time out 

NO. TERMINATE 

SUBTRACR 12 FPOM RETURN AOOR 

TO RETRY THE OPERATION 

. TP20 TP CCOE OF 20 

NO. CHECK OTHERS 

.FOTRSPTK EOT RESPONSE TO TEXT 
NO. TERMINATE 
YES. SO GET SENSE STATUS MESSAGE 

.TP11 TP CODE OF 1 1 
NO. TERMINATE 
YES. CHECK ECT RESPONSE TO TEXT 

. TP20 TP COOE OF 20 
NO. TERMINATE 
. INARE*. ..1 .MF«E 

LOAO OECB AOORESS 



STORE OCB AOORESS 



STORE AREA AOOR 



0008 
0C08 



STORE LINE NUMBER 
LOAO ROwRT ROUT AOOR 

A3 6S57 
CHECK COMPLETION COOE 



Appendix P: Remote 32 70 Sample Program P-9 



LOC OBJECT COOC 



AOM1 A0O62 ST*T «OU»CE STATEMENT 



ASM 0100 I LOT 06/07/74 









002*0 


316 clcse 
316 


000**0 








32C* 


0002*0 


•SIO B2*2 


002*6 




321* 


000 2*4 


40 






322* 


000 2*6 


oeo*oo 






323* 


0002*6 


0*1* 






32** 


0002** 


SHOO 8*46 


00*4C 




326 
326 


ooo2*e 


«oec oooc 


OOOOC 




327* 


000302 


07*e 






326* 



eou 



CLOSE (OCMI 
CNOP o*« 

BAL I • 4*6 

DC M.H12SI 

OC AL3J0C8M) 

SVC 20 

L I3.SAVE44 

NCTUWN (14.121 

L" 14.12. 12(131 



close the oca 



ALI6N LIST TO *ULL»C«0 
LOAO 6CCI MA.IST ADO* 
OPTION SVTR 
OCB AOOOESS 

issue close svc 



wesron*. rne *eet stews 

PETUMN 



ste sschcck eou 4 

331 • INVESTI6AT* THE SENSE/STATUS 8VTES SENT BY THE MEMOTE DEVICE. 

332 • I* 6EC0VEMV IS POSSIBLE. ATTEMPT TO DO SO. *E SMALL ASSUH*. THAT 

333 • THE 26MOM tS UNMECCVEMABLE AMO TERM (NATE . 



339 A6»C»MAL eOU 









336 


ABC NO 


1 .OU»P T, 


000304 






337* 


OS 


OH 


000104 






33f* 


CNO* 


0.4 


000 164 


47*0 6306 


0030C 


339* 


6 


4*6 


000306 


60 




340* 


OC 


ALU 1281 


000306 


000001 




341* 


OC 


AL3< 1 ) 


0O030C 


S6t0 6302 


00106 


14?» 


L 


1.4-4 


000 310 


9A00 




343^ 


SVC 


13 


000312 


96O0 6*46 


0<J*4C 


344 


L 


I3.SAVE«4 








34S 


«eTU«N ( 14.12) 


000 316 


96EC OOOC 


OOOOC 


34«* 


LM 


14. 12. 12(131 


00031 A 


07*E 




?47» 


6M 


14 



TAKE A OUMP 



BRANCH AftOUNO CONSTANT 

OUNP/STEP COOE 
COMPLETION COOE 

loao cooes into «e« i 

LINK TO ABEND ROUTINE 



•ESTOPE TMC 6E6ISTEPS 

6ETU6N 



P-10 OS/VS BTAM SRL 



lcc oiwecT cooe 



AOOPI AOOR2 STMT 



SOUNCC STATEMENT 



ASM 0X00 1 1 .07 OO/OT/70 



0003IC 
00031 ■ 
000 325 
000 332 
000 337 
0003S9 
000 365 
000367 
00036C 
000 36C 
0003*4 
000 309 
100340 
000 3A2 
000 1 A 7 
000 3AA 

oooiaf 

0003(10 
100 380 
0003C2 



0227*5 

C7IDCSIIICIS3 

C7D406C 4400*0*04 

10*01 1C15" 

e.lC*C9C240C2C5C7 

06C640C3C8CS4040 

IOCS 

riP2*TTF040 

IO40 

OOCSO*Q«e3C**0»? 

IO69I1C3P0 

cnoses cso4* oei c* 

10601 IC408 

OflCI OAC57A 

IO4013 

IIC5A01O60 

E2O6C340e?C5CJ40 

1OA0 

I ICSC8IOA0 

01 



144 PQSMATO 

3S0 

391 

392 

393 

394 

ja« 

396 

397 

399 

399 

36C 

36i 

362 
363 
3«4 
249 

366 
167 
3«S 
364 
37C FM10S2 



eou 
oc 

DC 

oc 

DC 
OC 
OC 
OC 

oc 
oc 
oc 
oc 
oc 
oc 
oc 
oc 
oc 
oc 
oc 
oc 
oc 
eou 



sTx.esc.e/« 

•CC S* a MtOT. 



X«0227F5» 

X*C71OCSItCtS0* 

C*«CO0 MOWN INC.* 

X* 10*011 CI SF* SF a PPOT. S8A 

C'TPIS BCtilNS TMC n^MONSTMATION • 

C»OF THC 0S/8TAM • 

X* IOCS* 9* a PPOT 

C3270 • 

X»lO«0* 9' ■ PPOT 

C*P*POTe 5APPCK PW06MAM.* 

X* 10*01 1 C3F0* SF ■ PPOT. 

C*FNTe* THC FOLLOWING:* 



S8A ■ 2AO 



X* I060IIC4O8* 

c*napc:* 

X* 104013* 

X* I ICS4OIO60* 

c* soc sec num:< 
x» io*o« 

X* t 1C9E81O60* 

X*03* 
•-PCPMAT0 



SF a MtOT. SRA ■ 280 



s« » 


UNPP< 


OT. 


S8A a 


120 


.SF 


SF ■ 


UNPPOT 


S8A - 


3*0 


.$• 


6TX 







372 FOBMATI eOU 



000 3C3 2*7»9 

0001C6 C7|f>Affll|A0Aa 

000 3CC C5OSeiC5O440C4CI 

000 3F7 1 | CI 50 

003 36A 09C1D4CS7A 

000 36* lO*3l3llClF8tf>60 

0003«T CIC4CA047A 
0003FC IOAOI IC260IO60 
900403 C3C9f?ie87» 
100 408 10401 1C3C8 1060 
00O4OF C2FlCie3CS7* 
000415 1O40I HCX41P60 
000AIC C4C4077A 
000*20 IDS0 111C3F01O6O1 I 

00047A C9O5e:iCSO94 002C9 

000440 1ICS40 

000443 O7C1F1l40O2C5e*7A 

0004S7 ttcses 

00045A D7C1F2404OC3O5C3 

00047B MC6S0 

000481 C3O3C5C1OP40O2C9 

00049C 03 



373 


OC 


174 


OC 


379 


OC 


176 


OC 


377 


OC 


378 


OC 


179 • 




3tC 


oc 


3ei 


OC 


3e2 


OC 


383 


oc 


3e4 


oc 


3S9 


oc 


see 


oc 


se7 


oc 


188 • 




se* 


oc 


34C 


oc 


341 


oc 


342 


oc 


343 


oc 


344 


oc 


349 


oc 


346 


oc 



347 PNT132 



x»o227"5» »Tx.esc.e/» 

X*C7in«Ot|4040* 9CC. SF ■ W»CT. SSA a 

c*eMTe<» oata oeouesreo selow:* 

XMICHO* SSA * 80 

C •*«■?:• 

X* 1D40I31IC1P8IO«0* SF * UNPPOT. 1C. SSA ■ 120. 

SF a PPOT 
C* AOOMS* 

x* 1o401 1c260io60* sf • unppot, ssa * 160. sf a p9ct 

C»C1ty:» 

x* 10401 ic3c8i 060* sf * unppot. s8a a ?00. sf * p«ct 

c*st»te:* 

X* 10401 tC3E4|O60* SF a UNPPOT. SSA a 228. SF a PPOT 

c*zip:* 

X* 10S0I 1C3F0IO6011C4O8* SF a UNPPOT. SSA a 240. 

SF a PHOT. SRA a 280 
C*9NTeP «6v: 6NTFP OAT*;* 
X* 1IC540* SSA a 320 

c'pai key: ppint oata:* 

X'llCSES* SPA a 3*0 

c»pa2 (cmcl) xev: oeACTivATe terminal:* 

X*ttC690* SSA a 400 

cclcap ner: control opt ions i* 
X«03* eTx 

•-■OPMAT I 



Appendix P: Remote 32 70 Sample Program P-ll 



toe object code 



ADR9I AOOR2 STMT SOURCE STATEMENT 



asm 0200 i i. or oe/or/r« 



349 FORMAT? EOU 



000*90 
000**0 
000**3 
000*AE 
000*01 

ooo *e 3 

OOOSIS 
0OOS*T 
000579 
900590 
0005*3 



022TF5 

CTI|«0«0I3 

E7E7E9E8FAC3C3C* 

it«oe* 
e30««oo9csd4f*cs 

ClC7CS«0O6E*C5O9 

* o* oe se ore D9cs or 
E3cocsos*oenc9s3 
e«*oe3o«*oo9csf2 

I 1C3C9 

03 



«co 


OC 


401 


DC 


♦ 02 


OC 


*cj 


OC 


«o« 


OC 


♦ OS 


OC 


«0« 


OC 


*CT 


OC 


• 0* 


OC 


409 


OC 


«I0 


OC 


41 1 FMT2S2 


EQO 



stx.esc.f/« 

WCC. SSA • 0. 



x»0227fs« 

X*CTI|4040t3* WCC. SSA • 0. fC 

c , xxrv4ceoo« 

x a ti*oea* so* * *o 

c*ro aeouest stam oct -- enter qeouest for test mess* 

c**ct ove« samrie format above* xx-test no. < 23-20 >• 

c« vy»»epeats 101-991 ccoo*aooress of target device* 

C'THEN MIT ERASE EOF ANO THEN TEST 9E0. USE CLEAR KE • 

C»Y TO RESUME AFTER TEST.' 

X«IIC3C8* S8A « 200 

X'03» ETX 

•-FOMMAT2 







0059* 


413 


NO"T» 


000594 


02'TFt 




• 1* 




000*97 


CAIOCS1 ICAF8 




41? 




10059O 


OSO«« 0O7 09C90S" 3 




416 




000 SCO 


93 




4|T 








90020 


418 


NORTKl 



EOU • 

OC X«022TF|» STX.ESCt MITE 

OC X*C610CSI IC6F8* 9CC. SF » RROT. SSA 

OC C'NO «M» INTER nEFINED FOR THIS R90GRAM* 

OC X»03» ETX 



EOU 



•-NOPT9 



9005CI 025»TFS 

0005C* C7! t «O*0IOCft 

0005CA *0*0*0*0*Oe3C8C5 

00OSFC 93 



420 


CLCSEMC 


EOU 


421 




OC 


422 




OC 


423 




oc 


424 




OC 



*2« clcsemgl EOU 



X«0227F3« stx.esc.e/v 

X»C71|*0«01DC8« WCC SSA - . SF ■ OROT 

C« THE 9EMOTE 3270 SAMPLE PROGRAM HAS CONCLUOEO. 

X'03» ETX 

•-CLOSEXG 



00OSFO 0?2"»F?03 



•it «E#OeUF EOU 
42« OC 

430 BE4CFUFL EOU 



X«0227F2O3' 
•-«E*08UF 



STX.ESC.RO 4UF.ETX 



00060 1 02276F03 



432 SRM.UNP EOU 
♦ 33 OC 



X« 02276FO3' 



STX.ESC.EAU.ETX 



LOC OBJECT COOE 



4009I AOOR2 STMT SOURCE STATEMENT 

00004 «1« ER4LUNFC EOU •-ERA4.UHR 



ASM 0200 11.07 96S07/76 



P-12 OS/VS RTAM SRL 



lcc object cooe 



AOOR1 AOOR? STMT SOURCE STATEMENT 



ASM 0200 H.OT 06/07/76 











♦ 36 • 


READ 


ANO WRITE MACROS 


000606 








437 


OS 


OF 








00606 


•32 aRITETI 
•34 


eou 

■RITE 


• 

oecbo.ti.ocsr. t 


000606 


«l 13 


bfoe 


00FE4 


• 40* 


LA 


i.cecro 


00060C 


9200 


too* 


0000* 


• •!♦ 


MVI 


• (I » .0 


000610 


4202 


t oos 


00009 


4424 


MVI 


9*11.2 


000614 


• 050 


1006 


00006 


**3* 


STM 


WSCLEN. 6(0.1 1 


0006111 


aieo 


sfta 


00*60 


«•«» 


LA 


I4.0CBR 


00061C 


soeo 


100S 


0000* 


449* 


ST 


14.610.1 » 


000620 


so*o 


100C 


OOOOC 


• •6* 


ST 


MSGAOOR. 12(0.1 1 


00062* 


9060 


191* 


0001* 


**?♦ 


ST 


SELRE6. 2010.1 1 


000628 


*1K0 


0001 


00001 


• ««♦ 


LA 


14.1 (0.01 


30062C 


•oeo 


1016 


000 Id 


• ••♦ 


STM • 


14.24(0.1 1 


000610 


5rfo 


BF*A 


OOFRO 


430* 


L 


IS.0CRR»48 


00063* 


05FF 






• 81* 


BAL« 


14.19 


000636 


otfa 






482 


8R 


LNKREG 



LOAO OECS AOORESS 

XA01A46 



STORE LEN6TM 



oeoa 



STORK OCB AOORESS 
STORE AREA AOOR 0008 
STORE TERM. LIST ACCR. 

STORE Line NUMBER 
LOAO ROWRT MOUT AOOR 

A38S5T 









00636 


184 6EACT1 
kSS 


EOU 
RE 40 


• 
CEC80.TI.nC 


00063<t 


• 110 


6FOF 


OOFE* i 


► 56* 


LA 


t.OFCBO 


000A3C 


4200 


1004 


0000* 


»«?♦ 


MVl 


«( 1 1.0 


100 6*0 


9201 


1005 


00005 


»?•» 


MVI 


5(11 .1 


000644 


41C0 


01 2C 


001 ?C 


HO* 


LA 


l«.30C(0.0l 


0006**. 


40F0 


1106 


00006 < 


K<*» 


STM 


16. 6(0.1 1 


00064C 


41 EO 


8F7A 


00F60 


»et* 


LA 


14.0C8* 


0006*0 


50FO 


1006 


00006 


► 62* 


ST 


14.6(0.1 1 


000654 


«IEO 


57 72 


0077* 


»«?♦ 


LA 


l*.IMARE* 


000656 


SOEO 


I0QC 


OOOOC * 


»**♦ 


ST 


1*. 12(0.1 1 


000 ASC 


4IE0 


6 7;?0 


00733 


»es* 


LA 


l*.PCLOSRLT 


000660 


SOEO 


101* 


0001 * 


>66* 


ST 


1*. 20(0.1 1 


000664 


• ISO 


0001 


00001 


»«7» 


LA 


l«.l (0.0 1 


000666 


40FO 


1016 


00016 


»ee* 


STM 


14.24(0.1 » 


00066C 


S6F0 


4FAA 


00F40 i 


► 69* 


L 


|9.DC5R*4F 


000670 


OSEF 






»7C» 


8AL<* 


14. 15 


000672 


07*4 






»7! 


BR 


LNKREG 



nC8R.INARFA.306. 



»LT 


. I.MFm 
LOAO 


3EC5 


AftORESS 

XA01C4F 




STORE 


LENGTH 


OCOR 
OCOB 




STORE 
<TORE 


OCB ADORESS 
AREA AOOR 


OCOB 
0008 



STORE TERM. LIST AOCR. 

STORE LINE NUMBER 
LOAD ROWRT ROUT ACOR 

A3S557 



Appendix P: Remote 3270 Sample Program P-13 



lcc object cooe 



AOOR I AOOR2 STMT 



SOURCE STATEMENT 



ASM 0200 11.07 06/07/76 









00674 


477 RCACTRV 


SOU 


• 
















474 


reao 


CCCBO.TRV.OCBR. 


IN ARC A 


2S6..1 


,M8*E 


00067* 


41 19 


b*oe 


09FE4 


475* 


LA 


t.cecso 






LOAD OECB AOOQCSS 


000478 


4404 


1 00* 


00004 


♦ 76* 


Nt 


411). 4 








00067C 


9215 


IOOS 


000*1 


477* 


MVI 


9(D.;t 








000680 


4ieo 


0100 


00100 


478* 


LA 


14.256( 0.0) 






0008 


000684 


• wo 


1006 


00006 


479* 


STM 


14 .6(0.1 ) 






STORE LENGTH OCOB 


000688 


4t CO 


»FT» 


00E80 


480* 


LA 


14.0CBR 








00068C 


SCEO 


I 008 


00008 


481* 


ST 


14.8(0.1 ) 






STCRE OCB ADORE SS 


000690 


41E0 


B772 


00778 


482* 


LA 


14 . INAREA 






OOOB 


0QO694 


soco 


I OOC 


0009C 


4«.1» 


ST 


14.12(0.1 ) 






STORE AREA AOOR OCOE 


000698 


4ieo 


0001 


00001 


484* 


LA 


14 .1 (0.0 ) 








00069C 


4oeo 


1 018 


00018 


4 85* 


STM 


14 , 74(4.1 ) 






STORE LINE NUNBER 


ooo^ao 


S8F0 


88 AA 


OOEBO 


«e«* 


L 


IS.0CBR*48 






LOAO ROWRT ROUT AOOR 


0006A4 


oser 






487* 


8ALR 


14. IS 






A38!S7 


0006 Aft 


078* 






48e 


BR 


LNKRCG 


RETURN 





0006A8 


41 1 


B80E 


0006AC 


9200 


1004 


90O6B0 


920D 


1 005 


900*84 


4IE0 


0100 


900688 


40B9 


1006 


3006BC 


4050 


IO?A 


0006C0 


4180 


88 7A 


0006C4 


50E0 


1 008 


0004C8 


4IE0 


5772 


9006CC 


5080 


1 OOC 


000600 


5040 


I02C 


000604 


5060 


1014 


000608 


41 CO 


0001 


9006OC 


40*0 


1018 


9006E0 


58E0 


B8AA 


3006E4 


05EE 




0006E6 


078A 





006A8 490 




491 


008C4 


49?» 


90004 


493* 


OOOOS 


494* 


001 00 


495* 


00096 


496* 


0002A 


49 7* 


OOF BO 


*9e* 


00008 


499* 


09778 


500* 


0009C 


"01* 


000»C 


502* 


00014 


503* 


0009 1 


SC4» 


00018 


505* 


oofbo 


SC6* 




507* 




508 



490 mn ITETIV EOU 

WRITE 



LA 

MVI 

MVI 

LA 

STM 

STM 

LA 

ST 

LA 

ST 

ST 

ST 

LA 

STM 

L 

BALR 

BR 



occec.T tv.nrnp. ( inarea. (mscaoori ).( 256. ( msgleni > . 

(SELREG) .1 ,M8»F 

I.CEC80 LOAO DEC* aooqess 

4( I ) .0 XA01848 

5( I > .1 3 

14.256(0.0) OCOB 

14.60.1) STORE LENGTH OOOB 

MSGLCN. 42(0.1 ) STORE VL8NGTH 0C08 

I4.0CBR 

14.8(9.1) STORE OC5 AOORESS 

I4.INAREA OCCB 

14.12(0.1) STORE AREA AOOR OCOB 

MSGAOOR.44(0.l > STORE »AR*A AOOR 0008 



SELRCG. 20(0.1 > 

14.1 (0.01 

14 ,24(0. I ) 

15.0C9R»48 

14.15 

LNKRCG 



STORE TERM. LIST AOOR. 

STORE LINE NUMBER 
LOAO ROVRT ROUT AOOR 

AJ8557 



P-14 OS/VS BTAM SRL 



orject cooe 



AOORt ADDR2 STMT 



SOURCE STATEMENT 



ASM 0200 II .0? 06/07/76 









00668 910 REACTT 


eon 


• 
















911 


re#o 


ceceo.rr.ocsR. 


( MSCAOOR 1 


.236., 


, | ,«***. 


oooften 


4110 


B*oe 


00*** 


91** 


LA 


i.oecBo 






LOAO OCCB AOORESS 


000 6EC 


9404 


too* 


00004 


913* 


NI 


•<!).* 








00**0 


920"! 


1003 


00005 


91*4 


MVt 


9<t 1,3 








000 6*4 


*iso 


0100 


00130 


9154 


LA 


14.296(9.0) 






oooe 


0006*8 


♦oeo 


1006 


00004 


916* 


STM 


I4.6<0.1 1 






STORE LENGTH 0C0B 


0006*C 


41*0 


8*7* 


00*80 


9174 


L* 


I4.0CBR 








000700 


soro 


1006 


00008 


9194 


ST 


14.8(0.1 » 






STORE DCS AOORESS 


00070* 


9040 


100C 


ooooc 


3144 


ST 


MSCAOOR. 12(0.1 


) 




STORE ARC A AOOR 0C06 


000 70S 


41*0 


0001 


00001 


9204 


LA 


14.1(0.0) 








00070C 


40*0 


1016 


00019 


9214 


STM 


14,24(0.1 > 






STORE LINe NUMBER 


000710 


96*0 


a*** 


00*10 


5224 


L 


l9,OCBR4«8 






LOAO ROWRT ROUT AOOR 


00071* 


03E* 






5234 


SAL* 


14,15 






A36997 


000 716 


07** 






92* 


RR 


LNKRCG 


RETURN 





Appendix P: Remote 3270 Sample Program P-15 



LOC OBJECT COOC 



AQORI ADOR? STMT SOURCE STATEMENT 



ASM 0200 I LOT 06/07/76 



S2« • 01 SPLAT SELECTION AOOPESSES 

S27 • THE CURRENT MACHO OPERANDS ARE FOR TWO REMOTE 3270 DISPLAYS! 

928 • I. OTM CU, OTM Oev (6060*0*01 

929 • 2. OTM CU. 1ST OEV (6060CICI) 

930 SELDSPLV OFTRMLST OPENLST .(6O6040402O.6060CICI2OI 



0007H 

00071 6460*0*020 

000710 01 

0007IE 60AOCICI2O 

000723 82 



S?t»SELOSPLY OS 

932* CC 

93 3* OC 

93** OC 

S3S» OC 



OX 

X«6060«0*02O< 

•LUll 

**60eOCICI20< 

ALI4I30I 



TERMINAL LIST ENTRY 
PROCEDURE FLAGS 

TERMINAL LIST ENTRY 
PROCEDURE FLAGS 



•28630 
A4«t2| 



937 • OISPLAY SPECIFIC POLLING AOORESSES 

S3F • THE CURRENT MACRO OPERANDS ARE FOR TWO REMOTE 3270 DISPLAYS: 

SJ«J • I. OTM CU. OTM OEV 1*040*0401 

940 • 2* OTM CU. 1ST OEV (4040CICII 



000 724 

000724 40*0*0*020 

00172 01 

00072A «0*0CICI2O 

000 72F 82 



94 1 SPECPCL 

S*2*SP€CPOL 

943* 

944* 

94 9* 

946* 



OFTRMLST OPENLST . I «040«0«02O.«0*0C »C 1201 



OS 
OC 
OC 
OC 

oc 



ox 

X« 4040404020* 
ALU I J 

X*4040ClCI2O< 
AH ( MO I 



TERMINAL LIST ENTRY 
PROCEDURE FLAGS 

TERMINAL LIST ENTRY 
PROCEOURE FLAGS 



A2e«30 
A4682I 



P-16 OS/VS 3TAM SRL 



tee object cone 



AOOAt AOO«? STMT 



SOURCE STATCMCNT 



ASM 0X00 11*97 06/07/7* 



S4« • OtS*CAY GSNSRAC »OUlNC AOOftCSS 

54< »CLOS*C* OTTHMLST AUT0»CST .(40407*7*20. 37373737 37» 



000730 0292 

000732 DO 

000731 

000711 40407*7**0 

000 738 01 

000719 3737173T17 

000 7.lt 02 

000 73* ** 

0007*0 0010 



590* OC 

991* DC 
992»*CL0S»CT OS 

99 3* OC 

994* OC 

*S9* OC 

996* OC 

997*. OC 

99f* OC 



»n. i < * » 
n.ux*2o**«*x« io*«i> 

OK 

XC!« 40407*7*20* 

VLMI) 

W.9«3737373737« 

TCM2I 

X»*S» 

VC2<2«6*4I 



TOTAL AND ACT1VC «NT«Y CCUN000A 
»ACKE0 MIOTM ANO »NA» SIT 000A 

000A 

•97947 

000* 

A97967 

000A 

sno o* list character 000a 
o**sst oooa 



0007*2 1000 

000 7*4 9009009* 

000 7*8 0090000900000009 

000760 nooooooc 

000 76C 00 

ft00 7«O 0009 

000 7 A* 00 

900770 00000909 

000 77* 0000000 A 

900 77* 0000000 0000090C9 

000*4* 9090909000000000 
000*40 
000*90 10 
900*91 000*F* 



9«l 


• 


CONS 


TANTS 








962 


M4C96 


OC 


»<»4096» 








9C3 


RIGHT* 


OC 


*••• 






CONSTANT n* * 


964 


os*T»e 


OC 


XC?2«0« 






OISRCAV TA9CE 


969 


TWSCV* 


CC 


*«I2» 






LSNCTM O* 12 


966 


INC8X 


OC 


x«00« 






INOSX BVT* SAVS A9CA 


967 


cucvs*ve 


CC 


X»0009« 






CU.OV SAveAMSA 


see 


SSCSAV* 


OC 


*«0« 








96C 


St XC 


OC 


*•*• 








97C 


INABCA 


OC 


S00*«0» 






INPUT AREA 


S7| 


INAACAC 


*ou 


•- tN««e« 








972 


SA%* 


OC 


is*«e« 








97? 




OS 


0* 








«T* 


opce*oo» 


OC 


x»80» 








979 




OC 


ac it oecso 1 








•J76 


ocea 


DCS 


DSro»G-CX>H*C»** 


<«. 


. • ) . OON AMR sHOI* 70 .*. RO*»T »T .DEVOURS 








•»one«< ..a. At 


.COOS' 


■EBCDIC 



000*9* 

ooo*«o 
ooo*no 



S7B»« 
979*4 

oo*ao 9eo* 

9«i«ocea 

00*94 9«2* 



one *-20 
os o*«o« 

ORG •♦20 



DATA CONTROL BLOCK 



ro eitNtNATe unused srace 

ORI4IN ON WO»n SnUNOARY 
TO ORIGIN GENERATION 



000*94 00 
009*95 09000 1 
000*90 0009 
900*9A 1000 



se4*» 




COMMON ACCESS METHOD 


INTERFACE 


Stf>* 


OC 


AC 1(01 SU*NO 




587* 


OC 


AC3(I» BU*CB 




see* 


OC 


AC2I0I BU*L 




969* 


OC 


ec2« 0001 000800000000 • 





000*9C 00000001 



Appendix P: Remote 3270 Sample Program P-17 



LOC OBJECT COOK 



000**0 00 
000* A I 10 
000*** ** 
000**3 00 
000*** 00 

000**5 000000 



AOORI A0OR2 STMT SOURCE STATEMENT 



»SN 0200 11.07 06/07/76 



FOUNDATION EXTENSION 



s<** 


oc 


6L 1*00000000* 


34s» 


oc 


8LI' 0001 0000* 


?««♦ 


oc 


ALM2SSI 


■«7» 


oc 


ALIIOI 


S9e* 


oc 


M_ t *0O0OOCOO* 


344» 


oc 


AL 3 < I 



6*TEK.6*LN*MI ARCNV 

bt*m e»o»t cooe 

6T*N SU**ER COUNT 



REC*N 
EXLST 



000**6 C*C**1*2*7*0*3*0 
000*80 2 
000*61 00 
000*62 2020 



*0UNO*T!0N 6L0CK 



ftO?* 


OC 


CL«*003270* 


DON* HE 


604* 


r>c 


(M.I • 00000010* 


0*LGS 


to** 


oc 


8L I'COOOCOOO* 




fiOt* 


oc 


61.2*00 10000000 100000* 





nr** interface 



000*6* oooooooo 

000*68 00 

000*6 4 40 

000**)* 0000000000000000 

000*0* 0000000000000000 



000*E* 
000*E« 
000**8 
000**4 
000*** 

ooo**c 

000**0 
000*** 
000**6 

ooo**c 
ooo**e 
001 ooo 

001 001 
001 002 
OOI 00* 
001006 



oooooooo 

00 

01 

0000 

00000*40 

oooooooo 
oooooooo 
oooooooo 

0000 
0000 
00 
00 

oeoo 

oooooooo 

oooooooo 



eic» 


OC 


*I0 1 




61 1* 


OC 


8LI* OOOOOOOO* 




ei2» 


oc 


BL 1* IOOOO0C0* 




til* 


oc 


XL2ft*0* 




6t«» 


OC 


•**0* 




eie 


reao 


CHC60.TI .0C66, 


.«*-L 


617* 


OS 


0* 




«i«*o*ceo 


oc 


*<0 1 




614* 


OC 


8LI* 000* 




62C» 


oc 


*L 1 < 1 » 




6?l» 


nc 


AL2<0> 




«??♦ 


oc 


• (0C6R 1 




e23«- 


oc 


*<0 ) 




«*♦ 


OC 


*( 01 




«2S* 


oc 


*( • 




tPt* 


oc 


AL2<0> 




627* 


oc 


*12< C) 




62E* 


oc 


AH I > 




6 24* 


oc 


AL M C > 




63C* 


oc 


AL21 > 




• 31* 


oc 


AL«<0> 




632* 


oc 


*C«(0) 




433 


ENO 







LER8 



WOO* 

"AS.COO* 
CONTROL CHARS 



R*SERV*.0 



*V*NT CONTROL BLOCK 

TYRE *IELO 
LENGTH 

oca aooress 

AREA AODRESS 
ERROR IN*0. *l*LO ACOR 
T*RMINAL L'ST AOCRESS 
L I Ng NUN6ER 
RESPONSE «IELO 
TP-0P CODE 

error status 

cs« status 

current aooh list ptr 

Current aoor poll »tr 



P-18 OS/VS BTAM SRL 



NfflOCATION OICTIONARY 



'OS. to 


MCL.IO 


0001 


ooot 


0001 


0001 


ooet 


0001 


0001 


0001 



.ACS AOOOCSS 

OS 000091 

04 0002*3 

0* 000*41 

OC 000*tC 



ASM OtOO I LOT 0*/OT/T* 



C*CSS-*e»f«fNC( 



SVM90L 


IEN 


vaiuc 


oe*N 


*e*e*CNces 












ABNORMAL 


00001 


00000304 


00339 


00 102 


00137 


00299 


002*2 


00 2*4 


0026* 


002*9 


rascreg 


00001 


0000000R 


00039 


00071 


00072 


000 73 










RASC*e62 


00001 


0000009C 


00036 


90072 


0CC73 


C0074 










SCO IN 


00002 


0000004C 


OOOd* 


00077 














CMKCOT 


00091 


000002 A2 


00293 


00300 














CMKtT 


00001 


000040OA 


00131 


00134 














CHK41CC 


00001 


0000027C 


00291 


00274 














CMKTTCC 


00001 


00000272 


002T7 


00316 














CKTRll 


00091 


ooooo2Ae 


00297 


00242 














CKTR20 


00001 


0000029A 


00290 


00299 














CLE*" 


00001 


00000060 


000*2 


00174 


00227 












CieARINT 


00001 


00000 IRC 


00211 


001*0 


CC226 












ccose 


00001 


000002*0 


00319 


00200 


CC26C 












ciose •«• 


00001 


000009CI 


00420 


00144 


CC429 












ciosei«i 


00001 


000000 ic 


00429 


00200 














cuovsAve 


00002 


000007AQ 


00967 


00126 














*csr 


0000A 


00004*40 


00991 


ooo«e 

00622 


CC042 


00309 


00314 


00323 


00444 


004 90 


cecro 


00004 


ooooo*e« 


0061* 


00127 
00912 


C02T4 

C0979 


C0279 


002*2 


002*4 


0029* 


00241 


OS»TA9 


9003? 


0000074* 


00964 


00IC3 


CC144 












DSRTAORG 


00001 


0OOOOQO4 


00933 


04 143 


0C144 


C0I9I 


00164 


C02I* 






SIGHT 


00001 


00040400 


00090 


J0217 














EIGHT* 


00494 


00001744 


049*3 


09294 














ENTER 


ooeoi 


00000970 


00064 


00173 


CC22I 












ENTER1NT 


oooot 


00004174 


9014? 


00174 














EOTRS*T« 


00491 


00040940 


0009* 


00244 














'■ALUM* 


00001 


00009691 


00432 


001*6 


C0414 












eDAlUNOC 


00901 


00000004 


00414 


001*7 














*IV* 


00091 


00000009 


00946 


00113 


00139 


CC206 










*NTR*G 


00091 


0000000* 


00032 


00146 


CCI4* 


00191 


90192 


0CI6! 


00164 


00*17 


*RT0 


04001 


000001.10 


00194 


00I9S 














*MT092 


00001 


990000A7 


00170 


0C1 C4 














*rtoi 


40001 


00040110 


0016? 


00722 














*NTl 


00091 


ooooono 


30172 


00196 














**tisz 


00001 


0009COP* 


0014 7 


00166 














*nts» 


00001 


ooooo inc 


00 22 


01197 














*"T2SZ 


90001 


000000*7 


0041 | 


00213 














*nosei 


OOCOl 


000040*C 


00140 


00133 














FORMATBR 


00 001 


00000124 


0019* 


00192 














PORRATO 


00001 


000093IC 


00144 


0010* 


CC170 












FORMAT 1 


00 00 1 


000001C1 


00372 


00I6S 


CC147 












PORMAT2 


oooot 


00000*"»O 


00344 


00212 


0C4II 












FOUR 


00001 


00000004 


00049 


00163 


C0173 


00179 


00177 


00174 


00221 


90223 


FOURTYI 


oooot 


00000041 


00460 


00262 














HA 096 


00092 


00000742 


009*2 


00074 














IMR0003A 


00002 


00000074 


00140 


00096 














INAREA 


00 00« 


00000779 


00970 


001*0 
00310 


00121 

C0463 


00121 
C0462 


00122 

00900 


00122 
C0971 


0012* 


001 12 


inoek 


000011 


000007AC 


009*6 


00141 


ceise 












INITIAL. 


040011 


090900*2 


00107 


40117 














IAST 


000011 


000000*4 


00066 


90114 


CC136 


00207 










LNKREG 


oooot 


00000004 


09034 


90110 


0011 1 


00112 


00123 


00124 


00129 


00167 










00214 


00219 


C0216 


00233 


00234 


00239 


90292 










oosca 


00924 













ASM 0200 11*47 06/07/7* 



002 70 00293 00297 002*9 00299 00303 



904*1 044*9 004*0 0044* 0044* 0090* 00917 C0922 
90294 00244 90 10? 00199 40449 00496 00479 00*42 



00224 00227 



00173 04179 90 177 00179 00221 00223 00229 00227 



0916* 00169 90144 00149 00140 00203 0090* 00209 
00294 00299 002*0 042** 002*4 00492 00471 004*9 
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c«oss-«e***eMce 



Symbol 



LEN 



value 



oepn 



pefepences 
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MSC.AOOP 

MS6LEN 

NOP* I NT 

NOPTP 

NOt»T»L 

ONCEMOPf 

ONE 

PA1 

PAl INT 

p*a 

PA2INT 
PA2INT1 
POLOSPLY 
PEAO 

peaobu* 

PEAOTl 

peg? 
petcooe 

9TNCDC 
PTNCOPG 
PTNCDTAB 
*TNCO0 

PTNcnic 

PTNCO10 
PTNC014 

p tnco i 8 
ptnco?o 

PTNC024 

PTMCOA 

PTNC08 

save 
sflosplv 

SSL »P G 

selsave 
sevenf 

SIXL 
SIXTN 

specpol 

SSCMECK 

STAPT 

TtMEOUT 

TP06 

TP1 1 

TP20 

TWLVS 

TWENTY4 

TWENTV8 

two 

■ AITO 
■OP.KPFG 

WP ITETT 
ZE90 



oooot 

00001 
00001 
00001 
00001 
00001 
00001 
00001 
30001 
00001 
00C3I 
00001 

oooot 

00001 
00001 
00001 
00 001 
00001 
00001 
00001 
00001 
00001 
00001 
00031 

oooot 

00001 
00001 
00031 
00001 
00301 
0003* 
00001 
00031 

0000* 

oooot 

0OOO4 
00001 
00001 
00001 

30004 
30 001 

oooot 

00001 

oooot 

0000* 
00031 
00001 
00001 
00001 
00 001 
00001 

oooot 



0000000* 

ooooooos 

00000200 
000003*4 
00000020 
000001PC 
0000030 1 
0000006C 
00000 nc 
0000006E 
00000190 
00000190 
00003T33 
000030AA 
000003FO 
00000618 
00000002 
00000218 
0000024C 
00000008 
0000021C 
00000244 

ooooos»3c 

00000293 
00000254 
00000251 
000032*0 
00003264 
00000246 
0000024C 
00OO0F48 
0000071 A 
000000^6 

0O0O0TTO 
000033" 
0000077* 
000003IO 
00000724 
00000104 
0000007% 
00000001 
00000006 
00000011 
000000*3 
00000768 
0000001 8 
0000001 C 
00000002 
00000266 
00000003 
000006 08 
00000000 



00029 
00030 
00230 
00413 
0041 8 
03202 
03042 
00061 
00192 
00063 
00194 
00198 
00352 
00119 
00428 
00434 
03027 
00238 
00237 
000 3* 
30 24 
00231 
00263 
00239 
03261 
00263 
00267 
00269 
00231 
03236 
00372 
03331 
00031 

00368 
00063 
00369 
00032 
0034» 
00330 
00103 
00036 
00048 
00031 
00033 
00363 
00034 
00033 
00043 
00272 
00028 
00438 
00041 



00108 
001 09 
00193 
00231 
00232 
00210 
001 16 
00173 
00176 
00177 
00172 
002?e 
00463 
00119 
00430 
00123 

ooi ie 

001 I 1 
00244 
00239 
03239 
00241 
00948 
00?4« 
00246 
00247 
00249 
00230 
30242 
0324'» 
0007! 
00104 

00 104 
00147 
00147 
3027J 
00143 
03266 
00129 

ooi2e 

00093 

002»e 

00284 
00292 
00291 
00288 
00127 
00284 
00126 
00112 
00142 
00110 

001 14 



C0I2O 00163 00186 00199 00212 00231 00446 00302 00319 
C0I66 C0IS7 002C0 00213 00232 00443 00497 



C0I12 C0I34 00138 00209 

0C223 

C0224 

00223 



ooiTo eciet ooipi 00219 00220 30236 00296 



C0I3O 30134 00134 00141 00142 00143 00144 00146 00150 00131 00164 00218 
0C124 CO 168 00189 00204 00213 00234 



00076 C0323 00344 

CC143 C320I 

00113 COM3 00114 0011* 00116 C0I29 00132 00133 00 135 30116 00139 00138 00143 00146 

CC2CI C0206 C0236 0020T 00209 0020« 00447 00301 



0C3C2 

0C294 

00291 C0298 00 302 

CC126 C0132 00132 

CCI2S 00169 00190 00203 00216 00233 

C0144 

CC167 00188 00203 00214 00233 

00136 COISl 00164 C0207 00218 



ASSEMBLE* DIAGNOSTICS ANO STATISTICS 



NO STATEMENTS FLAGGED IN THIS ASSEVfLV 

HIGHEST SF.VE9ITV WAS 3 

OPTIONS »OP THIS AS5EM81.Y 

ALIGN. ALOGtC. BUFS I ZF < 3T0 > . OECK . ESO. FLAG(O). L I KCCOUhT I 33 > . LIST. NOMCALL. YFLAG 
NOMLOGIC. NONUMBE8. NOOBJECT. MOPfNT. OLC. NOSTMT. NOLIBMAC. NOTE9MINAL. NOTEST. X9EF<SHOPTI 
SYSPAPMf ) 

• 09K FILE BUFFER SIZE • 7J>Q4 

TOTAL PECOPOS OEAO FPO* SYSTEM INPUT 448 

TOTAL PECOPOS BEAD FROM SYSTEM LIBPAPY 7077 

TOTAL PECOPOS PUNCMEO 77 

TOTAL PECOPOS °9tNTEO «31 



ASM 0200 11.07 OF/07/76 
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APPENDIX Q: USING SWITCHED NETWORK BACKUP WITH THE IBM 3872 OR 3875 MODEM 



Using an IBM 3872 or 3875 Modem with the 
Switched Network Backup feature, an appli- 
cation program can communicate with one or 
more terminals on a failing nonswitched 
line by having the system operator dial and 
connect specified terminals on a switched 
line. 

The application programmer must do these 
things to use Switched Network Backup: 

• Define the switched backup lines as 
nonswitched lines in a DCB macro 
instruction. (The 3872 or 3875 has the 
ability to convert nonswitched commands 
into switched operation.) 

• Write code to determine that a line is 
out of operation or has excessive 
errors. (For example, the LERB macro 
instruction can be used to maintain 
error counts, and a Switched Network 
Backup routine can be branched to when 
a specified threshold has been 
exceeded. ) 

• Write a Switched Network Backup rou- 
tine, which will allow the system 
operator to set up the modem and make 
the dial connection, open the switched 
backup line, and communicate with the 
designated terminal. If more than one 
terminal is to be connected, separate 
connection must be made and separate 
program-to-terminal communication must 
be conducted with each terminal. 

Here is a possible procedure for using 
Switched Network Backup: 

1. On determining line failure or exces- 
sive errors, ensure no more activity 
on that line. 

2. The program should write a message to 
the system console requesting the 
operator to follow a designated 
Switched Network Backup procedure, 
specifying the failing line and the 



dial number for the terminal to be 
connected on the backup line. 

3. The system operator, following the 
procedure provided for him, should 
make required changes to the 3872 or 
3875 Modem, dial the designated numb- 
er, tell the terminal operator to make 
required changes to his 3872 or 3875 
Modem, and notify the program from the 
console when assured that proper con- 
nection exists. 

4. The application can now communicate 
with the connected terminal. READ and 
WRITE macro instructions should refer 
to the DCB defined for the backup 
line. Since the 3872 or 3875 allows 
communication as though the terminal 
were still connected, on a nonswitched 
line, the same READ and WRITE macro 
instruction types applicable to non- 
switched operation are used for backup 
operation. For multipoint WRITE macro 
instructions, the same addressing list 
can be used for selection that was 
used to write to the terminal prior to 
backup operation. For multipoint READ 
macro instructions, a polling terminal 
list of the AUTOLST format must be 
defined with a single entry, contain- 
ing the polling characters for the 
connected terminal. (This will pre- 
vent recurrent timeouts from no 
response if devices other than the one 
connected were to be polled. ) 

5. When communication is complete between 
the program and the terminal (deter- 
mined either by the terminal operator 
hanging up or by the program determin- 
ing that no further communication is 
required) , the program should notify 
the system operator to return the 3872 
or 3875 Modem to normal operation. 

For additional information, see IBM 3872 
Modem User's Guide , GA27-3058, or IBM 3875 
Modem User's Guide, GA33-0001. 



Appendix Q: Using Switched Network Backup with the IBM 3872 or 3875 Modem Q-l 
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APPENDIX R: BTAM STORAGE ESTIMATES FOR VS2 



In VS2, BTAM modules occupy approximately 1900 bytes of the following storage in the 
nucleus as follows: 

• IGC058 310 bytes 

• IECTATEN 570 bytes 

• IECTSVC 1000 bytes 

The virtual storage requirement for retrieving or storing a data set with BTAM is 
estimated by adding the following requirements: 

• coding-space area (BTAM module and macro expansion size) 

• control-block area by line groups (Device I/O module size) 

• control-information area 

• control-block area by lines 

• channel-program area by lines 

• code translation table area 

The coding-space estimate (Figure 125) includes the BTAM code required to support the 
READ, WRITE, REQBUF , and RELBUF macro instructions, and dynamic buffer allocation. This 
code is sharcible across line groups and is not duplicated for multiple data control 
blocks open at the same time. 



Description 



Remote Requirement 



T 1 

I Local 3270 Requirement I 

^ 



J. .1 

1 Primary requirement: 


y H 


y 


1 • without buffer management 


11000 


5000 


1 • with buffer pool support 






1 (REQBUF and RELBUF) 


11500 


5500 


1 • with dyneimic buffering 


14000 


(Not applicable) 


1 Optional requirement: 






1 • online test 


3200 


750 


1 • if ONLTST macro is used 


500 


(Not applicable) 


1 • line-error print (LERPRT) 


400 


(Not applicable) 


1 • line open (LOPEN) 


600 


600 


1 • translate (TRNSLATE) 


180 


(Not applicable) 


1 • change entry for polling 






| list or local 3270 (CHGNTRY) 


380 


90 


| • if RESETPL macro is used 


800 


800 


1 with ATTENT specified 


(not applicable) 


250 


| with POLLING specified 


600 


(not applicable) 


j with ANSRING specified 


330 


(not applicable) 


1 • World Trcide Telegraph 






1 terminals 


1200 


(Not applicable) 


1 • change entry for expanded 






1 ID verification (CHGNTRY) 


50 


(Not applicable) 


1 • edit routine TPEDIT, 






1 IECTEDIT 


2048 


(Not applicable) 



L J. X_„-_ J 



Figure 125. BTAM Coding-Space Estimate 



Appendix R: BTAM Storage Estimates for VS2 Rel 3.8 R-l 



Select the appropriate entry from Figure 126 for each type of terminal to be supported 
under BTAM. 



Terminal Device 



Virtual Storage 

Requirement 

(bytes) 



IBM 1030 Data Collection System 



224 



IBM 1030 Data Communication System with Autopoll 



224 



IBM 1050 Data Communication System 



240 



IBM 1050 Data Communication System on a switched network 



312 



IBM 1050 Data Communication System with Autopoll 



208 



IBM 1060 Data Communication System 



192 



IBM 1060 Data Communication System with Autopoll 



200 
296 



IBM 2260 Display Unit attached as a remote terminal with a 2701 
adapter 



IBM 274 Communication Terminal 



152 



IBM 2740 Communication Terminal with checking 



272 



IBM 2740 Communication Terminal with checking and OIU (Optical 
Image) 



264 



IBM 2740 Communication Terminal with station control 



152 



IBM 2740 Communication Terminal with station control and checking 



216 



IBM 2740 Communication Terminal on a switched network 



176 



IBM 27 4 Communication Terminal with checking on a switched 
network 



272 



Figure 126 (Part 1 of 2) . BTAM Control-Information Area Estimate by Device Type 
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Terminal Device 



Virtual Storage 

Requirement 

(bytes) 



IBM 2740 Communication Terminal with transmit control on 
switched network 



192 



IBM 274 Communication Terminal with checking and OIU on a 
switched network 



336 



IBM 2740 Communication Terminal with transmit control and 
checking on a switched network 



272 



IBM 2740 Communication Terminal with station control, checking, 
and Autopoll 



216 



IBM 2740 Communication Terminal with station control and 
Autopoll 



152 



IBM 2741 Communication Terminal 



112 



IBM 2741 Communication Terminal on a switched network 



144 



IBM 3270 Display Station Local 



120 



IBM BSC Terminal on a nonswitched, point-to-point network 



288 



IBM BSC Terminal on switched network 



424 



IBM BSC Terminal on a nonswitched multipoint network 



320 



AT&T Model 33/35 TWX stations 



176 



AT&T 83B3 Selective Calling Stations 



152 



Western Union Plan 115A Outstation 
World Trade Telegraph Terminals 



144 
160 



Figure 126 (Part 2 of 2) . BTAM Control-Information Area Estimate by Device Type 



Appendix R: BTAM Storage Estimates for VS2 Rel 3.8 R-3 



Select the appropriate entry from Figure 127 for each line group. 



f + + ., 



Control Block 



Remote 
Virtual Storage 
Requirement 
[bytes) 



I Local 3270 Virtual 
I Storage Requirement 
I (bytes) 



Data control block 

• with binary synchronous communications 

Data extent block 

Interruption request block 
Interruption queue element 



56 
84 



56 



120+(4 per line) I 56+ (4 per line) 



124 
24 



250 
48 



i , x j. J 



Figure 12 7. BTAM Control Block Area for Each Line Group 



Select the appropriate entries from Figure 128 for each line and add to obtain the 
total control block area requirement for each line. 

r T T 





Remote 






Virtual Storage 


1 Local 3270 Virtual 


Control Block 


Requirement 


1 Storage Requirement 




(bytes) 


1 (bytes) 


Data event control block 


40 


1 40 


• with binary synchronous communications 


48 




Input/output block with a minimum of 4 






CCWs 






• with binary synchronous communications 


96 




• with start/stop communications 


120 




• with local 32"'0 communications 




1 88* 


Unit control block 


20 


1 44 


Line error block (LERB macro instruction) 


20 


1 (Not applicable) 



'Only has space 
for 3 CCWs. 



Figure 128. BTAM Control Block Space for Each Line 
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Select entries from Figure 129 for each line according to its device. 



t -----., 

Virtual Storage 

Requirement 

(bytes) 



Terminal Device 



IBM 1030 Data Collection System 

IBM 1030 Data Collection System (P) 

IBM 1050 Data Communications System 

IBM 1050 Data Communications System (P) 

IBM 1050 Data Communications System (A,D) 

IBM 1060 Data Communications System 

IBM 1060 Data Communications System (P) 

IBM 2740 Communications Terminal 

IBM 2740 Communications Terminal (C) 

IBM 2740 Communications Terminal (C,0) 

IBM 2740 Communications Terminal (A) 

IBM 2740 Communications Terminal (D) 

IBM 2740 Communications Terminal (A,C) 

IBM 2740 Communications Terminal (D,C) 

IBM 2740 Communications Terminal (D,C,0) 

IBM 2740 Communications Terminal (A,D,T) 

IBM 2740 Communications Terminal (A,D,T,C) 

IBM 2740 Communications Terminal (S) 

IBM 2740 Communications Terminal (S,P) 

IBM 2740 Communications Terminal (S,C) 

IBM 2740 Communications Terminal (S,C,P) 

IBM 2741 Communications Terminal 

IBM 2741 Communications Terminal (A) 

IBM 3277 Display Station (Local) 

IBM BSC Terminal on a nonswitched point-to-point network 

IBM BSC Terminal on a switched network 

IBM BSC Terminal on a nonswitched multipoint network 

IBM 2260 Display Unit (R) 

AT&T 83B3 Selective Calling Stations 

AT&T Model 33/35 Teletypewriter Exchange Terminal using the eight- 
bit Data Interchange Code (A) 

AT&T Model 33/35 Teletypewriter Exchange Terminal using the eight- 
bit Data Interchange Code (D) 

Western Union Plan 115A Outstations 

World Trade Telegraph Terminals 



64 
88 
64 
80 
88 
56 
80 
40 
48 
64 
48 
56 
48 
64 
64 
64 
64 
56 
88 
64 
88 
48 
48 
24 
72 
80 
88 
64 
48 

56 

56 
40 
40 



Where: 

A = Automatic answering 

C = Checking 

D = Dialing (automatic calling) 

P = Autopoll 

R = Remote attachment with an IBM 2701 Type III Adapter 

S = Station control 

T = Transmit control 

O = IBM 2760 Optical Image Unit 



Figure 129. BTAM Channel Program Space Estimate by Device per Line 
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Figure 130 contains the storage requirement for code-translation tables (AMSTRTAB) _per 
device. 

r T n 

I I Virtual Storage I 
I Description I Requirement I 
I " I (bytes) I 
> + H 

I Input Translation (transmission code to EBCDIC) I 256 I 
(. + ., 

I Output Translation (EBCDIC to transmission code) I 256 I 

l , x J 

Figure 130. Storage Requirement for Code-Translation Tables for BTAM 



BTAM EXAMPLE 

This example shows how to estimate the dynamic storage required by a telecommunications 
application with Auto Poll and buffer pool support but without dynamic buffering or 
binary synchronous communications . 

Assume a VS2 configuration of: 

One line with three IBM 1050 Data Communication System Terminals and one line with two of 
these same terminals. 

Basic system information: 

• one line group 

start-stop error recovery procedures 

• translation 

• one DECB per line 

BTAM coding-space area estimate (11500+180+380) 12060 

Control-information area by device type 208 

Control-block area estimate for one line group 332 

Control-block area estimate for two lines 360 

Channel-program space for two lines 160 

Translation tables for input and output (256x2).... 512 

Total 13,632 bytes 
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ABEND 
ACK 

addr(s)(ing:i 

ADJ 

AID 

ALT 

ANSUR 

APPEND 

ASCII 

ATTN 

AUTH 

AUTO 

AUTOPOLL 

AVAIL 

BCT 

BISYNC 

BLK 

BR 

BRK 

BSC 

BTAM 

BTBL 

BUFR 

BUSSOUT 

CALC 

CC 

CCC 

CCH 

ecu 

CCUCMD 

CCUREG 

CC3 

CDC 

CE 

CEA 

CHAN 

CHAR(S) 

CHE/ABE 

CHGNTRY 

CHK 

CLR 

CMD(S) 

CNT(S) 

COM CH 

COMP 

COND 

CONN 

CONT 

CPA 

CPS 

CPU 

CR 

CSECT 

CSU 



ABnormal END 

Acknowledgment 

ADDRess(ES),(ING) 

ADJUSt 

Attention iDentifier 

ALTernate 

ANSUeR 

APPENDage 

American national Standard Interchange 

ATTention 

AUTHor i ze/AUTHor i ty 

AUTOmatic 

AUTOmatic POLL ins of a mult i -point line. 

AVAILable 

Branch on Count 

Binary SYNChronous communication 

BLocK 

BRanch 

BReaK 

See BISYNC 

Basic Telecommunications Access Method 

Branch TaBLe 

BUFfeR 

Outbound signals or power from processing unit 

CALCulate 

Condition Code 

Channel Control Check 

Channel Check Handler 

Channel Control Word 

CCU CoMmanD code 

Register used to address the CCU 

Condition Code of 3 

channel Data Check 

Channel End 

Channel End Appendage 

CHANnel 

CHARacter(S) 

CHannel End or ABnormal End appendage 

CHanGe eNTRY 

CHecK 

CLeaR 

CoMmanD(S) 

COUNT (S) 

COMmand CHaining 

COMPlete 

COND i t i on 

CONNection 

CONTinuous, CONTinue 

Channel Program Area 

Characters Per Second 

Central Processing Unit 

Carriage Return or credit symbol 

Control SECT ion 

Channel Status Uord 



ABBREVIATIONS AND ACRONYMS ABBR1 



CTRL ConTRoL 

CUE Control Unit End 

CVT Communication Vector Table 

DEL WD DouBLeWorD 

DC Data Check or Define Constant 

DCB Data Control Block 

DE Device End 

DEB Data Extent Block 

DEC DECimal 

DECB Data Event Control Block 

DECR DECRement 

DEL the DELete character 

DEV DEVice 

DIAG DIAGnosis 

DLE Data Link Escape 

D/TNNNN Device Type with NNNN relating to the device number 

DUP Duplicate 

DYN(BUF) DYNamic BUFfering 

EAU Erase All Unprotected 

ECB Event Control Block 

ENQ ENQuiry 

EOA End Of Address 

EOL End Of Line 

EOM End of Message 

EOR End Of Record 

EOT End-Of-Transmission 

EP Entry Point 

ERP Error Recovery Proecdures 

ERR ERRor 

ERRCT ERRor CounT 

ESC Escape 

ESR Extended Svc Router 

ESTAE Extended Specify Task Abnormal Exit macro instruction 

ETB End of Text Block 

ETX End of Text 

EUA ERP (Error Recovery Procedure) work Area 

EUASTUP ERP STatus UPdate 

EUR Erase WRite 

EXCP Execute Channel Program 

EXT EXTent OR EXTernal 

EXTKEY EXTernal KEY 

FEAT FEATure 

FLD FieLD 

FLG FL3G 

GRAF GRAPHiCS 

GS Group Separator 

GT Greater Than 

HIO Halt Input/Output 

IAM Identification of terminal 

ICC Interface Control Check 

ID iDentif ication 

I NCR INCRemsnt 

IND iNDicate 

INFO iNFOrmation 
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INIT INITialize 

INST iNSTruction 

INTERV INTERVention 

INTRNL INTeRNaL 

I/O Input op Output 

IOB Input/Output Block 

IOS Input/Output Supervisor 

IOSB Input/Output Supervisor Block 

IPT inPuT 

IQE interruption Queue Element 

IR Intervention Required 

IRB interruption Request Block 

ITB Intermediate Text Block 

LD Load OR Lost Data 

LERB Line Error Recording Block 

LVL LeVeL 

LZF Left Zero Fill 

L3270 Local 3270 

MAINT MAlNTenance 

MASTERUCB MASTER Unit Control Block 

max max i mum 

MDR Miscellaneous Data Record 

MOD MODule 

MPT MultiPoinT 

MSG MeSsaGe 

NAK Negative Acknowledgment 

NOP No operation 

NORM NORMal 

NSI Next Sequential Instruction 

OBR OutBoard Recording 

OIU Optiocallmage Unit 

OLT OnLine Test 

OLTEP OnLine Test Executive Program 

ONLTST This is a macro instruction 

OP operation 

OPER OPERand 

ORIG ORIGin 

PARMLIST PARaMeter LIST 

PCI Program Control interrupt 

PPL Purge Parameter List 

PREV PREVious 

PROT PROTection 

PSW Program Status Word 

PT PoinT 

PTOP 1130/2250 GRAPHICS TERMINAL 

PTR PoinTeR 

R Real 

RB Request Block 

RC Return Code 

RCV Receive 

RD ReaD 

RDY ReaDY 

READINDX READ INDeX 

READYQ READY Queue 



ABBREVIATIONS AND ACRONYMS ABBR3 



REC RECord or RECeive 

RECFM RECord ForMat 

REG REGister 

REL RELeasa 

REQD REQuireD 

RES RESident 

RESETPL RESET Polling List or RESET Line 

RESP RESPonse 

RFT Request For Test 

RLN Relative Line Number 

RQE Request Queue Element 

RTN RouTiNe 

RTRY ReTRY 

R/U Read or Write 

RVI Reverse Interrupt 

SAD Sat ADdress 

SBA Set Buffer Address 

SDUA System Diagnostic UorkArea 

SEL SELect 

SEQ SEQuence 

SIG SiGnal 

SIO Start Input/Output 

SIOCC Start Input/Output Condition Code 

SLI Suppress Length Indicator 

SM Status Modifier 

SNO Should Not Occur 

SNS SeNSe 

SOH Start Of Header 

SOH^N Header format for system/non-user data message with N 

relating to the type of message. 

SOU Start Of Massage 

SOR Start Of Record 

SPEC SPECify or SPECial 

S/S Start-Stop 

STAT STATUS 

STRAM Synchronous Transmit and Receive Access Method 

STX Start of Text 

SVC Supervisor Call 

SW SUitched 

SULST Operand and form of terminal list 

SYS SYStem 

T.O Timeout 

TBL TaBLe 

TCB Task control Block 

TCCW I0S( input/Output Supervisor) Translation Control block 

TCU Transmission Control Unit 

TERM TERMination 
TP-OP CODE Teleprocessing operation CODE 

TRANS SEE X***X AREA OF LIST 

TRANSRTN TRANSlate RouTiNe 

TRANSRTV TRANSlate Real address To Virtual address 

TRANSCODE 6 BIT CODE 

UC Unit Check 

UCB Unit Control Block 
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UEX Unit Exception 

us Unit Specify 

14/ With 

MACK WAit before transmit 

wcc Write control character 

WRT WRiTe 

WRU Who aRe toU 

WTG Where To Go 

WTO Write To operator 

WTOR Write To Operator with Reply 

XCTL Transfer ConTroL 

XFER Transfer 

XLATE TransLATE 

XMISSION TransMISSION 

XTNTS eXTeNTS 

XX Online test parameter (Test number to be run) 

YY Online test parameter (Number of times to be run) 
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GLOSSARY 



Access Method ; any data management facili- Buffer Pool ; main storage area per line 



ty available to the user for transferring 
data between main storage and an input/ 
output device. 

Addressing ; the means whereby the central 
processing unit (CPU) selects the unit to 
which it is going to send a message. 

Audio Response Unit ; a control unit, such 
as the IBM 7770 or IBM 7772, that is able 
to deliver an audio response to a digital 
inquiry. 

Basic Access Method ; any access method in 
which each input/output statement causes a 
corresponding machine input/output opera- 
tion to occur. 

Basic Telecommunications Access Method ; a 
basic access method for communication with 
terminals. 

Baud ; a unit of signalling speed equal to 
the number of discrete conditions or signal 
events per second. For example, one baud 
equals one bit per second in a train of 
binary signals, or one 3- bit value per 
second in a train of signals each of which 
can assume one of eight different states. 

Baudot code ; a code for the transmission 
of data in which five equal-length bits 
represent one character. 

Binary Synchronous Communications ; a gen- 
eral purpose data link control procedure 
permitting a variety of types of devices, 
acting as station, to communicate with one 
another over a communication line using a 
standardized set of control characters for 
synchronous transmission of binary- coded 
data. 

Block ; a portion of a message terminated 
by an End- of -Block character or by an End- 
of-Text character. 

BSC Intermix ; the capability of different 
BSC devices to communicate over the same 
nonswitched multipoint communications line, 
or over the same problem prog ram- defined, 
switched point-to-point communications 
line, to a control or central station. 

Buffer (program input/output) ; a portion 
of main storage into which data is read or 
from which it is written, concurrent with 
asynchronous CPU activity, which is used to 
compensate for a difference in rate of flow 
of data, or time of data events, when tran- 
smitting data from one device to another. 



group reserved for buffering. 



Calling ; a switch exchange service which 
enables a telephone user to select another 
subscriber, that is, dialing. 



Central Station ; the controlling station 
(usually a CPU) in a centralized, switched 
point-to-point data communications system. 
Message traffic is always between the 
central station and one of the remote 
stations . 

Centralized Communication System ; a system 
in which message traffic is always between 
the controlling station and one of the 
remote stations. 

Chaining ; a system of storing records in 
which each record belongs to a list or 
group of records and has a linking field 
for tracing the chain. 

Command Control Block ; refer to IBM 
System/360 DOS System Control and System 
Services Programs . GC24-5036. 

Communication Line ; the medium (wire, car- 
rier channel, radio channel, etc.) over 
which signals may be sent. 

Contention (start-stop) ; a condition on a 
multipoint communication channel when two 
or more locations try to transmit at the 
same time. 

Contention (BSC) ; the condition on a 
point-to-point communication when the CPU 
and the remote device bid for control of 
the line simultaneously. 

Control Character ; a character whose 
occurrence in a particular context 
initiates, modifies, or stops control 
action: for example, a character that con- 
trols transmission of data over communica- 
tion networks. The control character is 
recognized by the control units of the ter- 
minals as well as by the telecommunications 
control units. 

Control Mode ; the state that all terminals 
on a line must be in to allow line discip- 
line, line control, or terminal selection 
to occur. When all terminals on a line are 
in control mode, characters on the line are 
viewed as control characters performing 
line discipline, that is, polling or 
addressing. 
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Control Station : the station (usually a 
CPU) in a multipoint nons witched data com- 
munication system that controls message 
traffic by means of polling and selection. 

Cursor : an automatically inserted, visual, 
display position marked that denotes the 
display position on the 2260 Display Unit 
screen that the next character entered will 
occupy and/or marks the end of a message. 

Data Adapter Unit (2701) : a control unit 
that houses transmission adapters. Each 
transmission adapter contains the circuitry 
and the logic for the control and logical 
connection of a terminal. One transmission 
adapter is required per line (see Telecom- 
munication Control Unit ) . 

Data Collection System : a system mainly 
used for gathering data. 

Data Communication System : a system mainly 
used for the transmission of information. 

Data Link : the communications lines, 
modems, and communication controls of all 
stations connected to the line, used in the 
transmission of information between two or 
more stations. 

Data Set : a devzce which performs the 
modulation/demodulation and control func- 
tions necessary to provide compatability 
between business machines and communica- 
tions facilities. 

Digitally Coded Voice (DCV) : binary infor- 
mation necessary to the IBM 7772 Audio 
Response Unit to synthesize the sound, 
word, or sentence so coded, when received 
from the CPU through a WRITE command. The 
digital equivalent of all the sounds, 
words, or sentences used by a given appli- 
cation will usually be stored on a direct 
access device. An average of 300 bytes per 
second of audio output is necessary. 

End of Block : a control character used to 
partition a message into blocks and initi- 
ate a control function. 

End of Inquiry : any character recognized 
by the IBM 7770 or IBM 7772 as a signal 
that the inquiry is complete and the end of 
read command status should be generated and 
sent to the CPU. The character itself will 
be sent as the last character of the input 
message. 

End of Transmission : a control character 
(or character string) that specifies the 
end of a message and causes a reset of all 
stations. 

Event (in BTAM) : the satisfying of a WAIT 
condition, an event may be one of the 
following: 



1. A successful completion of a READ, 
WRITE, CONTROL, or RESETPL operation; 

2. A PCI (7772 only) ; 

3. An unsuccessful operation, as follows: 

a. polling: when the end of an OPEN 
list is reached, polling stops; 

b. addressing: when the addressed 
device is not ready, no message is 
sent; 

c. multi-addressing: when one of the 
addressed devices is not ready, 
the message is not sent to the 
ready devices; 

d. an error condition. 



Inquiry : an input message calling for an 
answer . 

Leased Line : a data path reserved for the 
exclusive use of one customer. 

Line : see Communication Line . 

line Connection : a physical connection of 
terminals attached to a switched network 
that must be established before data trans- 
mission can take place. 

Line Control Characters : a set of special 
characters which are not part of the text. 
A line control character is recognized by a 
telecommunications control unit, which per- 
forms the function associated with that 
character. 

Local Device : a device directly attached 
to a channel by means of a control unit 
(see Remote Device ) . 

Message : an arbitrary amount of informa- 
tion whose beginning and end are defined or 
implied. 

Message Segment : a portion of a message 
that is contained in a single buffer. 

Modulation : the periodic variation of amp- 
litude, frequency, or phase of a carrier 
wave created by the data flow. 

Multicomponent Addressing : the selection 
by the CPU of several receiving devices of 
the same terminal and the sending of a mes- 
sage that is recorded by all selected 
devices. 

Multidrop Line : see Multipoint Line . 

Multipoint Line : a line with one or more 
terminals attached to it (see 
Point- to-Point) . 
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Multi-terminal Addressing ; The selection by 
the CPU of several receiving devices per- 
taining to several terminals on one line 
and the sending of a message which is reco- 
rded by all selected devices. 

Network: a series of points interconnected 
by communication channels (see Switched 
Network ) . 

Noncentralized Communication System : a 
system in which a terminal may send a mes- 
sage directly to another terminal without 
involving the control station in a message- 
switching operation. 

Nonswitched Line : a multipoint or point- 
to-point configuration in which connection 
is not established through a switched 
network . 

Point- to- Point : a line configuration in 
which the line permits exchange of informa- 
tion between two stations only. For 
example, on a switched network, once con- 
nection is established the configuration is 
point-to-point (see Multipoint Line ) . 

Polling : the process of inviting stations 
within a data link to transmit messages . 
The stations are invited one at a time in 
an orderly fashion. The basic function of 
polling is to prevent contention by ensur- 
ing that only one station transmits at a 
time. 

Polling Characters : characters used to 
establish contact with a terminal. 

Private Line : a data path reserved exclu- 
sively for one user. 

Record : a whole message or a portion of a 
message, received or sent by a single read 
or write command. A record will be ter- 
minated by an EOB character, an ETX 
character, or an EOT character. 

Remote Device : a device that is attached 
to a telecommunication control unit by 
means of a communication network. 

Remote Station : a station, other than the 
central station, on a centralized, point- 
to-point switched network which can commun- 
icate only with the central station. A 
remote station can be selected by the 
central station, or can call the central 
station if it has a message to send. 

Start-Stop Transmission : a synchronous 
transmission in which each group of code 
elements corresponding to a character sign- 
al is preceded by a start signal which 
serves to prepare the receiving mechanism 
for the reception and registration of a 
character, and is followed by a stop signal 
which serves to bring the receiving 



mechanism to rest in preparation for the 
reception of the next character. 

Station : an aggregate of equipment and 
controls attached to any one of the several 
ends of a communication line. 

Switched Lines : lines whose connection 
must be established prior to the start of 
data transmission. 

Switched Network : a configuration in which 
the connection is established between the 
calling party and the called party prior to 
the start of data transmission and is bro- 
ken at the end of the data transmission. 

Telecommunications : pertaining to the 
transmission of signals over long dis- 
tances, such as by telegraph, radio, or 
television. 

Telecommunications Control Unit : a device 
used to transmit or adapt messages, coming 
from a remote device, for the CPU. 

Teleprocessing : a term associated with IBM 
telecommunication systems expressing data 
transmission between a computer and remote 
devices . 

Terminal : any device capable of sending 
and/or receiving information over a com- 
munication channel (see Station ) . 

Terminal Component : an input or output 
device that is part of a terminal. 

Text Mode : message transfer state. The 
message transfer state exists on a data 
link during the transfer of a message or 
messages from sender to receiver and the 
replies required to ensure their correct 
transfer (see Control Mode ) . 

Transmission Control Unit (2702. 2703) : a 
control unit that houses terminal controls. 
Each terminal control contains the circui- 
try and logic for the control and logical 
connection of all terminals of the same 
type within the system (see Data Adapter 
Unit ). 

Tributary Station : a station, other than a 
control station, on a centralized multi- 
point communication system which can com- 
municate only with the control station, and 
only when polled or selected by the control 
station. On a noncentralized multipoint 
communication system, a tributary station 
that has been granted use of the line by 
the control station can select another tri- 
butary station as the receiver. 

Unit : in teleprocessing, a physical I/O 
unit, characterized by a unique physical 
address. For example, a line is a unit; 
the IBM 2260 Local is a unit. 
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INDEX 



In this index, the word "macro" is equiva- 
lent to "macro instruction." 

abbreviations ABBR1 
Abend codes C18-C20 
access method, defined 1 
accumulators,, error threshold 241 
acknowledgments (see responses) 
ACK-0, ACK-1 sequences 20 
Acronyms ABBRl 

ACSMETH operand (DATAMGT macro) Dl 
action operand (CHGNTRY macro) 23 
ACTIVATE operand (CHGNTRY macro) 23 

for IBM 3270 (local) 225 
activating teleprocessing system 34-37 

for IBM 3270 (local) 225 

for IBM 3270 (remote) 217 
activating terminal list entries 21 
AD operand (DFTRMLST macro) 131 
ADAPTER operand (IODEVICE macro) Dl D2 
ADDRESS operand 

of IODEVICE macro Dl D2 
addressability, establishing for DCBs and 

DECBs 34 
addresses, display line (IBM 2260 and 

2265 ) v 64 
addressing 

definition of 38 

double 1 1 1 

BSC stations required to use 111 

for IBM 3270 (remote) 

control unit addresses 210 
device addresses 211 
addressing characters 5 
addressing lists 

(see also under individual terminal on 

line types in Start-Stop and BSC Read 

and Write Operations chapters) 

defining 23 

DFTRMLST macro, defining with Al 

formats of 23, A1-A8 
all-skip-bits-on return code (of READ and 

WRITE macros) 4 9 
alternate source for DCB, parameters 13 
AN operand (DFTRMLST macro) 130 
ANDGUID operand (PARMLIST macro) 174 
ANSRING operand (RESETPL macro) 51 
answerback 

for IBM 2760 85 

generally 6 
answering 

definition of 39 

for BSC stations 127-131 

lists 21 
appearance, line 4 
area operand 

DFTRMLST macro 22 

TRNSLATE macro 32 
AREA operand (ONLTST macro) 293 
area station address (IBM 2715) 165 
AS macro (IBM 2715) 

generally 165 

ID operands table 166 



ASCTR macro (IBM 2715) 168 

ASGROUP operand (AS macro) 166 

ASLIST macro (IBM 2715) 178 

AS LOG operand (ASCTR macro) 169 

ASMTRTAB macro 31 

assembly error messages CI 

ATST 83B3 100 

ATTENT operand (RESETPL macro for local IBM 

3270) 227 
attention interruptions 226 
ATTLST operand (CHGNTRY macro for local IBM 

3270) 226 
attributes of communications lines 1-4 
authsequence operand (DFTRMLST 

macro) 130-132 
Auto Poll feature 
polling list 21 

index byte, use of 50 

reset function 50 

restriction on use of WRITE TTV 

macro 4 5 
use of CHGNTRY macro with 23 
specifying in IODEVICE macro D3 
start-stop index byte 107 
start-stop, programming 

considerations 107-108 
start-stop, terminal list for 107 
AUTOLST operand 

CHGNTRY macro 23 
DFTRMLST macro 21 
automatic answering 
generally 4 

specifying at system generation D3 
automatic dialing 
generally 4 

specifying at system generation D3 
automatic EOM mode (IBM 2760) 84 
automatic polling (see Auto Poll feature) 
AUTOWLST operand 

CHGNTRY macro 23 
DFTRMLST macro 21 
A1,A2 characters (IBM 2760) 81,87,90 



BFTEK operand (DCB macro) 14 

bidding for use of line 38 

blocks, message, use of 39 

BSC program, sample Nl 

BSCLST operand (DFTRMLST macro) 21 

BSC1,BSC2,BSC3 values in IODEVICE 

macro 1 09 
BUFCB operand (DCB macro) 14 
BUFFER operand (TPEDIT macro) L2 
bufferaddr operand (RELBUF macro) 30 
buffering, dynamic 

effect of stopping CPU 28 

in read operations 27 

in write operations 28 

lost messages 28 

specifying 27 
buffering, programmer 27 
buffering, techniques of 6 
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buffers 

control block 14 

defining 25 

extra-buffer condition 28 

IBM 3270 (local) 225 

IBM 3270 (remote) 205 

length, specifying 14,25 

link field 29 

management of 29 

maximizing utilization of 7 

quantity, specifying 14 

releasing 30 

requesting 29 

restriction on use of CLOSE macro 36 

unused condition 29 
buffer-unavailable condition 

generally 29 

return code for READ and WRITE 
macros 49 
BUFL operand (DCB macro) 14 
BUFNO operand (DCB macro) 14 
BUILD macro 25,26 

busy-line return code for READ and WRITE 
macros 49 



calling 

definition of 38 

for BSC stations 127-132 

lists 21-22 
central computer 1 , 8 
central processing unit (CPU) 1 
centrally controlled (multipoint) 

system 38 
channel commands 8,39 
channel program 8,39 

(see also sections on individual types 
of terminals (start-stop) or lines 
(BSC) in the Read and Write Operations 
chapters ) 
CHGNTRY macro 23 

for IBM 3270 (local) 226-227 

for IBM 3270 (remote) 205 

restriction on use with certain types of 
terminal lists 23 
cid operand (LERPRT macro) 243 
CKAND operand (PARMLIST macro) 174 
CKLNGTH operand (PARMLIST macro) 172 
CKMOD10 operand (PARMLIST macro) 173 
CKM0D11 operand (PARMLIST macro) 172 
CKMONKY operand (PARMLIST macro) 172 
CKNONUM operand (PARMLIST macro) 174 
CKNUM operand (PARMLIST macro) 175 
CKOR operand (PARMLIST macro) 173 
CKRANGE operand (PARMLIST macro) 172 
CLEAR operand (LERPRT macro) 243 
CLOSE macro 36 

cntrlseq operand (DFTRMLST macro) 22 
code, transmission 

charts HI II Kl 

Dual Code feature 16 

specifying at system generation D3 

for BSC stations 109, El 

for IBM 3270 (local) El 

specifying for BSC 16 
CODE operand (DCB macro) 16 
code translation 31-33 

IBM 3270 (local) 225 



IBM 3270 (remote) 205-206 
code translation tables 32-33 

assembling 31 

modifying 31 

names of 32 

World Trade telegraph terminals 32 
coding format, macro instruction 8 
commands, channel 8 

(see also sections on individual types 
of terminals (start-stop) or lines 
(BSC) in the Read and Write Operations 
chapters) 
communications common carrier, definition 

of 1 
communications line group 

characteristics of 12 

characters (see line control characters) 

closing 34 

definition of 11 

establishing 11-13 

examples of 12 

opening 34 

redefining using DD statements 13 

requirements 1 1 
communications lines 

address of 5,11-13 

appearance of 4 

binary synchronous (BSC) , defined 4 

closing (deactivating) 36-37 

configurations 2 

control over 4-7 

data representation on 4 

dial connections 4 

disabling 39 

enabling 39 

establishing communication on 5 

grouping local IBM 3270 devices 224-225 

identifying local IBM 3270 devices 224 

multipoint 4 

nonswitched 1 

opening (activating) 35-37 

point-to-point 4 

resetting 38,41,50 

specifying number of 11-13 

specifying type of 11 

start-stop, definition of 4 

switched 6 

types 1 
compatibility, BSC remote station 109 
completion codes, ONLTST macro 294 
component, definition of 1 
CONFIGUR macro (IBM 2715) 163 
configurations, line and station, supported 

by BTAM J1-J2 
console messages, online test 298 
contention system, definition of 5,38 
continuation lines, BTAM macros 8 
control byte, SWLST form of terminal list 

changing value of 23 

generally 110,130 132 
control characters, end-to-end 

definition, of 8 

examples of 8,40 
control characters, line (data link) 

coding in USASCII or Transcode 109 

examples of 40 

functions 38 

placing in output area 40 
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scanning input area for 40 

specifying 5 

use of 40 

where to find information on 41 
control codes, IBM 50 jji 
control mode 38 
control station 1,7,39 
control transactions (IBM 2715) 190 
control unit address 12 

"control unit not operational" message D10 
control value operand (DFTRMLST 

macro) 130, 132 
conversational operations 

defining DECB for 4 8 

generally 4 
conversion for IBM 3270 232 
CORE operand (CONFIGUR macro) 163 
count opearand 

REQBUF macro 29 

WAIT macro 52 
counter control byte 191 
counter readout (see IBM 2715 scheduled 

counter readout) 
counter testing (see IBM 2715 counter 

testing) 
CPU (central processing unit) 1 
CPU operand 

ASCTR macro 169 

TRLIST macro 177 
CTINIT operand (CTRGROUP macro) 170 
CTRADR operand (CTRLIST macro) 182 
CTRGROUP macro (IBM 2715) 169 
CTRLIST macro (IBM 2715) 182 
ctrno operand (CTRGROUP macro) 170 
CTROP operand (CTRLIST macro) 183 
CTRRD operand (CTRLIST macro) 183 
CTRSCHED macro (IBM 2715) 170 
cttest operand (CTRGROUP macro) 170 
CTTEST operand (CTRLIST macro) 183 
cumulative counters (line error 
recording) 242 



data control block (DCB) (for line group) 

activating and deactivating 34-37 

contents of 2 

defining 11-14 

establishing addressability for 34 

format of 19 

reference to by DSECT 34 
data control block (DCB) (for local IBM 

3270 device group) 224-225 
data, definition of 8 
data definition (DD) statements 

examples 12 

generally 11-13 
data event control block (DECB) 

changing contents of 42 

contents of B1-B10 

defining 41 

establishing addressability for 34 

for conversational operations 48 

for leading graphics operations 43 

format of b9 

parameters in 41 

purpose of 41 

reference to by DSECT 34 



data link control characters 

coding in USASCII or Transcode 
format 109 

examples of 40 

functions 38 

placing in output area 40 

scanning input area for 40 

specifying 5 

use of 40 

where to find information on 41 
data link control (see also communications 

lines, line control) 
data representation on communications 

line 4 
data tone 

defining 129 

recommended character sequence and 
length for 134 

specifying 22 
datack operand (LERB macro) 242 
DATAMGT macro Dl 
DCB (see data control block (DCB) ) 
DCB macro (for line groups) 14-18 
deb operand 

CLOSE macro 37 

OPEN macro 37 
DCB operand (ONLTST macro) 293 
debaddr operand 

of CHGNTRY macro for IBM 3270 
(local) 226 

READ macro 43 

RELBUF macro 30 

REQBUF macro 29 

TRNSLATE macro 31 

WRITE macro 43 
DCBBUFL field 28 
DCBD macro 34 
DCBOFLGS field 34 

DD (data definition) statements 12 
DDNAME operand (DCB macro) 14 
deactivating teleprocessing system 

generally 34-37 

IBM 3270 (local) 225 

IBM 3270 (remote) 217 
DECAREA field 27 

DECB (see data event control block) 
DECB operand (ONLTST macro) 293 
decbaddr operand 

READ macro 4 2 

RESETPL macro 51 

RESETPL macro (local 3270) 227 

WRITE macro 4 2 
DECCMCOD field 245 , B-3 
DECCOUNT field 28, B3 
DECCSWST field 4 1 , B7 
DECENTRY field 300 
DECERRST field 41,243,B-7 
DECFLAGS field 41,243,B4 
DECPOLPT field 50, B8 
DECRESPN field 41, B5 
DECSDECB field 243, Bl 
DECSENS0 field 41,243,B5 
DECTPCOD field 245, B6 
DECTYPE field 245, B4 
defining teleprocessing system 12 
defining terminal lists (see DFTRMLST 

macro) 
DEMOD10 operand (TRLIST macro) 177 
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DEM0D11 operand (TRLIST macro) 177 

DEU read counter capability (IBM 2715) 156 

DEU set counter capability (IBM 2715) 156 

DEUGROUP operand (AS macro) 166 

DEULIST macro (IBM 2715) 180 

DEVD operand 

DCB macro 15 
DCBD macro 34 
DEVCOD operand (CTRLIST macro) 182 
device operand (ASLIST macro) 178 
DFTRMLST macro, limit on number of 

entries 22 
DFTRMLST macro, operands for 
AT6T 83B3 100 

Auto Poll start-stop terminals 107 
IBM 1030 53 

IBM 1050 (nonswitched) 55 
IBM 1050 (switched) 57 
IBM 1060 60 
IBM 2260, 2265 62 
IBM 2740 

with Dial-up feature 71 
with Dial-up and Checking 

features 72 
with Dial-up and Checking features 

and IBM 2760 92 
with Dial-up and Transmit Control 

features 74 
with Dial-up, Transmit Control, and 

Checking features 76 
with Station Control feature 78 
with Station Control and Checking 
features 79 
IBM 3270 (remote) 202-205 
nonswitched multipoint stations 118 
switched point-to-point 

stations 127-132 
World Trade Telegraph terminals 105 
WU TWX 101 
WU 115A 103 
dialchars operand (DFTRMLST macro) 22,131 
dialcount operand (DFTRMLST macro) 22,131 
dialing 

definition of 4 
specifying digits 22 
DIALST operand 

CHGNTRY macro 23 
DFTRMLST macro 21 
digit checking (IBM 2715) 172 
DIGIT operand 

ASLIST macro 179 
DEULIST macro 180 
DIGIT2 operand (DEULIST macro) 181 
direction of transmission 8 
DISC operand (CHGNTRY macro) 23 
DISK operand 

ASCTR macro 169 
TRLIST macro 177 
DISPGUID macro (IBM 2715) 175 
display line addresses (IBM 2260, 2265) 64 
DISPMSG operand 

DISPGUID macro 176 
GDULIST macro 181 
distinction between teleprocessing and 

conventional data processing systems 4 
DLE ETB sequence 4 
DLE ETX sequence 40 
DLE STX sequence 40 



double addressing 

BSC station requirement for 111 

generally 1 1 1 
DSECTs, usefulness of in user program 34 
DSORG operand (DCB macro) 14 
Dual Code feature (IBM 2701) 

generally D 5 

specifying 16, D5 
Dual Communications Interface feature (IBM 

2701) 16, D5 
dummy transaction group (IBM 2715) 168 
duplex transmission 2 
dynamic buffering 

effect of stopping CPU 28 

in Read operations 27 

in Write operations 28 

lost messages 28 

specifying 27 



EBCDIC (extended binary-coded-decimal 
interchange code) 

generally 16 

transmission code, BSC stations 
using 109 

transparency feature (IBM 2770) 194 
ECB (event control block) 43,52 
ECB operand (WAIT macro) 52 
ECBLIST operand 

TWAIT macro 52 

WAIT macro 52 
Edit routine (IBM 50) L1-L8 
EDIT operand (TPEDIT macro) (IBM 50) L2 
EIB (error information byte) mode 110 
Enable command, effect of RESETPL macro 

on 51 
enabling of switched line, defined 42 
ENDERR operand (CONFIGUR macro) 164 
end-of-address (EOA) character 38 
end-of -block (EOB) character 39 
end-of-transmission (EOT) character 38 
end-of-transmission-block (ETB) 

character 39 
end-to-end control characters 

definition of 8 

examples of 8 
entry operand 

READ macro 48 

WRITE macro 48 
ENTRY operand 

ASLIST macro 179 

GDULIST macro 182 

ONLTST macro 279 
entrylength operand (DFTRMLST 

macro) 130,132, A5 
EOA (end-of-address) character 38 
EOB (end-of -block) character 39 
EOM operand (DCB macro) 18 
EOT (end-of-transmission) character 38 
EOT operand (DCB macro) 18 
EROPT operand (DCB macro) 14 
ERP (see error recovery procedures (ERP) ) 
ERROPT operand (TPEDIT macro) L3 
error codes (IBM 2715) 188 
error conditions 

IBM 2760 85 

IBM 3270 (local) 213 

IBM 3270 (remote) 213 
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indicators in DECB Bl 
irrecoverable errors 240,241 
non-text errors 241 
number of retires 240 
permanent errors 240,241 
Read text errors 241 
sense byte analysis 
BSC ERP 256 
start-stop ERP 246 
user program 244 
should-not-occur errors 246 
specifying ERP options 241 
status analysis 
BSC ERP 256 
start-stop ERP 246 
user program 244 
suggested retry options for Read and 
Write operations 277-285 
temporary errors 2 40 
undefined errors 241 
use of Outboard Recorder (OBR) 240 
use of Statistical Data Recorder 

(SDR) 240 
user program analysis procedure 243-245 
write text errors 241 
error description word (IBM 50) L4-L5 
error information byte (EIB) mode 110 
error information placed in DECB 241 
error messages, BTAM C1-C20 
assembly errors C1-C7 
error status messages 
IBM 2715 C13-C14 
IBM 2770 C12-C13 
IBM 3270 (remote) C15-C18 
I/O errors C7-C10 
remote BSC station C11-C17 
TCU inoperative C10 
error recording 241-243 
error recovery procedures (ERP) 240-2 76 
appropriate action when ERP fails to 

recover 240-276 
basic functions 242,245,256,257 
buffer-unavailable condition 240 
completion codes 244 
detection and analysis 243-245 
ERP actions 

BSC 256-268 

IBM 3270 (local) 256,275-276 
start-stop 246-25 6 
error status flags (DECERRST 

field) 243 , B7 
error status messages 
IBM 2715 C13-C14 
IBM 2770 C12-C13 
IBM 3270 (remote) C15-C18 
error threshold counters 
default count 242 
printing contents of 242-243 
errors, transmission 5 
irrecoverable 240 
permanent 240 
read text 241 
temporary 240 
undefined 246 
write text 241 

(see also error recovery procedures 
(ERP)) 240-276 
errors occurring during transmission of 



test messages 241 
ETB (end-of-transmission-block) 39 
event control block (ECB) 43,52 
exceptional conditions 43,222 

IBM 3270 (remote) 211 

indicated in DECFLAGS 243 
execute format 

CLOSE macro 37 

OPEN macro 37 

READ macro 49 

WRITE macro 49 
exit list (DCB macro) 14 
EXLST operand (DCB macro) 14 
expanded ID verification 130-131 
explicit counter addressing (IBM 2715) 156 
EXTALRM operand (ASCTR macro) 169 
external alarm 192-193 



faaseq operand (DFTRMLST macro) 22 
F-character (IBM 2760) 81 
FEATURE operand (IODEVICE macro) 

generally D2 

IBM 3270 (local D3-D4 
filmstrip positioning (IBM 2760) 81 
formats, message (see message formats) 
frame change sequence (IBM 2760) 82 
FUNCERR operand (CONFIGUR macro) 163 

GDU keyboard character conversion 165 
GDU operand TRLIST macro 177 
CDUAS macro (IBM 2715) 167 
GDUNUMB operand (GDUAS macro) 167 
GDULIST macro (IBM 2715) 181 
GDUTRANS macro (IBM 2715) 170 
GETID operand (CONFIGUR macro) 165 
GETMAIN macro 26 
GETPOOL macro 25 
guidance lights (IBM 2715) 

ASLIST macro operand values for 179 

generally 164 



half-duplex transmission 2 

Halt I/O function 51 

HIGHCTR operand (ASCTR macro) 169 

HIGUID operand (PARMLIST macro) 173 



IAM operand (DCB macro) 18 
IBM System/7 145 
IBM System/370 and System/3 
double addressing 111 
models supported as remote stations 

under BTAM J1-J2 
programming considerations 137-139 
transmission over nonswitched multipoint 

line (Model 20 only) 143-145 
transmission over nonswitched 143-144 

point-to-point line 143 
transmission over switched 
point-to-point line 144 
(see also BSC Read and Write Operations 
chapter) 
IBM 50 L1-L8 

control codes L2 

data-editing LI 

programming considerations L8 
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IBM 1030 53-54 

IBM 1035 (IBM 2715) 184 

IBM 1050 (nonswitched) 55-56 

IBM 1050 (switched) 57-59 

IBM 1053 (IBM 2715) 186 

IBM 1060 60-61 

IBM 1130 

double addressing recommended 144 
transmission over nonswitched multipoint 

line 143-144 
transmission over nonswitched 
point-to-point line 143 
(see also BSC Read and Write Operations 
chapter) 
IBM 1800 

double addressing required 146 
transmission over nonswitched multipoint 

line 143-144 
transmission over nonswitched 

point-to-point line 143 
transmission over switched 
point-to-point line 144 
(see also BSC Read and Write Operations 
chapter) 
IBM 2213 (IBM 2770) 196-197 
IBM 2260-2848 

display line addresses 64 
generally 62-65 
IBM 2265-2845 

display line addresses 64 
generally 62-65 
IBM 2265 Model 2 (IBM 2770) 197 
IBM 2715 

control transactions 190 

counter addressing 157 

counter testinq 154 

data entry 183-184 

error status messages C-13, C-14 

external alarm 192-193 

macro storage site estimates 164 

message formats 185-189 

message header 

System/370 to 2715 185 
2715 to System/370 185 
programming notes 183-185 
pulse count 

counter testing 155 
generally 154 

scheduled counter readout 156 
set counter 156 
transaction header 186 
transmission code 154 
user tables 157-161 
loading 161 
sample assembly 381 
size 157-161 

table-generating macros 165-183 
AS macro 165 
ASCTR macro 168 
ASLIST macro 178 
CONFIGUR macro 163 
CTRGROUP macro 169 
CTRLIST macro 182 
CTRSCHED macro 170 
DEULIST macro 180 
DISPGUID macro 175 
GDUAS macro 167 
GDULIST macro 179 



GDUTRANS macro 170 

PARAMNUM macro 171 

PARMLIST macro 171 

STEND macro 183 

TGROUP macro 168 

TRANSLAT macro 176 

TRLIST macro 176 
IBM 2740 (General) 

buffer overflow 66 
Buffered Receive feature 66 
buffering restrictions 66 
features supported by BTAM 66 
IBM 2715, use with 193 
Model 2 66 

multiple-block messages 66 
responses 66 
TCU timeout 66 
IBM 2740 

Basic 68 

Checking 69-70 

Checking and IBM 2760 89-91 

Dial-up 71 

Dial-up and Checking 72-73 

Dial-up, Checking and IBM 2760 92-95 

Dial-up and Transmit Control 74-75 

Dial-up, Transmit Control, and 

Checking 76-77 
Model 2 66 
Station Control 78 
Station Control and Checking 79-80 
IBM 2741 

channel commands 96 

designing a message control routine 98 
general information 96 
interrupt facility 99 
program considerations 98 
IBM 2760 

automatic EOM mode 81 
A1 , A2 characters 81 
error detection and recovery 85 
filmstrip positioning 81 
function (F) character codes 81 
image index counter 82 
initializing images 87 
manual EOM mode 8 2 
manual frame advance 82 
message formats 81-84 
modes of operation 81 
multiple message blocks 87 
online testing 85 
programming considerations 86 
signals to operator 84 
startup procedure 87 
utility response points 82 
V and H coordinates 82-83 
IBM 2770 

configuration 194 

device control 196 

EBCDIC Transparency feature 194 

error status messages 318-319 

field-control operation 197-198 

message formats 198 

nontransparent transmission 198 

polling and selection 194 

protected data 197 

record formats 198 

terminal function control 196 

transmission codes 194 
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transmission delays 195 
vertical forms control 196 
IBM 2772 (see IBM 2770) 194 
IBM 2780 

addressing sequences 

examples 148 

generally 147 
component selection 153-155 

examples 148 

generally 148 
end-to-end control characters 148 
escape sequences 150 
format records 151 
horizontal format control 150 
internal errors 153 
Mode switch 149 
MODE operand of DCB macro 147 
multiple record transmission 151 
multipoint polling/addressing 148 
polling sequences 

examples 148 

generally 147 
programming considerations 153 
records, number and length of 152 
responses to abnormal conditions 153 
transmission length, maximuir 153 
transmission over nonswitched multipoint 

line 147 
transmission over nonswitched 
point-to-point line 147 149 
transmission over switched 

point-to-point line 147 150 
use of NAK, EOT, and STX ENQ 

characters 153 
vertical forms control 150 
(see also BSC Read and Write Operations 
chapter) 
IBM 2790 (see IBM 2715) 
IBM 2972 200 

IBM 2980, character set and transmission 
code 367 
IBM 3270 Display System 

capabilities supported 201 

conversion to 232 

devices supported 201 

local 3270 display system 223-232 

ACTIVATE operand 226 

activating the system 225 

ATTENT operand 227 

attention interruptions 226 

ATTLST operand 226 

buffer management 225 

character generator options 329 

CHGNTRY macro 226-227 

code translation 225 

dcbaddr operand 226 

deactivating the system 225 

decbaddr operand 227 

device addresses D-l 

device grouping 224-225 

device identifying 224 

entry operand 228 

erase and write buffer 229 

erase unprotected fields 229 

error recovery procedures 230 

FEATURE operand D-2-D4 

formats, sample 228-229 
inoutarea operand 228 



inoutlength operand 229 
interruptions, attention 226 
line group and relative line 

numbers 224-225 
listposition operand 226 
MODEL operand D<-1, D-2 
online testing 230 
options D-3 , D-4 
read buffer 229 
read buffer from positior 229 
read initial operations 226 
read modified fields 228 
read modified fields for operator 

input 226-227 
read modified fields from 

position 228-229 
read operations "227-229 
READ TB 229 
READ TBP 229 
READ TI 228 
READ TM 228 
READ TMP 228 
RESETPL macro 227 
retry options 230 
return codes for RESETPL 227 
rln operand 228 
sample program D-l 
SKIP operand 226 
write buffer 229 
write operations 229 
WRITE TI 229 
WRITE TS 229 
WRITE TSA 229 
WRITE TSF 230 
WRITE TUS 230 
macro instruction sequences (switched 

3275) 218 
online testing 217 
remote 3270 display system 201 
activating the system 206 
buffer management 205 
CHGNTRY macro 205 
code translation 205-208 
connecting to 3275 with dial 217 
control unit addresses for 

polling 202 

selection 202 
copy 215 

deactivating the system 207 
device addresses 205 
DFTRMLST 

nonswitched 202 

switched 214 
Dial feature 214-223 
entry operand 

nonswitched 206 

switched 219 
erase and write buffer 

nonswitched 212 

switched 222 
erase unprotected fields 

nonswitched 212 

switched 222 
error conditions 

nonswitched 212 

switched 223 



INDEX-7 



error recovery procedures 

nonswitched 213 

switched 223 
error status message 

nonswitched C7-C8 

switched C11-C13 
exceptional conditions 

nonswitched 213 

switched 223 
ID verification 214 
inoutarea operand 

nonswitched 209 

switched 219 
input (see read operations) 
I/O interface code 206 
line control 

nonswitched 206 

switched 217 
line groups 

nonswitched 201 

switched 214 
message transmission 

nonswitched 206-213 

switched 217-223 
online testing 214 
operator considerations 222 
outarea operand 

nonswitched 210 

switched 220 
output (see write operations) 
read buffer 

nonswitched 211 

switched 221 
read buffer from position 

nonswitched 211 

switched 221 
read modified fields 

nonswitched 210, 211 

switched 220 
read modified fields for operator 
input 

nonswitched 206-208 

switched 219-220 
read modified fields from position 

nonswitched 211 

switched 220 
read operations 

nonswitched 206-212 

switched 218-222 
READ TI 

nonswitched 206 

switched 219 
READ TT 

nonswitched 206 

switched 219 
retry options 

nonswitched 213 

switched 223 
sample program Pi 
switched 214 
terminal lists 

nonswitched 202 

switched 214 
write buffer 

nonswitched 212 

switched 222 
write operations 

nonswitched 212-214 

switched 218,222 



WRITE TC 222 
WRITE TI 

nonswitched 212 
switched 222 
WRITE TIR 213 
WRITE TIV 

nonswitched 210 
switched 221 
WRITE TR 

nonswitched 213 
switched 222 
WRITE TT 

nonswitched 212 
switched 222 
WRITE TTR 212 
WRITE TTV 

nonswitched 211 
switched 221 
storage estimates D1-D4 
system generation 
test message 297-298 
IBM 3650 233 
IBM 3660 234 
IBM 3735 235 
IBM 3741 Model 2 236 
IBM 3747 236 
IBM 3750 237 
IBM 3780 238 
IBM 3977 Model 2 modem 36 
IBM 5275 239 
ID ACK-0 sequence 23 
ID ENQ sequence 23 
ID operand 

AS macro 165 
ASCTR macro 169 
CTRGROUP macro 170 
GDUAS macro 167 
ID verification 
expanded 110 
regular 109-110 
specifying 127-132 
switched 3275 214 
idcount operand (DFTRMLST macro) 130, 131 
IDCOUNT operand (CONFIGUR macro) 165 
IDENT operand 

GDULIST macro 181 
PARMLIST macro 175 
IDLST operand (DFTRMLST macro) 21 
IECTDECB macro 34 
image index counter (IBM 2760) 82 
implicit counter addressing (IBM 

2715) 156-157 
inarea operand 
READ macro 43 
WRITE macro 4 3 
index byte, Auto Poll 50 
initialization, user program 34-35 
initializing images (IBM 2760) 87 
inlength operand 
READ macro 48 
WRITE macro 4 8 
inoutarea operand 
READ macro 43 

IBM 3270 (local) 228-229 
IBM 3270 (remote) 206-209 219-221 
WRITE macro 43 

IBM 3270 (local) 229 

IBM 3270 (remote) 212-213 222 
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inout length operand 

READ macro 43 

WRITE macro 43 

IBM 3270 (local) 229 
input, definition of 8 
INQDISP operand 

ASLIST macro 179 

CONFIGUR macro !65 

TRLIST macro 177 
intermediate blocK cnecking function 110 
interruptions 

attention 226 

overflow 191 

power 192 
intreq operand (LERB macro) 242 
invalid optype return code for READ and 
WRITE macros 4 9 
invalid rln return code for READ and WRITE 
macros 49 

IUS (interchange unit separator) 
character 110 
11,12 characters (IBM 2760) 82 



line termination, switched 6 
link field, buffer 29 
list format 

CLOSE macro 36 

OPEN macro 36 

READ macro 43 

WRITE macro 43 
list type, of DFTRMLST macro 21 
listaddr operand (CHGNTRY macro) 23 
listposition operand (CHGNTRY macro) 23 

for IBM 3270 (local) 214 
listype operand, of CHGNTRY macro 23 
loading user tables (IBM 2715) 161 
local terminal, definition of 8 
LOG operand 

ASCTR macro 169 

TRLIST 177 
LOPEN macro 

generally 36 

restriction on use 36 
LOWGUIDE operand (PARMLIST macro) 173 



keyboard options, IBM 3270 D3-D4 
keyword operands, rules for coding 



leading graphics 

defining DECB for 43 

ignored by IBM 1800,2715,2770 42 

use of READ TPL macro with EIB mode 110 
length checking (IBM 2715) 180 
length operand 

DFTRMLST macro 22 

TRNSLATE macro 32 
LENGTH operand 

ASLIST macro 178 

DEULIST macro 180 

ONLTST macro 293 
LERB macro 241-242 
LERB operand (DCB macro) 14 
LERPRT macro 242-243 
limit on number of entries in terminal 

list 21 
line (see communications line) 
line address 12 
line and station configurations supported 

in BTAM J1-J2 
line configuration, specifying BSC 1 1 , Dl 
line control 4,38 
line control characters 

BSC read and write 112 

coding in USASCII or Transcode 
format 109 

examples of 40 

functions 38 

placing in output area 40 

scanning input area for 4 

specifying' 5 

use of 40,112 

where to find information on 41 
line-error-during-Open return code for READ 

and WRITE macros 49 
line error recording block 241,242 
line group (see communications lines) 241-242 
line number, relative (rln) 13 



machine requirements for BTAM J2 
MACRF operand (DCB macro) 14 
macro instructions 

coding format 9-10, Index 16 

index to main discussions Index 15 
manual EOM mode (IBM 2760) 84 
manual fram advance (IBM 2760) 82 
MD operand (DFTRMLST macro) 131 
message 

definition of 8 

determining source of 50 
message blocks, use of 39 
message control routine example (BSC) 113 
message formats 

BSC 111 

console (online tests) 298 

IBM 2715 185 

IBM 2760 81-84 

IBM 2770 198-199 

IBM 3270 (local) 227-229 

IBM 3270 (remote) 206- 211 219-222 

online test 280-285 
message transmission 294-299 
MF operand 

CLOSE macro 37 

OPEN macro 37 

READ macro 49 

WRITE macro 4 9 
MINLN operand (TPEDIT macro) Ll 
MODE operand (DCB macro) 15 
MODEL operand 

(IODEVICE macro for local IBM 3270) Dl 
MODULUS operand 

ASLIST macro 179 

DEULIST macro 180 
MON operand (DCB macro) 15 
MONDLY operand (DCB macro) 15 
MONERR operand (CONFIGUR macro) 164 
monitor key (IBM 2715) 184 
MSG operand 

ASLIST macro 180 

CTRLIST macro I 83 

DEULIST macro 191 

GDULIST macro 192 
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multiple console support facility, use by 

ERP 241 , 242-243 
multiple Waits 51 

NEXTAS operand (ASCTR macro) 169 
nlines operand (LERB macro) 242 
non-EIB mode 110 

nonswitched line, definition of 2 
nontransparent mode 40 
nontto operand (LERB macro) 242 
NORGUID operand (GDULIST macro) 181 
NORM operand (ASLIST macro) 178 
NULL operand (TRLIST macro) 177 
numchars operand (CHGNTRY macro; 23 
numcnsent operand (DFTRMLST macro) 22 
numrec operand (DFTRMLST macro) 22 
numsent operand (DFTRMLST macro) 22 



OBRCNT operand (IODEVICE macro) D4 

OLTEP for IBM 3270 230 

online testing, 3270 binary synchronous 

BTAM responses to RFT messages from 
remote stations 299 

console messages 298 

how requested 290 , 299 

how specified 290, 299 

IBM 3270 (local) 298-299/ 301 

IBM 3270 (remote) 301 

minimum length requirement for Read 
Initial macro 47 

ONLTST macro 292-294 

requirements for entering test 
mode 290, 299 

RFT (request-for-test) message 
formats 294 , 299 

summary of options 300-301 

test type codes 295-298 

use of IBM 2 77 Job switch 291 

use of IBM 278 Mode switch 291 

use of WACK sequence 292 
online testing, start-stop 

how requested 286 

how specified 286 

restrictions 289-290 

test request message formats 286-287 

test type codes 287-289 
ONLTST macro 292-294 
Open flag of DCB 20 
OPEN macro 34-36 
OPENLST operand 

CHGNTRY macro 23 

DFTRMLST macro 21 
open^type polling list (see polling, lists) 
operands , rules for coding 9 
operator's console, defined 2 
optical image unit (see IBM 2760) 
optype operand 

READ macro 42 

WRITE macro 42 
ORGUID operand (PARMLIST macro) 174 
outarea operand 

READ macro 43 

WRITE macro 43 
Outboard Recorder (OBR) 240-241 
outlength operand 



READ macro 48 

WRITE macro 48 
output, definition of 8 
overflow interruption (IBM 2715) 191 
PARAMNO operand (GDULIST macro) 181 
PARAMNUM macro (IBM 2715) 171 
PARMLIST macro (IBM 2715) 171 
PARMLST operand (PARAMNUM macro) 171 
PC operand (CONFIGUR macro) 163 
PLN operand (PARAMNUM macro) 171b 
point-to-point, definition of 2 
polling 

control unit addresses 12 

control unit addresses, 3270 202 

definition of 5,38 

device addresses, 3270 203 

double addressing 110-111 

for IBM 3270 (remote) 202 

termination of (see RESETPL macro) 
polling characters 5-6 
polling lists 

Auto Poll 21 

defining 21,118 

formats of 21-22, A1-A8 

limit on number of entries 22 

open -type , format Al , A4 

restart address maintained in DECB 50 

wraparound type, format A4,A5 

(see also DFTRMLST macro) 
POLLING operand (RESETPL macro) 51 
positional operands, rules for coding 9 
POST operand (CHGNTRY macro) 23 
Prepare to Read 140,201,202,230 
problem program initialization 34 
program-controlled interrupt (PCI) used in 

dynamic buffering 28 
programmer buffering (see buffering, 

programmer) 
pulse count feature (see IBM 2715) 



READ Connect (TC) macro 128 , 133 

READ Connect with Tone (TCW) macro 134 

READ macro 

operation type options 44-4 7 

summary of options for IBM 3270 
(local) 47 

summary of options for switched BSC 
lines 46-47,128 
I Read, Prepare to 140,201,202,230 
Read operations 

analyzing results of 40 

canceling 50 

extra buffer condition 27-28 

IBM 3270 (local) 226-228 

IBM 3270 (nonswitched) 206-212 

IBM 3270 (switched) 219-222 

read skip operations 52 

READ Skip macro 52 

(see also READ macro) 
Read text error 245 ,14 
READ Initial (TI) macro 

IBM 3270 (local) 227 

IBM 3270 (nonswitched) 206 

IBM 3270 (switched) 219 

start-stop Auto Poll operations 107 

length restriction when BSC online test 
used 48 
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RECFM operand (TPEDIT macro) L3 
regular ID verification 110 
relative line number (rln) 13 
RELBUF macro 

generally 30 

using to release extra buffer 30 
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remote computers, programming 

considerations for 143 
remote station 

compatibility (BSC) 109 

definition of 8 

restrictions for connecting to lines in 
same line group 1 1 

specifying telephone number of 22 
remote terminal, definition of 8 
REPLACE operand (TPEDIT macro) U_ 
REQBUP macro 29 
reset operations 41,50 
RESETPL macro 

for IBM 3270 (local) 227 

used to change polling list while 
polling is in progress 50 
resetting the line 38,50 
response points (IBM 2760) 82 
responses 

addressing 38 

ENQ (BSC) 112 

EOT (BSC) 113 

error-checking 39 

generally 6 

message text (BSC) 112 

polling 38 

selection 38 
retry options 

IBM 3270 (local) 230 285 

IBM 3270 (nonswitched) 283-284 

IBM 3270 (switched) 280-282 
return codes 

CHGNTRY macro 23 

local 3270 227 

LOPEN macro 36 

ONLTST macro 294 

READ macro 49 

RELBUF macro 30 

REQBUP macro 29 

RESETPL macro 51 

local 3270 227 

restrictions on use of WAIT or TWAIT 
macro after nonzero return code 50 

special IOB 269-273 

TPEDIT macro L4-L5 

WRITE macro 4 9 
returnreq operand 

REQBUF macro 29 

TWAIT macro 51 
RFT (request for test) messages 294-295 
ridseq operand (DFTRMLST macro) 22 
rln (relative line number) 13 
rln operand 

LERPRT macro 243 

READ macro 48 

IBM 3270 (local) 228 

WRITE macro 48 
RLN operand (ONLTST macro) 293 
RNGETST operand (PARMLIST macro) 173 
ROUTE operand 

ASCTR macro 169* 

TRLIST macro 177 
rules for coding BTAM macros Gl 
RVI (reverse interrupt) sequence 20 



sample program for IBM 3270 

jLocal 01. -032 

remote P1-P2X 
sched operand (CTRSCHED macro) 



170 



selection, station 38 

SELTRAN operand (ASLIST macro) 179 

sense/status analysis 

BTAM 245 258 

user program 244 
set counter (see IBM 2715) 
SETADDR operand (IODEVICE macro) D4 
skip bit in terminal list 23 
SKIP operand (CHGNTRY macro) 23 

IBM 3270 (local) 226 
source of message, determining 50 
sro operand (CTRGROUP macro) 170 
SROENAB operand (CTRGROUP macro) 170 
SSALST operand 

CHGNTRY macro 23 

DFTRMLST macro 21 
SSAWLST operand 

CHGNTRY macro 23 

DFTRMLST macro 21 
standard format 

CLOSE macro 34 

OPEN macro 34 
start-stop Auco Poll operations 107 
start-of-text (STX) character 38 
start-stop line, definition of 4 
station 

definition of 8 

restrictions for connecting to lines in 
same line group 1 1 

specifying type of 12 
Statistical Data Recorder (SDR) 240 
STEND macro (IBM 2715) 183 
Storage Estimates (VS2) Q2 
STORID operand (CONFIGUR macro) 165 
STX (start-of-text) character 38 
SUPPRES operand (DISPGUID macro) 176 
switched line 

definition of 2 

disabling 39 

enabling 39 

termination 6 

use of ID verification 22,110 
Switched Network Backup Ql 
switched point-to-point operation 

(BSC) 127 
SWLST form of terminal list 22 
SWLST operand 

CHGNTRY macro 23 

DFTRMLST macro 130, 131 
system generation 

generally 12, Dl 

IBM 3270 230, Dl 



table definition block (IBM 2715) 158 
table-generating macros (IBM 2715) 

(see IBM 2715, user tables) 
tablename operand 

ASMTRTAB macro 31 

TRNSLATE macro 32 
TCn operand (TGROUP macro) 170 
TCU (see transmission control unit) 
TCU operand (IODEVICE macro) Dl 
telecommunications subroutine library C5 
teleprocessing (TP) system, definition 

of 1 
terminal, definition of 1 
terminal lists 

addressing 22 
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answering 127 

calling 127 

changing entries in (see CHGNTRY macro) 

defining 21,127 

for expanded ID verification 127 

formats A1-A8 

modifying 22 

polling (see polling, polling lists) 

restrictions on changing 23 

specifying entries in READ and WRITE 
macros 48 

userdata field in SWLST form 129 
terminal tests (see online testing) 
terminology used in this publication 8 
test request message formats 294-295, 299 
test, definition of 8 
TEST operand 

ONLTST macro 293 

TRLIST macro 177 
TGROUP macro (IBM 2715) 168 
tidseq operand (DFTRMLST macro) 22 
timer exit, restriction on use of LOPEN 

macro within 36 
TPEDIT macro (IBM 50) L1-L8 
TP-Op codes B5-B7 
transaction (IBM 2715) 

control 198-200 

formats 198-199 

header 186 

identifier 177 

list, defining (see TRLIST macro) 
transaction code 

defined 154 

in TGROUP macro 162 
TRANSCH operand (TRANSLAT macro) 176 
transcode 

appearance in main storage 109 

used by IBM 2780 109 
TRANSL operand (PARMLIST macro) 175 
TRANSLAT macro (IBM 2715) 176 
translation tables, code (see code 

translation tables) 
transmct operand (LERB macro) 242 
transmission, direction of 8 
transmission code 

BSC stations 109 

generally 4, G13 II 
transmission control unit (TCU) 

access lines 1 ,4 

conditioning line adapters of 35 

generally 1 

malfunctioning line adapters 36 

specifying type of adapter D2 

specifying type of TCU 12, Dl 
transmission control unit inoperative 
message C10-C11 
transparent mode 

generally 4 

placing DLE STX sequence in output 
area 111 
TRANTXT operand (TRANSLAT macro) 176 
TRCODE operand (GDUTRANS macro) 171 
TRID operand (TRLIST macro) 177 
TRLIST macro (IBM 2715) 176 
TRLIST operand (GDUTRANS macro) 171 
TRNSLATE macro 31 

TRSLRCTW macro (World Trade telegraph) Fl 
TRSLRCT3 macro (World Trade telegraph) Fl 



TRSLSCTW macro (World Trade 

telegraph) F1-F2 
TRSLSCT3 macro (World Trade 

telegraph) F1-F2 
TWAIT macro 52-53 
TWX,WU 101-102 



unavailable buffer condition 

generally 240 

return code for READ and WRITE 
macros 243 
UNIT operand 

IOCONTRL macro El 

IODEVICE macro Dl 

UNITNAME macro 12 
UNIT parameter (DD statement) 12 
UNITNAME macro 12 
unused buffer condition 28 
US (unit separator) character 110 
usage count too large return code for READ 

and WRITE macros 4 9 
USASCII code 

appearance in main storage 109 

BSC stations using 109 
user area, SWLST form of terminal list 22 
user program analysis (BSC) 243 
user program initialization 34-35 
user tables (see IBM 2715, user tables) 
userdata operand (DFTRMLST macro) 131,132 
userlength operand (DFTRMLST 

macro) 130,131 
utility response points (IBM 2760) 82 



V and H coordinates (IBM 2760) 82,83 
VERCHK operand (TPEDIT macro) L3 



WACK sequence 20 
WAIT macro 

generally 51 

restriction on use after nonzero return 
code 5 1 
World Trade telegraph terminals 

generally 104 

translation tables 104 
wraoaround-type polling list (see polling, 

list) 
WRAPLST operand 

CHGNTRY macro 23 

DFTRMLST macro 21 
WRITE Connect (TC) macro 128 
WRITE macro 

operation type options 43-46 

summary of options for IBM 3270 
(local) 48 

summary of options for switched BSC 
lines 46-47,128 
write operations 46-47, 128 

analyzing result of 40 

IBM 3270 (local) 229 

IBM 3270 (nonswitched) 212-213 
WTLIST operand (DFTRMLST macro) 22 
WTTALST operand (DFTRMLST macro) 22 
WU 115A 103 
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X operand (ONLTST macro) 293 
xx operand (DFTRMLST macro) 22 



Y operand (ONLTST macro) 293 
yy operand (DFTRMLST macro) 22 



INDEX -15 



INDEX OF BTAM AND SYSTEM MACRO INSTRUCTIONS 



The index lists only the main 
discussions of the macro instructions, 



AS 163 

ASCTR 166 

ASLIST 176 

ASMTRTAB 30 

BUILD 24 

CHGNTRY 21 

CHGNTRY for Local 3270 224 

CLOSE 35 

CONFIG UR 161 

CTRGROUP 167 

CTRLIST 182 

CTRSCHED 168 

DATAMGT C13 

DCB 13 

DCBD 33 

DEULIST 180 

DFTRMLST 20 

DISPGUID 173 

GDUAS 165 

GDULIST 179 

GDUTRANS igg 

GETPOOL 24 

IECTDECB 33 

IODEVICE 12 



LERB 242 

LERPRT 243 

LOP EN 35 

ONLTST 285 

OPEN 34 

PARAMNUM 169 

PARMLIST 169 

READ 41 

RELBUF 29 

REQBUF 28 

RESETPL 49 

RESETPL for Local 3270 225 

STEND 181 

TGROUP 165 

TPEDIT LI 

TRANSLAT 174 

TRLIST 174 

TRNSLATE 30 

TRSLRCTW Fl 

TRSLRCT3 Fl 

TRSLSCTW Fl 

TRSLSCT3 F2 

TWAIT 50 

UNITNAME 12 

WAIT 50 

WRITE 41 
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OS/VS READER'S 

BTAM COMMENT 

FORM 

Order No. GC27-6980-4 



Your views about this publication may help improve its usefulness; this form 
will be sent to the author's department for appropriate action. Using this 
form to request system assistance or additional publications will delay response, 
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IBM representative or the IBM Branch Office serving your locality. 
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